回 帖 发 新 帖 刷新版面

主题:[讨论]这样连接SQL服务器出错!!帮我看下`

Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString = "Driver={sql server};server=218.0.*.*;uid=sa;password=***;database=mirworlddb"
conn.Open
sql = "insert into TBL_ACCOUNT(ACCOUNT,PASSWORD)values('lqh201','6585201')"
rs.Open sql, conn, adOpenKeyset, adLockOptimistic
MsgBox "注册成功!"

这样用VB运行,说是SQL SERVER不存在或访问被拒绝``
SA和密码都正确 ,SQL服务管理器 也运行了``
大家帮我看下 是不是 connectionstring 不对

回复列表 (共4个回复)

沙发

Driver={sql server};server=218.0.*.*;uid=sa;password=***;database=mirworlddb"
改称这样行吗?
Provider=SQLOLEDB.1;Password=***;Persist Security Info=True;User ID=sa;Initial Catalog=mirworlddb;Data Source=(218.0.*.*)

板凳

改成这样还是一样的错误

3 楼

对了```按你说的 

我把data source 后面的 两个括号(  )去掉了```可以用`

但我只是本地的`还没测试远程

4 楼

哦,对了,我是忘了,我直接把以前的代码复制过去,以前那个里面是(local),所以忘删()了

我来回复

您尚未登录,请登录后再回复。点此登录或注册