asp | 모바일로 접근시 리다이렉트 하기
페이지 정보
작성자 100K5 작성일13-04-18 13:45 조회61,675회 댓글0건관련링크
본문
<%
' 모바일 접속 여부
permitTags = "iPhone|Android|SAMSUNG|SCH-|SPH-|SGH-|LG-|CANU|IM-|EV-|Nokia|BlackBerry"
arrAgent = Split(permitTags, "|")
agent = request.ServerVariables("HTTP_USER_AGENT")
' 모바일 접속 여부
permitTags = "iPhone|Android|SAMSUNG|SCH-|SPH-|SGH-|LG-|CANU|IM-|EV-|Nokia|BlackBerry"
arrAgent = Split(permitTags, "|")
agent = request.ServerVariables("HTTP_USER_AGENT")
For i=0 To Ubound(arrAgent)
If InStr(agent,arrAgent(i)) > 0 Then
response.redirect "/m/"
Exit For
End If
Next
%>
If InStr(agent,arrAgent(i)) > 0 Then
response.redirect "/m/"
Exit For
End If
Next
%>
댓글목록
등록된 댓글이 없습니다.