当运行 如下代码Public connstr As String
Public conn As ADODB.ConnectionPrivate Sub Form_Load()
connstr = "provider=sqloledb;" & "data source=xiaodeng;" & "initial catalog=BookStoreForVB6;" & "user id=sa;" & "password=;"
Set conn = New ADODB.Connection
conn.ConnectionString = connstr
conn.Open
End Sub
为什么会出现   未与信任的SQL SERVER相关联

解决方案 »

  1.   

    未与信任SQL Server连接相关联的解决方法:
    http://www.knowsky.com/300492.html
      

  2.   

    Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=cti;Data Source=zqPublic connstr As String
    Public conn As ADODB.ConnectionPrivate Sub Form_Load()
    constr="Provider=SQLOLEDB.1;password=;Persist Security Info=False;User ID=sa;Initial Catalog=BookStoreForVB6;Data Source=xiaodeng"
    Set conn = New ADODB.Connection
    conn.ConnectionString = connstr
    conn.Open
    End Sub
      

  3.   

    不行啊 好是出现未与信任的SQL SERVER相关联
      

  4.   

    还是sql server企业管理器登陆配置那块没有设置好