存储过程问题

Question

Private Sub Command1_Click()
    
    Dim cmd As New ADODB.Command
'EXECUTE Operation.dbo.XWMTALL_Send_Message @link_id,@NpoCode,@service_id,@src_terminal_id,@msg,@ErrNum OUTPUT
    
    Set cmd.ActiveConnection = cnWebDb '这个连接打开的是Webdb数据库
    cmd.CommandText = "XWMTALL_Send_Message" '我想执行Operation.dbo.XWMTALL_Send_Message 这个存储过程，我如何做，才能执行，谢谢！
    cmd.CommandType = adCmdStoredProc
    
    cmd.Parameters(1) = "1"
    cmd.Parameters(2) = "102"
    cmd.Parameters(3) = "05"
    cmd.Parameters(4) = "132"
    cmd.Parameters(5) = "222"
    cmd.Parameters(6) = 0
    
    cmd.Execute
    Debug.Print cmd.Parameters(0)
    Debug.Print cmd.Parameters(2)
    Debug.Print cmd.Parameters(6)
    
End Sub

Answer 1

难道就没有人会吗？
还是我提的有问题
CSDN的人都去哪里了？？？

Answer 2

cmd.CommandText = "XWMTALL_Send_Message" '我想用WebDb数据库打开的连接执行Operation.dbo.XWMTALL_Send_Message 这个存储过程，这个存储过程是Operation数据库中，在我如何做，才能执行，谢谢！
难道就没有人会吗？
还是我提的有问题
CSDN的人都去哪里了？？？
不好意思，说这样的话，可能是那两天CSDN出了问题了。

Answer 3

执行存储过程是
exec XWMTALL_Send_Message