problème de requete avec sql2005

bonjour

j'ai un problème que je n'arrive pas à resoudre alors j'espère que qq 1 pourra m'aider.

J'ai un recordset qui ne retourne aucun enregistrement lorsque j'execute mon code alors que dans sql directement la meme requete me retourne 4 enregistrement !!!
Je n'ai pas de message d'erreur juste recordcount=0 :evilred:

Je ne sais plus quoi faire !!!
Pour info je suis en VB6

Merci d'avance
Sandra

Citation:

---

........
lorsque j'execute mon code
.........

---

Et tu nous l'as mis ou le code pour que l'on puisse te donner un coup de mains 8O

Bonjour

voici le bout de code que j'execute et qui ne retourne rien

Code:

---

1 2 3 4 5 6

Set mvarRecordsetFacture = New ADODB.Recordset mvarRecordsetFacture.Open sql, baseM, adOpenKeyset If mvarRecordsetFacture.RecordCount > 0 Then traitements des enregistrements End if

---

sql est ma requete qui fonctionne
baseM est la chaine de connexion à la base qui est correct.

Je ne rentre jamias dans le traitement des enregistrements car recordcount=0 (j'ai aussi essayé avec EOF et ça ne marche pas non plus ) alors que ça devrait retourner au moins 1 enregitrement.

Merci d'avance
Sandra

bonjour,

j'ai eu quelques soucis de ce genre il y a fort longtemps dans le cas d'utilisation de table temporaire sous SQL SERVER: le nombre d'enregistrements n'était pas renvoyé donc l'utilisation du .recordcount n'était pas valide.

insérer dans la procédure stockée le code "set nocount on":

Code:

---

1 2 3 4 5

create maProcedure <parametres> as set nocount on ...

---

sous VB6, pour récupérer le nombre d'enregistrements, il faudra faire avec la recorset résultat recRdst:

Code:

---

1 2 3 4

Dim lngNbRecord As Long Dim recRdst as ADODB.Recordset ... lngNbRecord = recRdst.RecordCount

---

cdlt,

Merci de votre réponse je vais essayer mais je n'utilise pas de table temporaire dans ma requete.

Le pire c'est que ça marche sur le poste d'un collègue qui a SQL2005 Express mais pas chez la cliente :evilred:

Je vais refaire qq tests .

Sandra

ça change rien :cry:

Qq1 a une idée car là je seche completement !!!

Sandra

Bonjour,

Le chemin pour trouver la base est-il correct?
Si le recordcount=0,c'est que tu trouves une base vide.

Citation:

---

Le pire c'est que ça marche sur le poste d'un collègue qui a SQL2005 Express mais pas chez la cliente

---

car si celà fonctionne autre part ,le problème est peut-être ailleurs et pas nécessairement là où on le pense.

A+ et bon courage

A essayer, pour debug

Code:

---

1 2 3 4 5 6

On Error Resume Next mvarRecordsetFacture.Open sql, baseM, adOpenKeyset mvarRecordsetFacture.MoveFirst If Err.Number <> 0 Then MsgBox "Erreur N° " & Err.Number & vbCrLf & "Description: " & vbCrLf & Err.Description End If

---

Il faudra que tu ais paramétré dans ton éditeur avec, Outils => Options => Onglet Général,
Récupération d'erreur => Arrêt sur les erreurs non gérées.

Bonjour,

j'ai fait les tests avec le numéro de l'erreur mais je n'ai rien .
Il n'y a pas d'erreurs d'execution de la requete.:arf:

je ne sais plus quoi faire!!!

Sandra

Ta clause sql n’est peut-être pas exactement transposable en l’état dans VB6, ou tout du moins, sa syntaxe est peut-être a adapter.
Que contient ta variable sql au moment de l’open ?

Sinon, as-tu vraiment besoin de savoir le nombre d’enregistrement renvoyé par ton Recordset.
Rien ne devrait empêcher de boucler de cette façon pour extraire les enregistrements.
Bien que

Citation:

---

(j'ai aussi essayé avec EOF et ça ne marche pas non plus )

---

des fois que tu n'ais pas bien employé cette proriété.
Essais encor ceci

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Set mvarRecordsetFacture = New ADODB.Recordset Debug.Print sql mvarRecordsetFacture.Open sql, baseM, adOpenKeyset If Not mvarRecordsetFacture.EOF Then Dim T As Long mvarRecordsetFacture.MoveFirst ' placement sur le 1° enregistrement Do While Not mvarRecordsetFacture.EOF 'traitements des enregistrements '............................... mvarRecordsetFacture.MoveNext 'avance d'un enregistrement DoEvents T = T + 1 Loop Debug.Print "Nbr. d'enregistrement: " & CStr(T) Debug.Print "RecordCount = " & CStr(mvarRecordsetFacture.RecordCount) mvarRecordsetFacture.Close Else Debug.Print "Hélasse, il y a bien un problème" End If

---

ça y est c'est résolu :yaisse2:

Le problème venait du left join car la table etait vide!!!
Ce qui est bizarre c'est que ça ne le fait pas tout le temps puisque ça marche avec SQL 2005 express.

Merci à tous ceux qui m'ont aidé

Sandra

Bonjour Sandra.

Il faut toujours se méfiier, le problème n'est pas toujours là où on le croit.
C'est un concept que j'ai appris par expérience.
Alors il faut parfois chercher où on croit qu'il ne peut pas y avoir d"erreur.

A+ et bon courage

bonjour,

ceci est un problème qui revient souvent: tester une application avec une base de données de test dans laquelle figurent des enregistrements.

nous oublions parfois de tester notre application sur une base de données entièrement vierge (telle qu'elle serait lors d'une installation sur un nouveau site client).

nous nous apercevons alors que la gestion n'est pas implémentée: les conséquences peuvent être désastreuses...

cdlt,

Bonjour,

Bien vu littledoudou et avec raison
Tester avec 'rien est une bonne solution et moi de mon coté ,je n'emploie jamais le 'on error goto ou 'resume next, car j'estime qu'un logiciel
'bien conçu n'a pasbesoin de ces commandes(sauf cas spéciaux bien sûr)

A+ et cordialement