<% Function googleColor(value, random) Dim colorArray colorArray = Split(value, ",") googleColor = colorArray(random Mod (UBound(colorArray) + 1)) End Function Function googleScreenRes() Dim screenRes, delimiter, resArray screenRes = Request.ServerVariables("HTTP_UA_PIXELS") delimiter = "x" if IsEmpty(screenRes) Then screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS") delimiter = "," end If resArray = Split(screenRes, delimiter, 2) if (UBound(resArray) + 1) = 2 Then googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1) end If End Function Dim googleTime, googleDt, googleScheme, googleHost googleTime = DateDiff("s", "01/01/1970 00:00:00", Now()) googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer))) googleScheme = "http://" if StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://" googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST")) Dim googleAdUrl, googleAdOutput googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_ "ad_type=text" &_ "&channel=2902884571" &_ "&client=ca-mb-pub-3219539201911953" &_ "&dt=" & googleDt &_ "&format=mobile_double" &_ "&host=" & googleHost &_ "&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_ "&markup=xhtml" &_ "&oe=utf8" &_ "&output=xhtml" &_ "&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_ "&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_ "&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_ googleScreenRes() Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP") googleAdOutput.Open "GET", googleAdUrl, false googleAdOutput.Send Response.Write(googleAdOutput.responseText) %>

欢迎订阅《读写算》、《科学知识动漫》、《素质教育论坛》杂志！ [本社顾问]王文湛：国家教育部原副总督学、基础教育司原司长；朱小蔓：国家教育部督学、中央教育科学研究所原所长、著名教授、联合国教科文国际农村教育研究与培训中心主任；袁振国：中央教育科学研究所所长、教授、博士生导师；滕纯：中央教育科学研究所原常务副所长、研究员；杨再隋：华中师范大学教授、教育部课程教材审定委员会专家；吴道银：高级记者。 　　荆门市素质教育学会发展会员、 荆门市信息技术教育研究专业委员会发展会员 　　荆门市教育科学规划课题申请、评审书下载， 荆门市素质教育学会会员登记表下载 　　读写算中央7台广告、读写算中央2台广告、读写算刊歌

新　　闻 ...更多...

课程改革 ...更多...

教育创新 ...更多...

教育科研 ...更多...

			教育期刊 ...更多...		考试招生 ...更多...

21世纪教育资讯网 《素质教育论坛》博客 《读写算》中考版博客 《科技知识动漫》博客

:::::::::::::::::【站点地图】:::::::::::::::: 新　　闻 热点点击 地方新闻 本站消息 课程改革 理论探讨 学科教学 教育科研 科研动态 科研管理 课题研究 课题指南 教育创新 创新教育 素质教育 心理教育 学校德育 考试招生 中考指南 高考指南 试卷下载 招考信息 政策法规 教育法律 政策文件 相关法规 名师名校 示范学校 名师名课 论文集锦 终身学习 继续教育 成职教育 经验交流 教育行政 学校工作 教育期刊 读写算低年级版 读写算中高年级版 读写算中考版 科技知识动漫 素质教育论坛杂志 学生天地 习作园地 脑筋转弯 幽默笑话 团队活动 少儿书画 地方科研 东宝区 掇刀区 沙洋县 京山县 钟祥市 屈家岭 荆门市直学校 个人主页 周　宏 周保英 左昌伦 王仁贵 刘南陔 李　伟