[VB6] RecordSet, Oracle, requête sur plusieurs Tables
Bonjour,
J'ai un probléme avec les RecordSet de VB et Oracle. J'ai une requête dans laquelle j'effectue une jointure entre 2 tables, cette requête passe parfaitemenent en ligne de commande Oracle [via SQL*Plus Worksheet] mais dès lors que j'utilise mon recordset, celle ci ne retourne aucun enregistrement, j'ai pu le vérifier via la propriété recordCount (= 0), mais ne génére pas d'erreur.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
'on efface les resultats de la précédente recherche
listProp.ListItems.Clear
connect 'fonction de connexion a la BDD
Dim rcdRecord As ADODB.Recordset
Set rcdRecord = New ADODB.Recordset
Dim index As Integer
Dim strRequete As String
Dim strRecherche As String
strRecherche = Replace(txtSearch.Text, "'", "''")
'On formule la selection et la jointure de cette longue requête
strRequete = "SELECT proprietaire.idProp,nomProp,preProp," & _
"nomC,dateInscription," & _
"ville,typeVoie,nomVoie " & _
"FROM proprietaire,adrProprietaire " & _
"WHERE proprietaire.idProp = adrProprietaire.idProp "
[...]
'Une fois celle ci formulé, on l'exécute et on affiche les resultats
'dans notre listView
rcdRecord.Open strRequete, connexion
'txtSearch.Text = strRequete
index = 1
While rcdRecord.EOF = False
[...]
index = index + 1
rcdRecord.MoveNext
Wend
rcdRecord.Close |
J'ai l'impression que l'erreur provient du fait que la requête cible 2 tables, d'ailleurs un simple "SELECT * FROM proprietaire" marche, alors qu'un "SELECT * FROM proprietaire, adrProprietaire" ne fonctionne pas (alors qu'il passe trés bien en ligne de commande oracle).
Je sais que cette requête est syntaxiquement correctement niveau sql. Je ne vois pas d'où vient l'erreur, je ne connais pas tout sur les RecordSet de VB j'ai d'ailleurs commencé la lecture de ce document ftp://ftp2.developpez.be/developps/v...sets%20ADO.pdf où je trouverai peut être les réponses a mon problème mais au cas ou quelqu'un aurai la réponse ca me permettrai d'aller plus vite...
