Traitement si table vide???Résolu

Question

Bonsoir à tous,

j'aimerai faire un traitement au cas où ma table serait vide alors faire traitement1 sinon faire traitement2 mais je ne sais pas pourquoi ça ne marche pas. Une âme sensible pourrait-elle m'aider s'il vous plaît? Voici mon code :

Dim rs As New Recordset
rs.Open "select * from Tablevendre", cn

If rs.RecordCount < 1 Then
traitement1
Else
traitement2
End if


Merci d'avance.

Cordialement

js8bleu · Accepted Answer

J'ai trouvé en fait lorsque j'avais déclaré mon recordset, à la fin j'ai mis cn au lieu de cn, 1, 2. La bonne syntaxe est donc :

Dim rs As New Recordset
rs.Open "select * from Tablevendre", cn, 1, 2

If rs.RecordCount < 1 Then
traitement1
Else
traitement2
End if 

Je crois qu'il faut que je me penche sérieusement sur ces histoires de verrouillage. Sinon je trouve ça vraiment bizarre quand même. En tous cas MERCI Jack pour ton altruisme.

Cordialement.

cs_Jack · Answer

Salut 
Le code semble correct
"ça marche pas" ne veut rien dire
Erreur ? laquelle
En debug, que vaut RecordCount quand tu arrives sur ce test ? 
(touches F9, F8 pour debuguer)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

js8bleu · Answer

Bonsoir Jack et Merci pour ton intervention (décidément, on dirait que tu m'appartient aujourd'hui, ). Le code ne renvoi pas d'erreur j'ai testé avec un msgbox pour contrôler. En fait pour lui tout est normal pourtant j'ai des données dans la table. Le Recordcount me retourne -1. Je n'y comprends vraiment rien. Merci d'avance.

Cordialement

js8bleu · Answer

If rs1.RecordCount < 1 Then

    MsgBox ("Le panier est vide")
    
    Exit Sub
    
Else

   Traitement2

End If

Il m'affiche chaque fois "Le panier est vide" et le RecordCount est égale à -1.

Merci d'avance.

Cordialement.

cs_Jack · Answer

Re
Voir l'aide de la commande Open.
Les apramètres à mettre, après l'objet de connexion, sont représentés par des constantes système.
Je te conseille fortement de les utiliser, par souci de clarté.
Exemple :
  rs.Open RequeteSQL, CN, adOpenStatic, adLockOptimistic
Il est quand même plus facile de comprendre les constantes nommées, que des chiffres, non ?

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

js8bleu · Answer

Ok Merci Jack pour tes précieux conseils. Excellente journée.

Cordialement.

Traitement si table vide???

6 réponses

Votre réponse

Discussions similaires