Internet Website Support

<% Const IMGS_DIR = "/images/phone/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %>

Check domain

About Us

Welcome
to sohostme.net

Support

We offer 24/7/365 phone support, 99.9% uptime, and have a 30 day money back guarantee. Your site will be on a top of the line Dual Xeon server that provides INSTANT backups of your site. Our control panel is one of the best in the industry, and has over 39 scripts that can be installed with a click of the mouse. See the instant script list.