注册 登录
编程论坛 VB6论坛

vb远程连接SQL

kbtwhg 发布于 2018-05-28 17:00, 1459 次点击
怎么连接不上,远程桌面连接117.41.172.245:18918,服务器可以远程,在远程桌面上可以登录进sql数据库

Dim CN As New ADODB.Connection
Dim strSQL As String
 

    CN.ConnectionString = "Driver=SQL Server;Server=117.41.172.245,18918;uid=sa;pwd=123456;database=公证处系统数据库"
    = 20
    CN.Open
    MsgBox "连接成功"
strSQL = "Insert into testtable(sn,sname,sex) Values('123','ABC','男')"
 CN.Execute strSQL
    CN.Close


[此贴子已经被作者于2018-5-28 17:04编辑过]

2 回复
#2
kbtwhg2018-05-28 17:03
程序报超时
#3
ZHRXJR2018-05-28 20:01
CN.ConnectionString ="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=远程的ID,不是本地数据库的ID,完全不一样的;Password=远程的数据库的密码,不是本地数据库的密码;Initial Catalog=远程数据库的名称,不是本地数据库的名称;Data Source=117.41.172.245(远程数据库的IP地址)"    '
 ' = 20    '不要设置路径数据库的时间
 CN.Open
1