'-----------------------------------------------------------------
' Copyright (c) Network Associates Corporation
' Free Scan Web page Language dependent constants
'-----------------------------------------------------------------
' Author: Ramy Eldesoky
' Created: 10/15/2002
'-----------------------------------------------------------------

Const UPDATE_SERVER = "us.mcafee.com" ' This is the domain where the app is going to call back for updates.
Const LANG_ID = "en-us" ' Change this constant to support other languages. i.e.: fr, en-gb,..
Const AFF_ID  = ""      ' Keep empty as default value

'------------------------------------------------------------------------------------------
'  URLs initialization
'------------------------------------------------------------------------------------------
Dim strFreeScanUpdateServer, strBuyAndMoreInfoUrlDomain
Dim strVirusGlossaryURL
Dim strDomainName


strDomainName = trim(LCase(document.location.hostname))

if InStr( strDomainName , "mcafee" ) > 0 then
'{ 
  '// Default values....
  '// They are two possible values here so that App Engineering can change the "Dev" values for their own package.
  strFreeScanUpdateServer		= "http://" & strDomainName & "/apps/vsfreescan/" & LANG_ID & "/default.asp"
	strBuyAndMoreInfoUrlDomain	= "http://" & strDomainName & "/root/mfs/fsredir.asp?"
  strVirusGlossaryURL	= "http://" & strDomainName & "/root/genericURL_genericLeftNav.asp?genericURL=/VirusInfo/VIL/glossary.asp&genericLeftNav=/VirusInfo/VIL/vil_nav.asp"
'}
else
'{
	strFreeScanUpdateServer		= "http://" & UPDATE_SERVER & "/apps/vsfreescan/" & LANG_ID & "/default.asp"
	strBuyAndMoreInfoUrlDomain	= "http://" & UPDATE_SERVER & "/root/mfs/fsredir.asp?"
    strVirusGlossaryURL	= "http://" & UPDATE_SERVER & "/root/genericURL_genericLeftNav.asp?genericURL=/VirusInfo/VIL/glossary.asp&genericLeftNav=/VirusInfo/VIL/vil_nav.asp"
'}
end if

Dim strBuyNowURL_VirusFound, strBuyNowURL_NoVirusFound, strMoreInfoURL_VirusFound, strMoreInfoURL_NoVirusFound
Dim strBuyNowURL_CancelScan, strMoreInfoURL_CancelScan
Dim strCampaignURL

'BuyNow_NoVirus - 0, MoreInfo_NoVirus - 1
'BuyNow_Virus - 2, MoreInfo_Virus - 3
'BuyNow_Cancel - 4, MoreInof_Cancel - 5


strBuyNowURL_NoVirusFound	= strBuyAndMoreInfoUrlDomain & "link=0&affid=" & AFF_ID
strMoreInfoURL_NoVirusFound = strBuyAndMoreInfoUrlDomain & "link=1&affid=" & AFF_ID

strBuyNowURL_VirusFound		= strBuyAndMoreInfoUrlDomain & "link=2&affid=" & AFF_ID
strMoreInfoURL_VirusFound	= strBuyAndMoreInfoUrlDomain & "link=3&affid=" & AFF_ID

strBuyNowURL_CancelScan		= strBuyAndMoreInfoUrlDomain & "link=4&affid=" & AFF_ID
strMoreInfoURL_CancelScan	= strBuyAndMoreInfoUrlDomain & "link=5&affid=" & AFF_ID

strCampaignURL            = strBuyAndMoreInfoUrlDomain & "affid=" & AFF_ID & "&link="

'------------------------------------------------------------------------------------------
' Constants
'------------------------------------------------------------------------------------------

Const gRotatingFactsSpeed		= 10000 ' milliseconds
Const MAX_INFECTED_FILES		= 25

'------------------------------------------------------------------------------------------
' Language dependent string constants
'------------------------------------------------------------------------------------------
Const strPageTitle				= "McAfee FreeScan"
Const sMsgMaxInfectedFilesFound = "Too many files have been detected. Scanning has been stopped."
Const strInformation			= "Information"
Const strScanCompleted			= "Scanning completed!"
Const strScanCanceled			= "The scan operation was cancelled by the user."
Const strFile					= "file"
Const strFiles					= "files"
Const strLabelScannedFiles		= "Files Scanned"
Const strLabelInfectedFiles		= "Files Detected"
Const strLabelScanning			= "Scanning"
Const strLabelInformation		= "Information"
Const strHeaderFileName			= "File Name"
Const strHeaderVirusName		= "Threat Name"

Const varCount					= "%count%"
Const varVirusCount				= "%virus_count%"
Const varFileCount				= "%file_count%"
Const varFiles					= "%files%"
Const varHREF_1					= "%href_1%"
Const varHREF_2					= "%href_2%"
Const varHREF_3					= "%href_3%"

Const strInitialInformation		= "Click the <b>Scan</b> button to begin scanning."

'Const strAlertScanCancelled		= "<b>Scanning was cancelled!</b><br> No threats were detected before scanning was cancelled. It is important to scan all files because threats might still exist on your computer.<br><b>%href_1%Or just skip the scan and buy VirusScan now!</a></b>&nbsp;&nbsp;%href_3%Learn&nbsp;More...</a>" 
'Const strAlertNoVirusFound		= "<b>McAfee FreeScan has detected no threats!</b><br>With 500 new computer viruses and other possible threats discovered each month,<br>why take chances? Get immediate protection with McAfee VirusScan.&nbsp;&nbsp;<b>%href_1%Buy&nbsp;Now!</a></b>&nbsp;&nbsp;%href_3%Learn&nbsp;More...</a>"
'Const strAlertVirusesDetected	= "<b>McAfee FreeScan has detected %virus_count% %files% on your computer!</b><br>Your personal information might be vulnerable to exposure or corruption.<br>Your computer might transmit possible threats to friends, family, and co-workers.<br>Get immediate protection with McAfee VirusScan.&nbsp;&nbsp;<b>%href_1%Buy&nbsp;Now!</a></b>&nbsp;&nbsp;%href_3%Learn&nbsp;More...</a>"

Dim strAlertScanCancelled		
Dim strAlertNoVirusFound
Dim strAlertVirusesDetected

dim strAVInfoMessage(2)
strAVInfoMessage(0) = "<b>Important:</b> To avoid conflicts, please temporarily disable any active anti-virus software."
strAVInfoMessage(1) = "<b>Important:</b> If you disabled your anti-virus software, please re-enable it now."
strAVInfoMessage(2) = "<b>Important:</b> You might have more possible threats on your computer."

Const strTitleInfectedFiles		= "List of Detected Files"
Const strTitleScanStatus		= "Scan Status"
Const strTitleScanLocation		= "Scan Location"

Const strDriveC				= "Drive C"
Const strMyDocuments			= "My Documents"
Const strWindowsFiles			= "Windows Files"

Dim strFactoids(10)
strFactoids(0)			= "" ' main message
strFactoids(1)			= "Never let your e-mail program automatically execute attached files."
strFactoids(2)			= "Do not open files attached to any e-mail whose subject line is questionable."
strFactoids(3)			= "More than 63,000 computer viruses have been identified worldwide."
strFactoids(4)			= "Macro viruses can spread via shared document files created in Microsoft Word or Microsoft Excel."
strFactoids(5)			= "If a virus or other threat is detected on your computer, remove it immediately."
strFactoids(6)			= "Always use comprehensive, up-to-date anti-virus software."
strFactoids(7)			= "Always scan all files you download from the Internet."
strFactoids(8)			= "Make backup copies of important files and store them on separate diskettes."
strFactoids(9)			= "Most threats can be removed without permanent damage to your computer."
strFactoids(10)			= "If a threat is detected, click its name to view details, including its origin and symptoms."