Discussion :

[TheReturnOfMuton]

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.

[ProgElecT]

Code :

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

    TextReponse.Text = dbSearch.rdoColumns("column_1") & " " & dbSearch.rdoColumns("column_2") & " " & dbSearch.rdoColumns("column_3")

peut être (le & a la place du +)

[TheReturnOfMuton]

Merci Progelect,
C'est peut-etre ca, j'avais pas tilté avec les "+"...
Je vais tester.