anoniem Geplaatst: 9 september 2002 Delen Geplaatst: 9 september 2002 Hallo, ik heb een programma gemaakt met vba die via outlook emails stuurd. Dit programma haalt de Email adressen uit een access database door middel van een loop en verstuurd dan een bericht 1 voor 1, maar nu wil ik dat als het programma in de database kijkt en ziet dat er bij de persoon geen email adres staat dat het programma dan een waarschuwing/foutmelding geeft en dan gewoon door gaat naar de volgende. m.v.g, willem :roll: :roll: :o :o :-? :-? 8) 8) Quote Link naar reactie
anoniem Geplaatst: 9 september 2002 Auteur Delen Geplaatst: 9 september 2002 [code:1:587f825433] if instr(email$,"@) = 0 or instr(email$,".") = 0 then msgbox "Geen of foutieve email-adres in record #"+str$(nummer) exit sub end if [/code:1:587f825433] uitleg: email$ is het emailadres, nummer is het recordnummer 1 - controleert of de tekens '@' én '.' in het emailadres zitten 2 - geeft een foutmelding 3 - sluit de sub af 4 - einde if Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen