请教ADO和SQL SERVER数据库连接问题-->zhengjialon转移

chaseboy

Set cnn = New ADODB.Connection
'打开连接
cnn.ConnectionString = "rovider=SQLOLEDB.1ersist Security" & _
                "Info=False;" & _
                "User ID=sa;Initial" & _
                "Catalog=personnel;Data Source=JHC08;" & _
                "Use Procedure for Prepare=1;" & _
                "Auto Translate=Trueacket Size=4096;" & _
                "Workstation ID=JHC11;Use Encryption for Data=False;" & _
                "Tag with column collation when possible=False"
               
cnn.Open
If cnn.State = adStateOpen Then
   MsgBox "connection to database successful"
Else
   MsgBox "connection to database unsuccessful"
End If
我用局域网上的SQL SERVER服务器，该服务器放在JHC08，而我在JHC11上用。但connection to database successful和connection to database unsuccessful两个提示都没有，为什么？[em03]

zhengjialon

加上ON ERROR GOTO 11
……
……
11： MSGBOX ERR。NUMBER & ERR.DE……
看一下是否有错。

chaseboy

VB提示连接字符串属性无效！
帮我看看，错在哪

zhengjialon

你从ADO帮助里找一个范例，照着改一下试试，没有源程序很难调试出问题在哪。