VB e Oracle

[kusturyca]

alguém percebe como se chama funções oracle a partir do VB????
este codigo dá erro:

Private Sub Command1_Click()
Conn.Open "Provider=msdaora;Data Source=orfeu;User Id=abel;Password=soares;"
CMD.ActiveConnection = Conn
CMD.CommandText = "gvpack.obtem_dias_aluguer"
CMD.CommandType = adCmdStoredProc

Set param = New ADODB.Parameter
param.Name = "cod_filme"
param.Type = adInteger
param.Value = 1
param.Direction = adParamInput
CMD.Parameters.Append param

Set param = New ADODB.Parameter
param.Name = "ret"
param.Type = adInteger
param.Direction = adParamOutput
CMD.Parameters.Append param


CMD.Execute
Txt.Text = CMD.Parameters("ret").Value

Set rs = Nothing
Set CMD = Nothing
Set Conn = Nothing

obrigado

 

[kusturyca]

Nao Respondam

Obrigado Mas JÀ Resolvi O Problema.
Se AlguÈm Precisar, Aqui Vai A SoluÇÃo:

Muito Simples!!!!!É Possivel Fazer Com FunÇÕes, Mas Para Que Perder Tempo
Usa-se Procedures,simplesmente Acrescenta-se Um Parametro "out" Q Sera O Q A Procedure Ira Retornar!!!!