Lotus Script to Validate Internet Address?

HCL Domino Domino Forum
1

Hi …

I need a Lotus Script to validate internet address?

abc@limtasd.com

How can I validate the field using Lotus Script?

2

Subject: Lotus Script to Validate Internet Address?

The Evaluate function works well for this.

3

Subject: RE: Lotus Script to Validate Internet Address?

Can you post an example of this evaluate please ?

Thanks

4

Subject: Lotus Script to Validate Internet Address?

A simple one that just checks for an AT sign and the dot.

HTH

Sub Validaddress

newreplyto = Inputbox("Current reply address is ""info@xyz.com"". " & Chr$(13) & _

"You may change it by entering another address", "Reply to")

If newreplyto = "" Then Exit Sub

If Instr(newreplyto, "@") = 0 Then

	Msgbox |Please enter a valid e-mail address. (Veuillez saisir une adresse valide).| , 0 + 48, _

	"Incorrect address " & newreplyto 

	Call Validaddress		

Elseif Instr(newreplyto, ".")  = 0 Then

	Msgbox |Please enter a valid e-mail address. (Veuillez saisir une adresse valide).| , 0 + 48, _

	"Incorrect address " & newreplyto 

	Call Validaddress

End If

Exit Sub

End Sub