Discussion :

[houbi2b]

Bonjour,

Je tente d'effectuer un select aléatoire d'une ligne dans une bd access en vb.net.
J'ai tester la requête dans Access et elle fonctionne comme il faut. J'utilise order by rnd(table.id) pour sélectionner la ligne aléatoirement. Cependant dans la prog vb, la ligne est toujours la même...
Je vois pas d'où peut venir le problème, si quelqu'un a une piste...

[asmduty]

Le problème c'est lq fonction rafom de VB ...
En fait ça choisit aléatoirement mais toujours selon la même logique.
Donc tu vas avoir comme série aléatoire toujours la même. Exemple : 8, 19, 3, 7, 21, 5 etc. a chaque fois que tu rééxecutes ton programme.

La piste la plus facile pour changer ça serait de recalculer le résultat du random en fonction de l'heure, des minutes, des secondes, un truc du genre.

Si toutefois ça ne te dérange pas et que tu veux seulement ne pas toujours te retrouver avec 8 pendant l'éxécution du programme, il faut que tu ne rédéclare pas un random à chaque fois, mais que tu réutilise le même, sinon il entame à chaque fois la série, donc il te retournera chaque fois 8.

[houbi2b]

salut, merci pour ta réponse. Cependant la fonction rnd que j'utilise n'est pas celle de vb, elle est dans la requête:

Code :

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

1
2
 
SELECT TOP 1 * FROM truc WHERE truc.nom='toto' ORDER BY rnd(truc.id);

Dans l'utilitaire de requête d'Access la requête me renvoi bien un résultat différent à chaque exécution.

Dans mon cas, la fonction rnd() est une fonction sql pas une fonction de vb.

J'ai tout essayé mais rien à faire, prise seule dans Access la requête marche mais pas dans le prog en vb....

[asmduty]

Ah quand tu disais dans le programme VB le résultat est toujours le même je pensais que tu le générais cette fois avec le VB.
Du coup je ne vois plus vraiment où peut se situer le problème.

Pour communiquer avec la base access tu utilises quel type de connection ?
Peut être que l'émulation du rnd() est mal faite...

Peut être que tu pourrais le contourner en utilisant un rnd() fait en VB, tout en connaissant le problème des rnd() de VB.

[EMC51]

Je pense que quand tu es dans Access le Rnd qui est utilisé est celui de VBA.

Quand tu n'es plus dans Access, il n'est plus disponible.

Il faut que tu te débrouilles avec le random de VB.NET, par exemple en récupérant le max(truc.id) et générant un random <= à ce dernier.

Après tu peux exécuter par exemple :

Code :

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

SELECT TOP 1 * FROM truc WHERE truc.nom='toto' and truc.id >= %rnd ORDER BY truc.id

[houbi2b]

Je pense que quand tu es dans Access le Rnd qui est utilisé est celui de VBA.

Quand tu n'es plus dans Access, il n'est plus disponible.

Il faut que tu te débrouilles avec le random de VB.NET, par exemple en récupérant le max(truc.id) et générant un random <= à ce dernier.

Après tu peux exécuter par exemple :

Code :

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

SELECT TOP 1 * FROM truc WHERE truc.nom='toto' and truc.id >= %rnd ORDER BY truc.id

Ok ca explique tout, je vais faire avec le random de vb alors
Merci pour ton aide

[houbi2b]

mon premier post était pas très clair mais effectivement.

Je me connecte à la base avec ADO.NET je récupère les données dans un datareader.

J'avais pensé à utiliser le random de vb mais ca m'oblige à faire plusieurs requêtes pour connaitre le nombre d'enregistrement total et le récupérer, ce que je voulais éviter mais je pense que je vais finir par faire comme ca...
Encore merci pour ton aide