CSDN博客

img lang_csdn

在VB中执行存储过程!

发表于2004/11/3 20:23:00  1393人阅读

分类: VB6.0

Sub cmd()
Dim iCmd As ADODB.Command
Dim iRe&

Set iCmd = New ADODB.Command
With iCmd
    .ActiveConnection = iConc   '数据库连接字符串
    .CommandType = adCmdStoredProc
    .CommandText = "存储过程名"
    .Parameters.Refresh '创建存储过程参数
    .Parameters("@输入参数1") = "值1"   '为参数赋值
    .Parameters("@输入参数2") = "值2"
   
    .Execute    '执行存储过程
   
    Debug.Print .Parameters("@输出参数1")   '显示存储过程的执行结果
    Debug.Print .Parameters("@输出参数2")
End With
End Sub

阅读全文
0 0

相关文章推荐

img
取 消
img