Question

VB本地连接SQL数据库,实时错误:连接字符串属性无效.

在模块中：
Public adoCon As New ADODB.Connection
Public adoRs As New ADODB.Recordset
Public CnnStr As String
Public Sub Main()
CnnStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=damonf;password ＝fjq;Initial Catalog=db_APDBMS;Data Source=."
If adoCon.state = adStateClosed Then adoCon.Open (CnnStr)
End Sub
运行时：提示实时错误，连接字符串属性无效。
错误指示在：adoCon.Open (CnnStr)
请问，应该怎么改？谢谢~

Answer 1

你sql语句都没有。。还连接神马？

追问

这是模块中的，其他窗体中可以引用模块中的主函数啊。。。

Answer 2

dara source=?????
没有指定要访问是数据库文件或数据源吧！！