Pb de requetes avec Oracle
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:
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:
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.
