PUBLIC gnHandle
gnHandle=SQLSTRINGCONNECT("driver=SQL Server;Server=servername;Uid=username;pwd=password;database=databasename")
If gnHandle>0 &&连接成功
sqlexec(gnHandle,"Select * from t1 ","tmp")
Else &&连接失败
MessageBox("连接 SQL SERVER 失败",16,"连接失败")
EndIf