asp peeps

[brian33433@aol.com]

how would i transfer this for asp, i'm so mot a asp person

<? if(strstr($_SERVER['HTTP_USER_AGENT'],'iPhone') || strstr($_SERVER['HTTP_USER_AGENT'],'iPod'))
{
header('Location: http://istuffonline.com/iphone.htm');
exit();
} ?>

Thanks
B.

[gdscei]

Why don't you just use this

Code: Select all

<script type="text/javascript">
<!--
if((navigator.userAgent.match(/iPhone/i)) || (navigator.userAgent.match(/iPod/i))){http://istuffonline.com/iphone.htm} else {};
-->
</script>

[Christopher]

maybe this will help: http://www.4guysfromrolla.com/articles/120402-1.aspx

[brian33433@aol.com]

gd unfortunately that didn't work. Chris i hate homework, lol

[Christopher]

lol sorry but i can't help more. And i hate doing homework for someone else :p

[TeamUgly]

Brian,
It might be more verbose than what you're looking for but here's an example in ASP that should do the trick (this code is meant to redirect most mobile devices)...

Code: Select all

      'Check for mobile browser
      Dim user_agent, mobile_browser, Regex, match, mobile_agents, mobile_ua, i, size
      user_agent = Request.ServerVariables("HTTP_USER_AGENT")
      mobile_browser = 0

      Set Regex = New RegExp
      With Regex
         .Pattern = "(up.browser|up.link|mmp|symbian|smartphone|midp|wap|phone|windows ce|pda|mobile|mini|palm)"
         .IgnoreCase = True
         .Global = True
      End With

      match = Regex.Test(user_agent)

      If match Then mobile_browser = mobile_browser+1

      If InStr(Request.ServerVariables("HTTP_ACCEPT"), "application/vnd.wap.xhtml+xml") Or Not IsEmpty(Request.ServerVariables("HTTP_X_PROFILE")) Or Not IsEmpty(Request.ServerVariables("HTTP_PROFILE")) Then
         mobile_browser = mobile_browser+1
      end If

      mobile_agents = Array("ipho", "ipod", "ipad","w3c ", "acs-", "alav", "alca", "amoi", "audi", "avan", "benq", "bird", "blac", "blaz", "brew", "cell", "cldc", "cmd-", "dang", "doco", "eric", "hipt", "inno", "ipaq", "java", "jigs", "kddi", "keji", "leno", "lg-c", "lg-d", "lg-g", "lge-", "maui", "maxo", "midp", "mits", "mmef", "mobi", "mot-", "moto", "mwbp", "nec-", "newt", "noki", "oper", "palm", "pana", "pant", "phil", "play", "port", "prox", "qwap", "sage", "sams", "sany", "sch-", "sec-", "send", "seri", "sgh-", "shar", "sie-", "siem", "smal", "smar", "sony", "sph-", "symb", "t-mo", "teli", "tim-", "tosh", "tsm-", "upg1", "upsi", "vk-v", "voda", "wap-", "wapa", "wapi", "wapp", "wapr", "webc", "winw", "winw", "xda", "xda-")


      size = Ubound(mobile_agents)
      mobile_ua = LCase(Left(user_agent, 4))

      For i=0 To size
         If mobile_agents(i) = mobile_ua Then
            mobile_browser = mobile_browser+1
            Exit For
         End If
      Next

      If mobile_browser>0 Then
         Response.Redirect("http://stuffonline.com/iphone.htm")
      Else
         Response.Redirect("http://istuffonline.com")
      End If


[brian33433@aol.com]

do i place it in the head, as-is?