请教--关于连接另一台机子上的数据库的问题

[cjk7]

Public cnn1 As ADODB.Connection

Set cnn1 = New ADODB.Connection
cnn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=f:\db1.MDB;"
cnn1.ConnectionTimeout = 5
cnn1.Open

sqlstr = "SELECT * FROM WHERE 字段4 = '" & ComboBox5.Text & "'"


Set rs1 = New ADODB.Recordset
rs1.Open sqlstr, cnn1
rs1.MoveFirst

我这上面的语句只能连接自己机子上的数据库，如果要连接另一台相同工作组下用户名为lei的机子上F盘中的db1.MDB的数据库，我该怎么写？

[8992026]

做不到

但是可以用共享，即lei的机子上F盘的一个目录共享成比如data

Public cnn1 As ADODB.Connection

Set cnn1 = New ADODB.Connection
cnn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\lei\data\db1.MDB;"
cnn1.ConnectionTimeout = 5
cnn1.Open

sqlstr = "SELECT * FROM WHERE 字段4 = '" & ComboBox5.Text & "'"


Set rs1 = New ADODB.Recordset
rs1.Open sqlstr, cnn1
rs1.MoveFirst