大家好!我现在要做一个系统,cs结构的,我自己机子上装有vb6.0,sql server2000个人版,数据库名CustomerOrdersDB,下面是数据库连接代码: Public conn As New ADODB.Connection Set conn = New ADODB.Connection With conn .CursorLocation = adUseClient .CommandTimeout = 10 ' 连接到SQL Server数据库 .ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=True;" & _ "User ID= sa ;Initial Catalog= CustomerOrdersDB" & _ ";Data Source=DFD4E1F5E30C45F;pwd=" .Open End With 。。。。。
编译成可执行文件后在我自己机子上能运行,但我把做好的文件考在别的机子上,为什么不能运行!客户端不用装SQL不是吗? 我的程序中没有有ADO控件,全部是以下面的形式实现的: Dim strSQL$ Set rs = New ADODB.Recordset '连接到数据库 。。。。
strSQL = " select * from OrdersTab where OrdersMan = '" & curUserName & "' " rs.Open strSQL, conn, 3, 3 Set DataGrid_Orders.DataSource = rs 问题:1、我没有生成安装程序不可以吗?我直接把包括可执行文件的全部文件考到要用的几位员工机子上,但点击运行出现以下问题: 连接失败: SQLState'01000' SQLServer错误:10060 [Micrsoft][ODBC SQL Server Driver][TCP/IP Sockets]Connection Open(Connect()) 连接失败: SQLState'08001' SQLServer错误:17 [Micrsoft][ODBC SQL Server Driver][TCP/IP Sockets]SQLServer不存在或拒绝被访问 请问在客户端要建立数据源吗? 2、我就数据库放入公司的Fserver服务器上,将DFD4E1F5E30C45F改为Fserver如下: Public conn As New ADODB.Connection Set conn = New ADODB.Connection With conn .CursorLocation = adUseClient .CommandTimeout = 10 ' 连接到SQL Server数据库 .ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=True;" & _ "User ID= sa ;Initial Catalog= CustomerOrdersDB" & _ ";Data Source=Fserver;pwd=" .Open End With 。。。。。 系统在我机子上能运行,(我重新编译了),但在其他用户机子上仍不能运行,这是为什么呀? 以前在学校只做过单机版的,自己做的在自己机子上运行的那种!让大家见笑了!还请各位高手帮帮忙!不胜感激!