% if (InStr(Request.ServerVariables("HTTP_USER_AGENT"), "Windows CE")) then response.redirect "http://www.view-our-homes.com/Listings/Ce/searchstart.asp" response.end end if 'Check for Pocket PC if (InStr(Request.ServerVariables("HTTP_UA_OS"), "POCKET PC")) then response.redirect "http://www.view-our-homes.com/Listings/Ce/searchstart.asp" response.end end if %>