<% Dim blnLeftBar, blnRightBar, blnWelcome, blnAnnouncement, blnVA, blnVIL, blnCLINIC, blnPREREG, blnICHOOSE, blnW2K, blnApp, bln468x60 Dim strSection, strServer, bodyMargin, blnMSIE55, blnMSIE4X5 Dim strCadabraURL, strBigstepURL, strDrivewayURL, strVistoURL, strWebviewURL, strFatbrainURL, strGatorURL Dim varBannerAdCode, varNetscapeLayerCode, intRandom Dim imgNavigation, imgLeft, imgRight, strMAP, strMAP_LOGO, strMAP_RIGHT Dim blnOEM, blnOEMbg, blnOEMmarg, blnOEMconsole, arrPages Dim arrPagesVA, imgSpacer, imgBullet, strSCRIPT_NAME, appendUrl Dim randomArr(8),blnNN4,blnNN6, blnMSIE4, blnMSIE 'The following declarations all added by Emanuele Fabrizio 01/24/2002 Dim LogLink, modQueryString, LinkDownloads, blnShowMenus, displayTable, displaySubTable, blnVil_SubCenter, varSkyScraper, varAdNsLayerCode, varRbTextAdOneLayer, varRbTextAdTwoLayer, varRbTextAdThreeLayer, varRbTextAdFourLayer, varSubCenterAdNsLayerCode 'The following declarations all added by Emanuele Fabrizio 05/29/2002 Dim blnDesktop, desktopFlag, bodyBackground, blnExtraWide 'defaults bodyMargin = "marginwidth=10 marginheight=15" blnLeftBar = True 'TRUE Means that you want the left bar blnRightBar = True 'TRUE Means that you want the right bar blnAnnouncement = False 'TRUE Means that you want the Announcement box to display and NOT the Virus Alert blnWelcome = True 'TRUE Means that you want the Welcome Clinic box on the Left Bar blnVIL = False blnICHOOSE = False blnCLINIC = False blnPREREG = False 'Set to false. When TRUE means that referrer link comes from Pre_Reg site blnMSIE55 = False blnMSIE4X5 = False blnVA = TRUE 'TRUE Means that you want the VIRUS Alert to display and NOT the Announcements blnApp = False 'TRUE Means that the page is running an App (Online Service) blnNN4 = False blnNN6 = False blnMSIE4 = False bln468x60 = True 'FALSE Means that you don't want the top 468x60 ad to show desktopFlag = "0" blnDesktop = False bodyBackground = "" blnMSIE = False Sub SetDesktopScripts() 'Do nothing End Sub %> <% Call Init() %>