文章目录:
- 1、dede织梦网站需要安装一个手机自动跳转的手机源码,请问如何操作?各位大神帮帮忙,若是有会的,高悬赏
- 2、网站自动识别手机电脑访问并自动跳转的代码谁给个
- 3、怎么让网站手机访问自动跳转到手机版?
- 4、我的网站是asp,加什么代码可以让网站自动识别手机访问跳转至手机网站
- 5、请教ASP检测手机客户端并跳转到相应页面,下面这段代码是找的,但是复制到页面里不好用,ASP我不是很懂。
dede织梦网站需要安装一个手机自动跳转的手机源码,请问如何操作?各位大神帮帮忙,若是有会的,高悬赏
设置手机自动识别跳转
!--以下这段粘在网站的头部head里面--
script type="text/javascript"
var mobileUrl="你的手机网站首页",
mobile = (/mmp|symbian|smartphone|midp|wap|phone|xoom|iphone|ipad|ipod|android|blackberry|mini|windows\sce|palm/i.test(navigator.userAgent.toLowerCase()));
if (mobile) {
window.location = mobileUrl;
}
/script
!--这段粘在网站的头部head里面--
网站自动识别手机电脑访问并自动跳转的代码谁给个
移动网站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;ios.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;ithis.length;i++)
{
if(this[i] == e)
return true;
}
return false;
}
}
mobile_device_detect("");
/SCRIPT
备注://里面的地址填的就是移动端的地址呦。
怎么让网站手机访问自动跳转到手机版?
更改浏览器UA标识即可,此处以QQ浏览器为例:
一、打开QQ浏览器,在如下界面,点击我的
二、在如下界面,点击设置
三、在如下界面,点击浏览器UA标识
四、在如下界面,选择Android或者是iPhone,重启浏览器即可
我的网站是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文件里
请教ASP检测手机客户端并跳转到相应页面,下面这段代码是找的,但是复制到页面里不好用,ASP我不是很懂。
假如你的网址是:
那你的Index.asp是
那你的wap.asp是
那你的代码如下:
%
Function CheckMobile()
'是否由wap转入电脑版
If Not IsEmpty(Request.ServerVariables("HTTP_REFERER")) And InStr(LCase(Request.ServerVariables("HTTP_REFERER")),"wap.asp")=0 Then
CheckMobile=False:Exit Function
End If
'是否专用wap浏览器
If InStr(LCase(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
CheckMobile=True:Exit Function
End If
'是否(智能)手机浏览器
Dim MobileBrowser_List,PCBrowser_List,UserAgent
MobileBrowser_List ="up.browser|up.link|mmp|iphone|android|wap|netfront|java|opera\smini|ucweb|windows\sce|symbian|series|webos|sonyericsson|sony|blackberry|cellphone|dopod|nokia|samsung|palmsource|palmos|pda|xphone|xda|smartphone|pieplus|meizu|midp|cldc|brew|tear"
PCBrowser_List="mozilla|chrome|safari|opera|m3gate|winwap|openwave"
UserAgent = LCase(Request.ServerVariables("HTTP_USER_AGENT"))
If CheckRegExp(UserAgent,MobileBrowser_List) Then
CheckMobile=True:Exit Function
ElseIf CheckRegExp(UserAgent,PCBrowser_List) Then '未知手机浏览器,其UA标识为常见浏览器,不跳转
CheckMobile=False:Exit Function
Else
CheckMobile=False
End If
End Function
If CheckMobile() Then Response.Redirect (“")
%
要想代码能用,你还需要CheckRegExp(UserAgent,MobileBrowser_List)这个函数的定义,就像上面的Function CheckMobile()一样。
+xml") Or Not IsEmpty(Request.ServerVariables("HTTP_X_PROFILE")) Or Not IsEmpty(Request.ServerVariables("HTTP_PROFILE"))
; var os=new Array("iPhone","iPod","iPad","android","Nokia","SymbianOS","Symbian","Win