vb执行存储过程带参数的提示语法错误或违反访问规则请问如何改写

[yiminglian]

Private Sub Command1_Click()
CNN
cn.CursorLocation = adUseClient
cn.Open ConnectionString
Set rs1 = cn.Execute("testing_KX @订单编号='" & Text1.Text & "'", , adCmdStoredProc)
Set DataGrid1.DataSource = rs1
Label2.Caption = rs1("序号")
Set rs2 = rs1.NextRecordset()
Set DataGrid2.DataSource = rs2
Label3.Caption = rs2("计数")
End Sub
提示语法错误或违反访问规则
如果存储过程不带参数则没有问题

[Tiger_Zhao]

看帮助啊。
adCmdStoredProc 的意思就是第一个参数直接是一个存储过程的名称。
如果不仅仅是名称还有参数，应该用 adCmdText。

[yiminglian]

引用 1 楼 Tiger_Zhao 的回复:

看帮助啊。 adCmdStoredProc 的意思就是第一个参数直接是一个存储过程的名称。 如果不仅仅是名称还有参数，应该用 adCmdText。

查了资料有点蒙圈自己搞了一下Set rs1 = cn.Execute("T_T样例 @编号='" & Text1.Text & "'") 这样没问题吧