<% '--Define variables aSiteAbbreviation = "HT" aSiteName = "HosTek.com" aShortName = "hostek" aSiteEmail = "sales@hostek.com" aMyCP = "https://my.hostek.net" aCookieName = "HostekRef" aClrBlueDark = "B5CDF3" aClrBlueMedium = "D3E5FA" aClrBlueLight = "EDF2FA" aResoldPrice = "5" aSearchPhrases = "asp hosting, asp web hosting reseller, asp web site hosting, nt web hosting reseller, nt web site hosting, asp nt hosting, affordable asp web hosting reseller, asp access web hosting, frontpage web hosting, asp christian web hosting, christian web site hosting, reseller hosting" aSearchPhraseCF = "coldfusion MX hosting, cold fusion MX 7 hosting, coldfusion hosting, coldfusion web hosting reseller, affordable coldfusion web hosting reseller, coldfusion web site hosting reseller, coldfusion web site hosting, cold fusion web hosting reseller, reseller hosting coldfusion" aSearchPhraseLinux = "linux hosting, linux web hosting reseller, linux web site hosting, apache hosting, apache web hosting, apache web site hosting, affordable asp web hosting reseller" aPageURL = Request.ServerVariables("URL") If INSTR(LCASE(aPageURL), "web-hosting-plans.asp") Then aPageTitle = "affordable asp web hosting and windows reseller web hosting" ElseIf INSTR(LCASE(aPageURL), "web-hosting-plans-coldfusion.asp") Then aPageTitle = "affordable coldfusion web hosting and coldfusion reseller web hosting" ElseIf INSTR(LCASE(aPageURL), "web-hosting-plans-linux.asp") Then aPageTitle = "affordable linux web hosting and linux reseller web hosting" Else aPageTitle = "Affordable Web Hosting" End If %>

web hosting plans FAQ Contact Us Domain Search login <% If aSiteAbbreviation = "HT" Then %> <% ElseIf aSiteAbbreviation = "HF" Then %> <% End If %> affordable hosting - outstanding service homeTestimonialsReseller hostingMinistry HostingNon-Profit Hosting homeTestimonialsReseller hostingMinistry HostingNon-Profit Hosting Web Hosting Why choose <%=aSiteName%>? <% If aSiteAbbreviation = "HT" Then %> <% ElseIf aSiteAbbreviation = "HF" Then %> <% End If %> Ministry Hosting Ministry Hosting <% If aSiteAbbreviation = "HT" Then %> <% ElseIf aSiteAbbreviation = "HF" Then %> <% End If %> Non-Profit Hosting Non-Profit Hosting MS SQL Server SSL Certificates Customer Support Support Ticket Knowledge Base Customer Login Company Info. About <%=aSiteName%> Contact Us Privacy Statement CHRISTIAN WEB SITE LINKS Below are links which are related to Christian based web sites, search engines, etc. Click here to vote for HosTek.com as a great value for Christian web hosting. © 2004 - <%=aSiteName%> - All Rights Reserved. A service of Advanced Online Solutions, Inc.

<% Session("Order") = "ORDER" %> <% Dim aCookieName, aSrc aCookieName = "HostekRef" aSrc = Request.Cookies(aCookieName)("referer") If INSTR(UCASE(Request.ServerVariables("QUERY_STRING")), "SRC=") > 0 OR INSTR(UCASE(Request.ServerVariables("QUERY_STRING")), "?") > 0 Then Response.Cookies(aCookieName)("referer") = Request.ServerVariables("HTTP_REFERER") Response.Cookies(aCookieName)("datetime") = Now Response.Cookies(aCookieName)("scriptname") = Request.ServerVariables("SCRIPT_NAME") & "-" & Request.ServerVariables("QUERY_STRING") Response.Cookies(aCookieName).Expires = Date() + 365 '--store cookie for 365 days Session("URLRefererSrc") = Request.ServerVariables("SCRIPT_NAME") & "-" & Request.ServerVariables("QUERY_STRING") ElseIf LEN(aSrc) > 1 Then 'don't reset it Else aSrc = Request.ServerVariables("HTTP_REFERER") If aSrc <> "" Then Response.Cookies(aCookieName)("referer") = aSrc Response.Cookies(aCookieName)("datetime") = Now Response.Cookies(aCookieName)("scriptname") = Request.ServerVariables("SCRIPT_NAME") Response.Cookies(aCookieName).Expires = Date() + 365 '--store cookie for 365 days 'Response.Cookies ("MYCOOKIE")("BgColor") = "Blue" End If End If %>