Dans une base SQL Server, j'ai une procédure complexe qui en pourrait
ressembler à :
ALTER PROCEDURE dbo.test AS
select * into #dep from depense
select * from #dep
Je veux l'utiliser dans VB mais elle ne me retourne rien.
Pourquoi ?
Dim cmdPsSynt As ADODB.Command
If serviceUser > 0 And adoPrimaryRS!SRV_AFF <> serviceUser Then
'Cacher les informations
End If
Set cmdPsSynt = New ADODB.Command
cmdPsSynt.ActiveConnection = conn
cmdPsSynt.CommandType = adCmdStoredProc
' cmdPsSynt.CommandText = "dbo.PS_AffaireSyntheseActDep"
cmdPsSynt.CommandText = "dbo.test"
' cmdPsSynt.Parameters.Append cmdPsSynt.CreateParameter("@ci", adVarChar,
adParamInput, 10, adoPrimaryRS!CI_AFF)
' cmdPsSynt.Parameters("@ci").Value = adoPrimaryRS!CI_AFF
Set adoRsSynt = New ADODB.Recordset
Set adoRsSynt = cmdPsSynt.Execute
Set dgSyntDep.DataSource = adoRsSynt
Do Until adoRsSynt.EOF
Debug.Print adoRsSynt(1), adoRsSynt(2)
adoRsSynt.MoveNext
Loop
