看板Programming
标 题Re: [VB6] 如何用vb开启网路上的资料库?
发信站不良牛牧场 (Fri Dec 14 08:11:21 2007)
转信站ptt!ctu-reader!ctu-gate!news.nctu!news.ncu!news.yzu!zoonews.ee.ntu!Sim
※ 引述《[email protected] (威利.史密斯.陈)》之铭言:
: Private Sub Form_Load()
: Dim cn As New ADODB.Connection
: Dim rs As New ADODB.Recordset
: cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path &
: "\db_medicine.MDB"
: rs.Open "tb_kc", cn, adOpenKeyset, adLockOptimistic
: Set MSHFlexGrid1.DataSource = rs
: MSHFlexGrid1.ColWidth(0) = 100
: End Sub
: 我只知道开启电脑中的资料库...
: 有办法开启网路上
: 例:192.168.0.2的资料库吗?
: cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.0.2\c$\db_medicine.MDB"
只要你有存取权限的话....
--
╭──── Origin:
<不良牛牧场> bbs.badcow.com.tw (210.200.247.200)─────╮
│ ↘ Welcome to SimFarm BBS -- From : [220.133.218.31] │
╰◣◣◢ ◢◢《不良牛免费拨接→电话:40586000→帐号:zoo→密码:zoo》 ◣◣◢ ─╯