7,763
社区成员
发帖
与我相关
我的任务
分享远程写入access数据!急
需要在任何网络地址中连接222.208.xxx.xxx中的一个数据库
然后写入数据
本来考虑用ADO实现
不过有人说不安全
哪位大哥给个好的意见
然后写入数据
本来考虑用ADO实现
不过有人说不安全
哪位大哥给个好的意见
...全文
请发表友善的回复…
发表回复
ryuginka 2005-01-11
- 打赏
- 举报
是啊。远程的更要考虑安全性问题
taosin 2005-01-11
- 打赏
- 举报
同意上一层！ＳＱＬ Ｓｅｒｖｅｒ 比Ａｃｃｅｓｓ 安全很多！关于这一方面的资料ＣＳＤＮ很多！
liul17 2005-01-11
- 打赏
- 举报
不过建议你用 sqlserver
liul17 2005-01-11
- 打赏
- 举报
也可参看下面代码
Private Sub ComOK_Click()
Dim SQLstr As String,cnstr AS String
Dim cn AS New ADODB.Connection'连接对象
Dim rs As New ADODB.Recordset'记录集对象
cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\\myServer\c:\inetpub\wwwroot\yourdb.mdb" '连接字符串
cn.open cnstr' 打开数据库连接
rs.CursorLocation =adUseClient
sqlstr="slect * from XXX表"
rs.open sqlstr,cn,3,3'执行SQL语句，并返回记录
set datagrid1.datasource=rs
datagrid1.refresh
rs.close'关闭记录集对象
set rs=nothing
End Sub
本示例是将数据库中的一张表的记录显示在datagrid的控件中。
注：myserver为服务器名可以为IP地址。
Private Sub ComOK_Click()
Dim SQLstr As String,cnstr AS String
Dim cn AS New ADODB.Connection'连接对象
Dim rs As New ADODB.Recordset'记录集对象
cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\\myServer\c:\inetpub\wwwroot\yourdb.mdb" '连接字符串
cn.open cnstr' 打开数据库连接
rs.CursorLocation =adUseClient
sqlstr="slect * from XXX表"
rs.open sqlstr,cn,3,3'执行SQL语句，并返回记录
set datagrid1.datasource=rs
datagrid1.refresh
rs.close'关闭记录集对象
set rs=nothing
End Sub
本示例是将数据库中的一张表的记录显示在datagrid的控件中。
注：myserver为服务器名可以为IP地址。
liul17 2005-01-11
- 打赏
- 举报
看看这个帖子：
http://community.csdn.net/Expert/topic/3455/3455443.xml?temp=.8939173
http://community.csdn.net/Expert/topic/3455/3455443.xml?temp=.8939173
shortppsy 2005-01-11
- 打赏
- 举报
能说说具体步骤吗?
samwzhang 2005-01-11
- 打赏
- 举报
ADO+COM+不就结了
