VB6.0连接SQL数据库出现问题
Private Sub lianjieSQL()
On Error Resume Next
'Dim DBconnect As New ADODB.Connection
Dim conn As New ADODB.Connection
' Set conn = New ADODB.Connection
'建立无源数据库连接
conn.ConnectionString = "server=.;integrated security=SSPI;Database=tupian"
conn.Open
MsgBox conn.State
End Sub
代码如上，我觉得我的代码写的没问题啊，但是conn.state=0;为啥啊？tupian是我的数据库名称
[解决办法]
这个也能用？驱动都没有声明？用户名 密码呢？
[解决办法]
是没问题，如果打不开数据库连接会有错的
经测vb.net中是正常的,状态为ConnectionState.Open即为1
[解决办法]
把.改为计算机名或IP地址试试
[解决办法]
等待.学习sql数据库连接
[解决办法]
你添加一个adodc控件, 然后使用这个控件连接数据库, 连完之后就可以得到正确的ConnectionString了
