20491.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 26 行
HTML
26 行
<html> <head> <title>请问ADO物件如何传参数给stored procedures</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>请问ADO物件如何传参数给stored procedures</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:cat0408@ms18.hinet.net">Joint</a> on October 21, 1999 at 17:55:16:<p>我在资料库里有一个stored procedures ,myproc1<br>里有二个变数@aa,@bb (char)<br>我在Query Analyzer中带参数执行无误,<br>可是我在VB程式中<p>Private Sub Command1_Click()<br> Dim db As Connection<br> Dim cmd As New ADODB.Command<br> Set db = New Connection<br> Dim Parm As New Parameter<br> Dim Parm2 As New Parameter<br> <br> Parm = "AAA"<br> Parm2 = "BBB"<br> db.CursorLocation = adUseClient<br> db.Open "PROVIDER=MSDASQL;dsn=GDMS_sql;uid=sa;pwd=;"<br> <br> Set cmd.ActiveConnection = db<br> <br> Set adoPrimaryRS = New Recordset<br> cmd.CommandType = adCmdStoredProc<br> cmd.CommandText = "{call myproc1 ?,?}"<br> Set adoPrimaryRS = cmd.Execute(parm,parm2)<br> Set grdDataGrid.DataSource = adoPrimaryRS<p>End Sub<p>为什么不行都发生错误??在cmd.Excute那一行说我的Sql语有误.<br>拜托!!请高人指点!!告诉要怎么下指令...<br>我试了好久了..快要疯掉了!!<p><p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20491--><!--top: 20504--><li><a href="20504.html">自问自答</a> <b>Joint</b> <i>00:45:56 10/22/99</i>(<!--responses: 20504-->0)<ul><!--insert: 20504--></ul><!--end: 20504--></ul><!--end: 20491--><br><hr size=7 width=75%><p></body></html>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?