Bonjour;
j'ai un petit programme qui consiste à recuper le contenu d'un fichier .txt et le mettre dans la chaine de connexion d'une base de données faite ne SQL SERVER
:Mon fichier test1.text contient :
mon programme est comme suit:Provider=SQLOLEDB.1;Password=ana2305+++;Persist Security Info=True;User ID=UPS_connexion;Initial Catalog=BD_systeme;Data Source=ana-mdc01
mais malheureusement connection string ne prend pas en valeur de S
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 procedure Tfdm_migra.DataModuleCreate(Sender: TObject); Var F:TextFile; S:String; begin AssignFile(F,'test1.txt'); Reset(F); Readln(F,S); showmessage(s); ADOConnection1.ConnectionString:=S; ADOConnection1.Connected:=true; end;
C'est URGENT SVP
Partager