enregistrement videRésolu

Question

Slt j'ai un soucis (enregistrement vide)Set Rs Db.OpenRecordset("select * from sousreseau where [code reseau] " & glob_sres)
varCPF = Rs![CPF]
varFinEnMontant = Rs![FinEnMontant]
Comment gérer l'exception par exemple si le champ code reseau est vide qu'il m'affiche quand meme un formulaire form1 par exemple?
C'est à dire quand code reseau est vide qu'il ne passe pas par l'instruction ci dessous::
varCPF = Rs![CPF]

varFinEnMontant = Rs![FinEnMontant]

ddove53 · Accepted Answer

j'ai comme suit et ça marche:Set Rs Db.OpenRecordset("select * from sousreseau where [code reseau] " & glob_sres)
On Error Resume Next
form1.Show
varCPF = Rs![CPF]
varFinEnMontant = Rs![FinEnMontant]

Je ne sais pas si c'est propre ou pas? A vous de me dire.

bonjourcheval · Answer

Bonjour,

Je ne crois pas que c'est très propre en effet...

Il faut que ta base de donnée ait l'intégrité référentiel... Ça t'évitera d'avoir des champs vide.

Sinon, tu peux vérifier si tu est à la fin de ton recordset

if rs.EOF then exit sub

Voila

"C'est pas parce qu'ils sont nombreux à avoir tort qu'ils ont raison!"
(Coluche / 1944-1986 / Pensées et anecdotes)

Je brise la règle 1 et 2. Je

ddove53 · Answer

merci c'est encore mieux.

ddove53 · Answer

Et pour gérer l'erreur suivante, comment faire?
glob_numeroaffaire = numeroaff
glob_affaireouverte = globcstrepalgomp & "" & glob_numeroaffaire & "" & glob_numeroaffaire & ".mdb"
glob_DB_Aff(1).chemin = glob_affaireouverte
Set Db = DBEngine(0).OpenDatabase(glob_affaireouverte)

J'ai une erreur à ce niveau si ma base est vide.

Enregistrement vide

4 réponses

Votre réponse

Discussions similaires