<%
myUA = Request.ServerVariables("HTTP_USER_AGENT")
ua = lcase(myUA)
pos=InStr(ua,"iphone")
pos2=InStr(ua,"ipod")

if pos>0 or pos2>0 then response.redirect("default_iphone.asp")
%>

işte bu kadar basit bir kod