[讨论]连接错误

阿丰

我刚学习Access项目，设计一个非绑定窗体，有以下代码：

Dim cmd As ADODB.Command, conn As ADODB.Connection, rst As ADODB.Recordset, strSQL As String

Set conn = New ADODB.Connection

With conn

  .Provider = "SQLOLEDB"

  .ConnectionString = "data source=SAMSUNG-P30;" & _

      "user id=sa;initial catalog=教务管理系统2004DATASQL"

  .Open

End With

运行时出错，显示“用户sa登录失败。原因：未与信任SQL Server连接相关联。”请问应如何改正？