![]() |
#2
fanjinyu91082021-06-17 18:57
|
public nhandle
#DEFINE CON_STRING "DRIVER=SQL Server;SERVER=10.189.129.7;UID=sa;PWD=wjh6552907;database=yk"
SQLSETPROP(0,"DispLogin" ,3) &&不显示任何对话框
nhandle= SQLSTRINGCONNECT(CON_STRING)
IF nhandle<=0 &&连接不成功
wait clear
MESSAGEBOX("远程连接失败!!!",0,"错误信息")
return
ELSE &&连接成功
wait clear
ENDIF
RETURN nhandle
[此贴子已经被作者于2021-6-17 19:11编辑过]