PB VB6

PB VB6 - VB/VBA/VBS - Programmation

Marsh Posté le 15-07-2009 à 09:36:14    

Bonjour,
 
Plz je suis une debutante en VB et j'ai une erreur dans une fonction qui affiche les batiments dans une liste voila mon code
 
Dim sql As String
sql = "SELECT * FROM BATIMENT WHERE BAT_CODE='" & id_dossier & "'"
RST.Open sql, CON, adOpenDynamic l'erreur est la :(
Set DG.DataSource = RST
TOTAL = FormatCurrency(GetTotal)
End Sub
 
 
aidez moi svp pr resoudre ce pb

Reply

Marsh Posté le 15-07-2009 à 09:36:14   

Reply

Marsh Posté le 15-07-2009 à 10:12:21    

c'est quoi l'erreur exactement ?
 
RST et CON sont bien instanciés ?

Reply

Marsh Posté le 15-07-2009 à 10:33:28    

Il me donne comme erreur:
 
Impossible d'utiliser cette connexion pour effectuer cette opération. elle est fermée ou non valide dans ce contaxte.
 
pour la déclaration:
 
Dim RST As New ADODB.Recordset
Global CON As New ADODB.Connection
 
Voila et merci pour l'aide

Reply

Marsh Posté le 15-07-2009 à 11:20:46    

Ta connexion il faudrait peut-être lui expliciter à quoi et comment se connecter.

Reply

Marsh Posté le 15-07-2009 à 11:30:58    

oui t'as raison :D
 
j'ai fait l'appel d'une fonction 'SE_CONNECTER' que j'ai crée dans le module , et ca marche.
 
Merciiiiii :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed