注册 登录
编程论坛 ACCESS论坛

Help!

Arqi_Sun 发布于 2008-07-09 11:08, 1245 次点击
请各位大侠看看下面在access中编写的连接SQL的代码有何问题?如果有如何可以实现将SQL的记录集设为窗体的记录源?在次现谢谢了!
Private Sub Form_Open(Cancel As Integer)
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset

    conn.ConnectionString = "Driver={sql server};server=10.10.1.20;uid=sa;pwd=;database=MRPII"
    conn.ConnectionTimeout = 30
    conn.Open

rs.Open "select MA001,MA002,MA003,MA004 from INVMA", conn, adOpenStatic, adLockReadOnly, adCmdText
MsgBox rs.Fields("MA003").Value
Me.RecordSource = rs
End Sub
0 回复
1