Discussion :

[pierre2410]

bonjour,
j'aimerais tester si des enregistrements existent dans une table afin de mettre le bon numero comme valeur de clé primaire

Code :

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

1
2
StrSql = "select max(numero_deplacement) from deplacements"
Set RcReq = OraDatabase.dbcreatedynaset(StrSql, 0&)

RcReq.RecordCount me renvoie 1 qu'il y ait 1 enregistrement ou quil y en ai aucun, comment faire, du coup, pour tester sil y a aucun enregistrement ?

cordialement
pierre

[saisas]

Bonjour,

la fonction "max" doit te renvoyer un enregistrement avec la valeur Null si il n'y a pas d'enregistrement. Je pense en plus que le résultat dépend du moteur SGBD (certains renvoyant Null, d'autre pas d'enregistrements).

Propositions de code :

1)

Code :

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

1
2
3
4
5
6
StrSql = "select max(numero_deplacement) from deplacements"
Set RcReq = OraDatabase.dbcreatedynaset(StrSql, 0&)
If RcReq.BOF Or RcReq.EOF Or isNull(RcReq.Fields(0)) Then
' --- Pas d'enregistrement dans la table
Else
' --- RcReq.Fields(0) contient la dernière clé

2)

Code :

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

1
2
3
4
5
6
StrSql = "select Count(*) from deplacements"
Set RcReq = OraDatabase.dbcreatedynaset(StrSql, 0&)
If RcReq.Fields(0) = 0 Then
' --- Pas d'enregistrement dans la table
Else
' --- Ton code ici

Cordialement.

[pierre2410]

merci beaucoup, ca fonctionne