急呀,怎样调存储过程呀vb

Question

请问各位我用ORACLE写的存储过程但是我在VB中不知道怎样用呀请指教呀我现在很急的呀
我的存储过程如下呀
create or replace procedure count_num
(i_name in aaa.c_name%type,
 i_count out number(4)
)
as
begin
 select count(*) into i_count from aaa where c_name:=i_name;
 
end;
请指教怎样调用呀很急的呀

Answer 1

Orcal我不懂，但知道在SQL SERVER下怎样用
不是针对你的存储过程的
看一下例子或帮助
Set cmdLogin = New ADODB.Command
  Set cmdLogin.ActiveConnection = gConnection
  cmdLogin.CommandType = adCmdStoredProc
  cmdLogin.CommandText = "spLogin"
  Set prmPara = cmdLogin.CreateParameter("@strOperatorID", adChar, adParamInput, 8, strID)
  cmdLogin.Parameters.Append prmPara
  Set prmPara = cmdLogin.CreateParameter("@strOperatorName", adChar, adParamOutput, 8)
  cmdLogin.Parameters.Append prmPara
  Set prmPara = cmdLogin.CreateParameter("@strOperatorPass", adChar, adParamOutput, 8)
  cmdLogin.Parameters.Append prmPara
  cmdLogin.Execute

Answer 2

我想不管是什么数据库，都可以用吧
command.parameters.....

Answer 3

Set mcmd = New ADODB.Command
    mcmd.ActiveConnection = cn
    mcmd.CommandType = adCmdText
和SQLserver差不多，只是这儿写的时候，要有用户名和所在的包。
    mcmd.CommandText = "{call sa.pkgTree.PROC_TREE1(?,?,{resultset 0,myret})}"
    With mcmd
       Set mPara = .CreateParameter(, adInteger, adParamInput, , 0)
       .Parameters.Append mPara
       Set mPara = .CreateParameter(, adInteger, adParamInput, , g_ProductID)
       .Parameters.Append mPara
    End With
    Set rs.Source = mcmd
    rs.CursorLocation = adUseClient
    rs.LockType = adLockReadOnly
    rs.Open
    Set mcmd = Nothing