手机访问跳转代码
① 怎么让网站手机访问自动跳转到手机版
更改浏览器UA标识即可,此处以QQ浏览器为例:
一、打开QQ浏览器,在如下界面,点击我的
② 网站是asp,加什么代码可以让网站自动识别手机访问跳转至手机网站
只要把下面代码放到index.asp或者default.asp中,只要在首页代码顶部引用call Check_Wap(),这个也是我的工程中使用的代码。用正则判断方便简洁。
Sub Check_Wap()
dim MoblieUrl,reExp,MbStr
MoblieUrl="/3g/index.asp"''手机网站路径
Set reExp = New RegExp
MbStr="Android|iPhone|UC|Windows Phone|webOS|BlackBerry|iPod"
reExp.pattern=".*("&MbStr&").*"
reExp.IgnoreCase = True
reExp.Global = True
If reExp.test(Request.ServerVariables("HTTP_USER_AGENT")) Then
response.redirect MoblieUrl
response.End
End If
End Sub
③ 怎样实现手机访问网站时自动跳转到wap
手机访问网站时自动跳转到wap目录或wap站点自动识别跳转代码:
<%
HTTP_ACCEPT=Request.ServerVariables("HTTP_ACCEPT") '获取浏览器的信息
HTTP_USER_AGENT=LCase(Request.ServerVariables("HTTP_USER_AGENT")) '获取AGENT
HTTP_X_WAP_PROFILE=Request.ServerVariables("HTTP_X_WAP_PROFILE") 'WAP特定信息 品牌机自带浏览器都会有
HTTP_UA_OS=Request.ServerVariables("HTTP_UA_OS") '手机系统,电脑为空
HTTP_VIA=LCase(Request.ServerVariables("HTTP_VIA")) '网关信息
Dim WapStr
WAPstr=False
If ubound(split(HTTP_ACCEPT,"vnd.wap"))>0 Then WAPstr=True
If HTTP_USER_AGENT="" Then WAPstr=True
If HTTP_X_WAP_PROFILE<>"" Then WAPstr=True
If HTTP_UA_OS<>"" Then WAPstr=True
IF ubound(split(HTTP_VIA,"wap"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"netfront"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"iphone"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"opera mini"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"ucweb"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"windows ce"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"symbianos"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"java"))>0 Then WAPstr=True
IF ubound(split(HTTP_USER_AGENT,"android"))>0 Then WAPstr=True
If WAPstr=True Then
response.redirect "http://boaer.com/wap" '手机站WAP地址一定要完整绝对地址
response.end
End if
%>
④ 我的网站是asp,加什么代码可以让网站自动识别手机访问跳转至手机网站
<%
if
InStr(LCase(Request.ServerVariables("HTTP_ACCEPT")),"vnd.wap.wml")>0
then
response.redirect
"a.asp"
'如果是手机访问则跳转a.asp,a.asp可以设置为你的手机网站主页
response.end
end
if%>
以上这段代码,加在你首页的头部就可以了,如果你想要全站都跳转的话,可以回你整站配置的config.asp文件里
⑤ 网站自动识别手机电脑访问并自动跳转的代码谁给个
移动网站pc端和移动端官网并存。让访问pc端的官网直接跳转到移动端的网站代码:
<SCRIPT LANGUAGE="JavaScript">
function mobile_device_detect(url)
{
var thisOS=navigator.platform;
var os=new Array("iPhone","iPod","iPad","android","Nokia","SymbianOS","Symbian","Windows Phone","Phone","linux armv71","MAUI","UNTRUSTED/1.0","Windows CE","BlackBerry","IEMobile");
for(var i=0;i<os.length;i++)
{
if(thisOS.match(os[i]))
{
window.location=url;
}
}//因为相当部分的手机系统不知道信息,这里是做临时性特殊辨认
if(navigator.platform.indexOf('iPad') != -1)
{
window.location=url;
}
//做这一部分是因为Android手机的内核也是Linux
//但是navigator.platform显示信息不尽相同情况繁多,因此从浏览器下手,即用navigator.appVersion信息做判断
var check = navigator.appVersion;
if( check.match(/linux/i) )
{
//X11是UC浏览器的平台 ,如果有其他特殊浏览器也可以附加上条件
if(check.match(/mobile/i) || check.match(/X11/i))
{
window.location=url;
}
}
//类in_array函数
Array.prototype.in_array = function(e)
{
for(i=0;i<this.length;i++)
{
if(this[i] == e)
return true;
}
return false;
}
}
mobile_device_detect("http://boaer.com/wap");
</SCRIPT>
备注://里面的地址填的就是移动端的地址呦。