Bon, j'suis a cours d'idée.
j'essaie de rouler une stored procedure a partir de vb qui retourne une valeur, mais a date, elle me retourne toujours nulle... j'imagine y'a un conflit de qqpart, mais je trouve pas.
voici mon code pour la connection :
Code :
Dim cn As ADODB.Connection
Dim cmd As ADODB.Command
Dim strConnOLEDB As String
Dim intEventID As Long
On Error GoTo ErrTrouver_AutoCloseEvent
strConnOLEDB = strNetIQConn
Set cn = CreateObject("ADODB.Connection")
cn.Open strConnOLEDB
Set cmd = CreateObject("ADODB.Command")
Set cmd.ActiveConnection = cn
cmd.CommandText = "P_SP_Trouver_AutoCloseEvent"
cmd.CommandType = adCmdStoredProc
fncEventID = (Mid(fncEventID, 2, (Len(fncEventID) - 2)))
intEventID = CLng(fncEventID)
With cmd
.Parameters.Append .CreateParameter("Parm1", adVarChar, _
adParamInput, 20, fncEventID)
.Parameters.Append .CreateParameter("ParmOut", adVarChar, _
adParamOutput, 20)
End With
cmd.Execute
Trouver_AutoCloseEvent = cmd.Parameters(1).Value
mes connections sont correcte (du moin je pense)
si je run le code de la stored procedure dans SQL analyser, ca marche
si je run la stored procedure a partir de SQL analyser, ca marche.
quoi faire?
Connexion
Inscription
FAQ
Rechercher
