cServer='192.168.1.1' &&服务器名称或者IP
cUid='sa'
&&SQL服务器登陆账号,默认是 SA
cPwd='1111'
&&SQL服务器登陆账号, 默认是空
cdbs='master'
&&SQL服务器数据库名称
csql=[driver=sql server;server=]+cServer+[;uid=]+cUid+[;pwd=]+cPwd+[;database=]+cdbs
&&动态连接句柄
nhandle=sqlstringconnect(csql) &&连接
if nhandle>0 &&连接成功
sqlexec(nhandle,'select * from 表1 where .....','sql_table') &&查询SQL数据库的表1的数据,返回查询的表名称是 sql_table
if used('sql_table') &&如果查询正确,这个表sql_table肯定存在
select sql_table
brow
endif
SQLDISCONNECT(nhandle) &&断开连接
else
messagebox("SQL数据库连接失败!",48,"连接失败")
endif