导航
  • 主页
  • 基础类
  • 应用实例
  • 新技术前沿

怎样用VBA实现对局域网内另外一台计算机上SQL Server 的读写啊,很急希望高手指教,送50分

cqin126 2003-12-28 03:04:47
我用的是ADO,在本地读写一点问题都没有,程序如下,
Dim cn_list As New ADODB.Connection
Dim rs_list As New ADODB.Recordset
Dim SQL3 As String
SQL3 = "SELECT * FROM [key]"

With cn_list
.Open "Driver={SQL Server};server=QINCHUAN;uid=sa;pwd=829698;database=newdatabase"
End With

rs_list.Open SQL3, cn_list, adOpenDynamic, adLockPessimistic, adCmdText
...全文
15 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
yadongfile 2003-12-28
只需要在cn_list 把本地服务器换成需要的ip地址就可以了 不需要其他的改变
回复
dlpseeyou 2003-12-28
Dim cn_list As New ADODB.Connection
Dim rs_list As New ADODB.Recordset
Dim SQL3 As String
SQL3 = "SELECT * FROM [key]"

With cn_list
.Open "Driver={SQL Server};server=QINCHUAN;uid=sa;pwd=829698;database=newdatabase"
End With
if rs_list.state=1 then rs_list.close
rs_list.Open SQL3, cn_list,3,2
回复
发动态
发帖子
MS-SQL Server
创建于2007-09-28

3.2w+

社区成员

MS-SQL Server相关内容讨论专区
申请成为版主
社区公告
暂无公告