局域内数据库连接问题
我做了个简单的调用SQL的程序，使用VB中ADCOD控件，在局域网中，一台电脑安装了SQL数据库，在另一台电脑上，可不可以只安装我编写的程序软件就能运行？需要怎么设置？怎么编写程序，提供一个例子也可以。望指导一下
数据库连接代码更改一下,原来我测试过在局域网是可以的,前提每个电脑要能测试连接到这个安装了SQL的数据库电脑
Dim mycon As ADODB.Connection
Dim rst As ADODB.Recordset
Set mycon = New ADODB.Connection
mycon.ConnectionString = "Provider=sqloledb;server=192.168.1.1;Database=sxcpmc;Uid=sa;Pwd=;"
mycon.Open
Dim stokens() As String
On Error GoTo exectuesql_error
stokens = Split(sql)
If InStr("INSER,DELETE,UPDATE", UCase(stokens(0))) Then
mycon.Execute sql
Else
Set rst = New ADODB.Recordset
rst.Open Trim(sql), mycon, adOpenKeyset, adLockOptimistic
Set ExecuteSQL = rst
End If