<% dim strCode strCode = "" Randomize For i = 1 to 8 iSelect = Int(Rnd * 2) + 1 If iSelect = 1 then iRnd = Int(Rnd * 10) strCode = strCode + Cstr(iRnd) Else iRnd = Int(Rnd * 26) strChar = Chr(iRnd + 65) strCode = strCode & strChar End if Next Response.Write(strCode) 'Response.End %> Virtual Life - Web Development and Internet Marketing
 
 

If you are considering a website or development project, please contact Virtual Life for our free and considered discussion about the direction that may be appropriate to take.

Email, with attachments to : info@virtuallife.co.uk

Alternatively, complete the form below.

* Your Name :

Your Company :

* Your Email :

Your Telephone :

* Your Enquiry :

 

 

* minimum required information