类似李洪根这样的高手请出手帮忙 ！

[jary12581]

1.用vb+ado+sql开发了一个管理系统，sql做后台数据库。请问当程序在服务器上运行时，局域网里的其他机器如何共享服务器上sql数据库中的数据，以便其他机器也可以运行该程序。
2.满足上述条件的connectionstring代码如何写？

[lihonggen0]

象这样：


工程--->引用--->Microsoft ActiveX Data Object 2.x（版本号）

Dim CN As New ADODB.Connection '定义数据库的连接
Dim Rs As New ADODB.Recordset
CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
CN.Open
Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockOptimistic
msgbox rs.recordcount

[lihonggen0]

CN.ConnectionString = "Provider=sqloledb;Data Source=服务器;Initial Catalog=数据库;User Id=用户名;Password=密码;"


只要在你的局域网一台机器上装有SQL SERVER数据库

其它客户端都可以访问这台机器上的数据

[betagain]

可以 CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;" 直接访问

也可以通过odbc

[lihonggen0]

你可以将你写的程序用VB的打包工具打包后

到其它客户端上安装

打包的时候，要打包上Mdac_typ.exe(微软数据访问引擎）