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.
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).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
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...
Partager