Discussion :

[Kloun]

Bonjour,

J'ai créé une fonction pour récupérer mes données sur un serveur SQL :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Public Function ADOSelectSQL(pStr_SQL As String) As ADODB.Recordset
Dim iADO_Command As ADODB.Command
 
    On Error GoTo Erreur
    If Not TestConnection Then
        ADOInitConnection
    End If
 
    Set iADO_Command = New ADODB.Command
    iADO_Command.ActiveConnection = gADO_Connection
    iADO_Command.CommandText = pStr_SQL
    iADO_Command.CommandTimeout = 1500
 
    Set ADOSelectSQL = iADO_Command.Execute(, , adCmdText)
    Exit Function
    'Gestion d'erreur
    ...
end function

Je fais appel à cette fonction de cette façon :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

set rst = ADOSelectSQL (LeSQL)

La fonction est OK, j'ai bien des données dans le recordset ADOSelectSQL.
Par contre, dans le rst, j'ai plus rien...
Comprends pas.

Quelqu'un aurait-il une idée ?
Merci.

[Dolphy35]

Salut,

rst correspond à quoi ?

Je ne suis pas sûr que cette façon pour instancier soit correcte

Pourquoi ne pas charger ton jeu d'enregistrements recupérer dans ta fonction dans une tble temporaire ?

Dolphy

[Kloun]

Merci pour la réponse, mais j'ai relancé l'appli et ça fonctionne nickel maintenant ...

[Dolphy35]

re,

Et bien écoute tant mieux.