Fråga : Läsning värderar från UDL-sparar (textfilen)

Hi

I skulle något liknande för att ha två fungerar att ska läst efter värderar från ett resultat för källa för udl-spara ”myudl.udl” (likt nedanfört)
Data = 'resultatet för katalogen för MYCOMPNAME- \ ServerInstance'< br/>Initial = 'class= " lineNumbers " >
1 för > [oledb]
; Allt efter detta fodrar är en OLE DB som initstring
Provider=SQLOLEDB.1; Data Source=MYCOMPNAME \ ServerInstance; Inbyggda Security=SSPI; Framhärdar säkerhet Info=False; Initiala Catalog=MyDBName;
<-/pre>



How kan detta göras? 

" klar " 










Svar : Läsning värderar från UDL-sparar (textfilen)










det är allways fodrar 3 av spara
det är avgränsad stränger i stort
 
 







1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:





var-FileName: stränga;
  Lista: TStrings;
  ds ic: stränga;
börja
  FileName: = ”C:\yourfilename.udl”;
  Lista: = TStringList.Create;
  försök
    List.Delimiter: = ”; ”;
    List.StrictDelimiter: = True;
    List.LoadFromFile (FileName);
    List.DelimitedText: = lista [2];
    ds: = List.Values [”datakälla”];
    ic: = List.Values [”initial katalog”];
    ShowMessage (ds + ''+ ic);
  slutligen
    List.Free;
  avsluta;
avsluta;



































Andra lösningar
 































 






































programming4us

programming4us