% user_ip = request.servervariables("REMOTE_ADDR") if isWVCIP(user_ip) then ' NORMAL URLS l_ebscohost_url = "http://search.epnet.com" l_proquest_url = "http://proquest.umi.com/login?ts=0" l_infotrac = "http://infotrac.galegroup.com/itweb/wena37071" l_grolier_url = "http://go.grolier.com/" l_cqresearcher_url = "http://library.cqpress.com/cqres/lpext.dll?f=templates&fn=titlepage.htm" ' l_auto_repair_url = "http://arrc.epnet.com/autoasp/index.asp?sid=151732381&uid=s4565092.main.autorefctr" ' l_clinical_pharmacology_url = "http://web1.epnet.com/search.asp?rds=1&sxp=18&tb=1&_ug=sid+CD961E09%2DBEE8%2D4C4B%2D8F91%2DA9ACAD9D271B%40sessionmgr6+dbs+czh+cp+1+F81F&_us=hs+False+dstb+DB+ss+SO+sm+KS+11C3&_uso=hd+False+db%5B0+%2Dczh+F850&newsrch=1" l_auto_repair_url = "http://search.epnet.com" l_clinical_pharmacology_url = "http://search.epnet.com" l_gale_url = "http://infotrac.galegroup.com/itweb/wena37071" l_worldcat_url = "http://firstsearch.oclc.org/fsip" l_netlibrary_url = "http://www.netlibrary.com/" else ' EZPROXY URLS l_ebscohost_url = "http://www.wenval.cc:2048/login?url=http://search.epnet.com/" l_proquest_url = "http://www.wenval.cc:2048/login?url=http://www.umi.com/pqdauto" l_infotrac = "http://www.wenval.cc:2048/login?url=http://infotrac.galegroup.com/itweb/wena37071" l_grolier_url = "http://www.wenval.cc:2048/login?url=http://go.grolier.com/" l_cqresearcher_url = "http://www.wenval.cc:2048/login?url=http://library.cqpress.com/cqres/lpext.dll?f=templates&fn=titlepage.htm" ' l_auto_repair_url = "http://www.wenval.cc:2085/autoasp/index.asp?sid=151724504&uid=s4565092.main.autorefctr" ' l_clinical_pharmacology_url = "http://www.wenval.cc:2095/search.asp?tb=1&_ug=sid+CC7EB8D0%2D26B0%2D4C1E%2D8F72%2D5B94631F52C3%40sessionmgr3+dbs+czh+C5E8&_us=hs+False+dstb+DB+ss+SO+sm+KS+11C3&_uso=hd+False+db%5B0+%2Dczh+F850&newsrch=1" l_auto_repair_url = "http://www.wenval.cc:2048/login?url=http://search.epnet.com/" l_clinical_pharmacology_url = "http://www.wenval.cc:2048/login?url=http://search.epnet.com/" l_gale_url = "http://www.wenval.cc:2048/login?url=http://infotrac.galegroup.com/itweb/wena37071" l_worldcat_url = "http://www.wenval.cc:2048/login?url=http://firstsearch.oclc.org/fsip" l_netlibrary_url = "http://www.student.wvc.edu:2152/" end if %> <% Function isWVCIP(the_ip) isWVCIP = False ' WVC IP'S if Left(the_ip,9) = "134.39.14" then isWVCIP = True if Left(the_ip,9) = "134.39.15" then isWVCIP = True if Left(the_ip,6) = "172.16" then isWVCIP = True if Left(the_ip,3) = "10." then isWVCIP = True if Left(the_ip,6) = "192.168" then isWVCIP = True End Function %>
|
|