本人使用VB利用WINCC格式连接后台SQL2000数据库,代码如下:
sCon = "provider=winccoledbprovider.1;data source=.\wincc;catalog=CC_sql_10_12_30_09_27_21R;user id=;password=;"
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = sCon
conn.CursorLocation = 3
conn.Open sCon
If conn.State = 0 Then
MsgBox "数据库连接不成功,可能是WINCC生产监控系统程序未激活,请先激活监控程序"
conn.Close
Exit Sub
End If
conn.Close
Set conn = Nothing
目的就是想判断WINCC的运行库是否存在,如果不存在给出提示.但是我利用conn.State = 0这句来判断,总是得不到正确的结果,无论我的WINCC是否运行,只要执行了conn.Open sCon,则conn.state就等于1,请问各位大侠,我这么做对吗?问题出在哪呢?