SQLSTRINGCONNECT( )-Funktion
Stellt mit Hilfe einer Verbindungszeichenfolge eine Verbindung zu einer Datenquelle her.
SQLSTRINGCONNECT([cConnectString])
Rückgabewerte
Numerisch
Parameter
cConnectString
Gibt die Verbindungszeichenfolge der Datenquelle an, die von einigen ODBC-Treibern benötigt wird. Visual FoxPro übergibt die Verbindungszeichenfolge an den ODBC-Treiber. Weitere Informationen über Verbindungszeichenfolgen für Datenquellen finden Sie in Ihrer ODBC-Treiber-Dokumentation.Wird SQLSTRINGCONNECT( ) ohne cConnectString eingegeben, wird das Dialogfeld Datenquelle auswählen angezeigt, mit dem Sie eine Datenquelle auswählen können.
Hinweise
SQLSTRINGCONNECT( ) gibt eine positive numerische Kennung ungleich 0 zurück, wenn die Verbindung zur Datenquelle erfolgreich hergestellt wird. Sie sollten dieses Handle in einer Speichervariablen ablegen und diese Variable bei späteren Funktionsaufrufen, die eine Verbindungs-ID benötigen, wieder verwenden.
Beispiel
Im folgenden Beispiel wird von einer verfügbaren ODBC-Datenquelle mit dem Namen MyFoxSQLNT, der Benutzer-ID "sa" sowie dem Kennwort FOXPRO ausgegangen. SQLSTRINGCONNECT( ) wird eingegeben, und der entsprechende Rückgabewert wird in der Speichervariablen gnConnHandle gespeichert.
Wenn die Verbindung zu der Datenquelle erfolgreich hergestellt wurde, gibt SQLSTRINGCONNECT( ) eine positive Zahl zurück. Ein Dialogfeld wird angezeigt, und die Verbindung zur Datenquelle wird mit SQLDISCONNECT( ) wieder aufgehoben.
Wenn keine Verbindung zur Datenquelle hergestellt werden kann, gibt SQLSTRINGCONNECT( ) eine negative Zahl zurück, und eine Fehlermeldung wird angezeigt.
STORE SQLSTRINGCONNECT('dsn=MyFoxSQLNT;uid=sa;pwd=FOXPRO')
TO gnConnHandle
IF gnConnHandle < 0
= MESSAGEBOX('Cannot make connection', 16, 'SQL Connect Error')
ELSE
= MESSAGEBOX('Connection made', 48, 'SQL Connect Message')
= SQLDISCONNECT(gnConnHandle)
ENDIF
Das folgende Beispiel zeigt, wie Sie den SQLStringConnect-Befehl ohne Datenquellennamen (DNS - Data Source Name) verwenden können.
lcDSNLess="driver = SQL Server;server=your_server;uid=sa;pwd=sa_pw"
- Oder -
lcDSNLess="driver = {SQL Server};server=your_server;uid=sa;pwd=sa_pw"
- Oder -
lcDSNLess="DRIVER = {SQL Server};" ;
+ "SERVER=your_server;" ;
+ "UID=your_server_userid;" ;
+ "PWD=your_server_pw;" ;
+ "DATABASE=PUBS;" ;
+ "WSID=your machine name or userid;" ;
+ "APP=MicroX(R) Sample App"
lnConnHandle=sqlstringconnect(m.lcDSNLess)