APPLICATION ALIAS+EXCEL
John Dogget
Messages postés
384
Date d'inscription
vendredi 18 juin 2004
Statut
Membre
Dernière intervention
7 mai 2009
-
27 nov. 2011 à 22:04
cs_walidlam Messages postés 107 Date d'inscription lundi 30 mai 2011 Statut Membre Dernière intervention 29 avril 2013 - 5 déc. 2011 à 18:53
cs_walidlam Messages postés 107 Date d'inscription lundi 30 mai 2011 Statut Membre Dernière intervention 29 avril 2013 - 5 déc. 2011 à 18:53
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/53797-application-alias-excel
https://codes-sources.commentcamarche.net/source/53797-application-alias-excel
5 déc. 2011 à 18:53
5 déc. 2011 à 15:45
Il y a eu suffisamment de connards par le passé qui nous ont fait chier avec leur religion ici, pour pas relancer le truc stp.
De plus il serait plus judicieux que tu nettoyes ton zip précédent, que tu renommes tes composants, et que tu corriges ce dernier (Qui représente comme te l'a dis Cirec tout ce qui ne faut pas faire) : ca serait bien plus utile.
Dis donc toi tu commences fort.
28 nov. 2011 à 20:52
const
FDbDriver = 'PARADOX';
SubDir = 'dossier de la base \'; //il faut ajouter '\'
var
FAlias: string; chemin:string;
FAliasDir: string;
begin
FAlias := 'nom alias';
chemin := ExtractFilePath(ParamStr(0))+SubDir; {ParamStr(0)c 'est le chemin d'executable ou on peut mettre (application.ExeName )}
Session.ConfigMode := cmPersistent;
if not Session.IsAlias(FAlias) then
begin try begin
FAliasDir := ExtractFilePath(chemin);
Session.AddStandardAlias(FAlias, FAliasDir, FDbDriver); end finally
DbiCfgSave(nil, nil, True);
end; end; end;
28 nov. 2011 à 20:02
28 nov. 2011 à 19:43
27 nov. 2011 à 22:04
Et le jpg ?