Dim refreshrate, strWebsite, sendmail, frommail, tomail, smtphost
strWebsite = “www.haneefputtur.com” ‘ put own site name
refreshrate=”200″ ‘ write time in seconds
sendmail=0 ‘ make 1 for sending mail
smtphost=”smtp host”
frommail=”from mail id”
tomail=”to mail id”
%>
.