Would you like to sign up on our e-mail list?
SOURCE CODE:
<html><head>
<title>If Then Statements</title></head>
<body text="#800000" bgcolor="#FFFFCC">
<h1 align="center">E-mail List (VBScript)</h1>
<p>Would you like to sign up on our e-mail list?</p>
<form method="post" name="frm" action="javascript:void(0)">
<p>Name:
<input type="text" name="name" size="28"></p>
<p>E-mail:
<input type="text" name="address" size="28"></p>
<p><input type="radio" checked name="email">Yes</p>
<p><input type="radio" name="email">No</p>
<p><input type="submit" value="Sign Me Up!"
name = "btnSignUp" onClick = "signup()";></p>
</form>
<script language="vbscript">
function signup()
dim strName
strName = window.document.frm.name.value
if ((document.frm.name.value <> "") and (document.frm.email(0).checked=true))
then
window.alert("Thank you" & chr(10) & strName)
else
window.alert("You may signup later")
end if
end function
</script>
</body></html>