.版本 2
.子程序 IE_置UA类型
.参数 UA类型, 文本型, , IE6-IE9,Maxthon,Firefox,Chrome,Safari,Opera,iPhone,iPad,Android
.局部变量 局_UserAgent, 文本型
.判断开始 (UA类型 = “IE6”)
局_UserAgent = “Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)”
.判断 (UA类型 = “IE7”)
局_UserAgent = “Mozilla/4.0 (compatible; MSIE 7.0b; Windows NT 6.0)”
.判断 (UA类型 = “IE8”)
局_UserAgent = “Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.0; Trident/4.0)”
.判断 (UA类型 = “IE9”)
局_UserAgent = “Mozilla/4.0 (compatible; MSIE 9.0; Windows NT 6.1; Trident/5.0)”
.判断 (UA类型 = “Maxthon”)
局_UserAgent = “Mozilla/5.0 (Windows NT 5.1) AppleWebKit/535.12 (KHTML, like Gecko) Maxthon/3.0 Chrome/22.0.1229.79 Safari/535.12”
.判断 (UA类型 = “Opera”)
局_UserAgent = “Opera/9.99 (Windows NT 5.1; U; zh-CN) Presto/9.9.9”
.判断 (UA类型 = “Firefox”)
局_UserAgent = “Mozilla/5.0 (Windows NT 5.1; zh-CN; rv:1.9.1.3) Gecko/20100101 Firefox/8.0”
.判断 (UA类型 = “Chrome”)
局_UserAgent = “Mozilla/5.0 (Windows NT 5.1; zh-CN) AppleWebKit/535.12 (KHTML, like Gecko) Chrome/22.0.1229.79 Safari/535.12”
.判断 (UA类型 = “Safari”)
局_UserAgent = “Mozilla/5.0 (Windows NT 5.1; zh-CN) AppleWebKit/535.12 (KHTML, like Gecko) Version/5.0.1 Safari/535.12”
.判断 (UA类型 = “iPhone”)
局_UserAgent = “Mozilla/5.0 (iPhone; U; CPU OS 4_2_1 like Mac OS X) AppleWebKit/532.9 (KHTML, like Gecko) Version/5.0.3 Mobile/8B5097d Safari/6531.22.7”
.判断 (UA类型 = “iPad”)
局_UserAgent = “Mozilla/5.0 (iPad; U; CPU OS 4_2_1 like Mac OS X) AppleWebKit/533.17.9 (KHTML, like Gecko) Version/4.0.2 Mobile/8C148 Safari/6533.18.5”
.判断 (UA类型 = “Android”)
局_UserAgent = “Mozilla/5.0 (Linux; U; Android 2.2) AppleWebKit/533.1 (KHTML, like Gecko) Version/4.0 Mobile Safari/533.1”
.默认
.判断结束
IE_自定义UA (“user-Agent:” + 局_UserAgent)
.子程序 IE_自定义UA, 整数型, 公开
.参数 UserAgent, 文本型, , UserAgent信息
返回 (UrlMkSetSessionOption (268435457, UserAgent, 取文本长度 (UserAgent), 0))