Bonjour,
Je debute avec les bases de donnees dans VB6, et j'ai un petit probleme :
dans mon programme je cree une connexion avec un pilote ODBC vers une base Oracle :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
    Set objConnection = New rdoConnection
    With objConnection
        .Connect = "DRIVER=" & TextDriver.Text & ";SERVER=" & TextServer.Text & ";DATABASE=" & TextDatabase.Text & ";UID=" & TextUID.Text & ";PWD=" & TextPassword.Text & ";OPTION=0;"
        .CursorDriver = rdUseOdbc
        .Establish
    End With
Ceci fonctionne bien.
Dans une autre fonction je cherche a envoyer une requete et a recuperer des donnees:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
    Set dbSearch = objConnection.OpenResultset(TextRequest.Text, rdOpenKeyset, rdConcurRowVer)
    dbSearch.MoveFirst
    TextReponse.Text = dbSearch.rdoColumns("column_1") + " " + dbSearch.rdoColumns("column_2") + " " + dbSearch.rdoColumns("column_3")
Mais cette fonction retourne une erreur...
La requete en elle-meme fonctionne avec SQL Plus (elle retourne le resultat), mais dans mon programme ca plante...
Pourriez-vous me depanner svp ?
Merci d'avance.