Discussion :

[ludogoal]

Bonjour,
J'ai un ADOQuery déclaré de la manière suivante:

Code :

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

1
2
3
4
5
6
7
adoQuery.CursorLocation := clUseServer;
        adoQuery.CursorType := ctOpenForwardOnly;
        adoQuery.LockType := ltReadOnly;
        adoQuery.SQL.Clear;
        adoQuery.SQL.Add('SELECT DISTINCT '+ sNomSchema + '.' + sNomTable + '.' + sNomChamp);
        adoQuery.SQL.Add('FROM '+ sNomSchema + '.' + sNomTable);
        adoQuery.Active:=True;

Suite à ce code, si la table en question contient plusieurs enregistrements, je n'ai pas de problème, par contre si la table ne contient qu'un seul enregistrement, suite à ce code, adoQuery.RecordCount vaut "-1" alors que si je prend la requête et la lance directement dans Management Studio, j'ai bien mon champ avec sa valeur..... Je ne comprends pas pourquoi, j'ai beau chercher, je ne trouve pas.....

Help please!!!!!!!!

[SergioMaster]

des points pour séparer les champs !?

[ludogoal]

Non, les points sont là pour faire ça:
SELECT DISTINCT NomDuSchéma.NomDeLaTable.NomDuChamp
FROM NomDuSchéma.NomDeLaTable

[ludogoal]

Enfin de compte le scénario est plutôt que mon ADOQuery ne renvoie jamais le premier enregistrement et donc quand il n'y en a qu'un... et bien je n'est rien!!!!

[ludogoal]

En fait, sans que je ne comprenne le pourquoi du comment, j'ai trouvé ce qui me fait perdre le premier enregistrement....
En fait après le code fourni je fais un parcourt comme suit:

Code :

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

1
2
3
4
5
adoQuery.First;
while not dmMain.adoQuery.eof do
begin
   Mon code
end;

Et en fait, c'est le "First" qui me fait passer à l'enregistrement suivant!!!!!!
Si quelqu'un a une explication pour moi, je suis preneur

[od.dev]

Euh...
sauf erreur de ma part, ton adoQuery.First ne fait rien... s'il est placé juste après ton Open.
Open déclenche le remplissage de l'ensemble de données,
créé le curseur, et le place sur le premier enreg.

[Rayek]

En fait, sans que je ne comprenne le pourquoi du comment, j'ai trouvé ce qui me fait perdre le premier enregistrement....
En fait après le code fourni je fais un parcourt comme suit:

Code :

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

1
2
3
4
5
adoQuery.First;
while not dmMain.adoQuery.eof do
begin
   Mon code
end;

Et en fait, c'est le "First" qui me fait passer à l'enregistrement suivant!!!!!!
Si quelqu'un a une explication pour moi, je suis preneur

Quel version de delphi utilises tu ?
Delphi 5 ? si oui, il faut patcher delphi 5 car il y avait un soucis avec les composants ADO à une époque

[ludogoal]

Euh...
sauf erreur de ma part, ton adoQuery.First ne fait rien... s'il est placé juste après ton Open.
Open déclenche le remplissage de l'ensemble de données,
créé le curseur, et le place sur le premier enreg.

Oui, nous sommes d'accord, mais je met toujours un First avant une boucle pour être certain d'être sur le premier enregistrement avant de boucler sur l'ensemble de données... Et puis en théorie le First ne devrait pas avoir ce comportement......

Je suis en Delphi 7 donc à priori pas de problème de ce côté là, enfin pas à ma connaissance...

Merci pour votre aide

[ShaiLeTroll]

ADO SQL Server (on devine avec le "Management Studio")

tu as essayé sans modifier toutes ces prorpriétés ?

Code :

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

1
2
3
  adoQuery.CursorLocation := clUseServer;
  adoQuery.CursorType := ctOpenForwardOnly;
  adoQuery.LockType := ltReadOnly;

Faut être sur de soi pour modifier ça, perso, je ne l'ai jamais fait et en MySQL ou Oracle, je n'ai jamais eu ce problème de ligne manquante !

OpenForwardOnly, c'est pour passer en mode unidirectionnel, First() et Next() sont les seules méthodes de déplacement autorisés en mode unidirectionnel pour DBExpress , ça serait quand même dommage que cela soit buggé, il faudrait vérifier la doc microsoft au sujet du ctOpenForwardOnly et First, est-ce autorisé en ADO ?

as-tu une différence de comportement si tu mets First() ou pas ?

Ta clé primaire est correcte ? elle commence bien à 1 (en tout cas pas zéro)

En fait, en y reflechissant, je crois qu'après un Open, je mettais rarement de First, dès souvenir avec InterBase avec un First qui plante si requête vide (merci IsEmpty)