查看: 4189|回复: 12
如何批量查询中考成绩？
阅读权限20
在线时间 小时
请大师帮忙，我有一个excel表格A列为考生准考证号12位如：，B列为照片号12位，如：，学校让我查全校600多考生的成绩，帮帮我，谢谢！查询网址.cn.
曾在看到过有这样的帖子，但我不会改代码，请大师们帮帮我，谢谢！
阅读权限20
在线时间 小时
& & & & & & & &
请大师帮忙，我有一个excel表格A列为考生准考证号12位如：，B列为照片号12位，如：，学校让我查全校600多考生的成绩，帮帮我，谢谢！查询网址.cn.
曾在 ...page=2#pid6087942看到过有这样的帖子，但我不会改代码，请大师们帮帮我，谢谢！
阅读权限95
在线时间 小时
看过相关帖子
但是暂时只能做到查询，还不能自动获取成绩到Excel中Sub Opiona()
& & Dim ie
& & Set sh = Sheets(&Sheet1&)
& &For i = 2 To 600
& && &&&If sh.Cells(i, 1) && && Then
& && && && &&&Set ie = CreateObject(&internetexplorer.application&)
& && && && &&&ie.Visible = True
& && && && &&&On Error Resume Next
& && && && & With ie
& && && && && &&&.Navigate &http://218.28.109.124:81/cjcx/tmp_cx_zzcj.php&
& && && && && &&&While ie.ReadyState && 4 Or ie.Busy
& && && && && && && &DoEvents
& && && && && &&&Wend
& && && && && &&&.Document.All(&textkh&).Value = sh.Cells(i, 1)
& && && && && &&&.Document.All(&textzjhm&).Value = sh.Cells(i, 2)
& && && && && &&&.Document.All(&cmdok&).Click
& && && && &End With
& && && && &Set ie = Nothing
& && && &End If
& & Next i
End Sub复制代码
阅读权限95
在线时间 小时
(10.52 KB, 下载次数: 78)
18:57 上传
点击文件名下载附件
貌似已经实现，但是还是有问题：
1、打开很多IE浏览器
2、遇到错误准考证号码，就会出错
3、等待网页查询的代码好像不科学，容易死循环吧！未验证
那位大侠给看看！！！！！Sub OPIONA()
& & Dim ie
& & Set sh = Sheets(&Sheet1&)
& &For K = 2 To 600
& && &&&If sh.Cells(K, 1) && && Then
& && && && &&&Set ie = CreateObject(&internetexplorer.application&)
& && && && &&&ie.Visible = True
& && && && & On Error Resume Next
& && && && & With ie
& && && && && &&&.Navigate &http://218.28.109.124:81/cjcx/tmp_cx_zzcj.php&
& && && && && &&&While ie.readyState && 4 Or ie.Busy
& && && && && && && &DoEvents
& && && && && &&&Wend
& && && && && &&&.document.all(&textkh&).Value = sh.Cells(K, 1)
& && && && && &&&.document.all(&textzjhm&).Value = sh.Cells(K, 2)
& && && && && &&&.document.all(&cmdok&).Click
& && && && && && &Do Until InStr(.document.body.innerhtml, &2012年普通中招成绩查询结果&) & 0
& && && && && && && && && & Do Until .readyState = 4
& && && && && && && && && && &&&DoEvents
& && && && && && && && && & Loop
& && && && && && &Loop
& && && && && && &S_text = .document.body.innerhtml
& && && && && && && &Int_1 = InStr(S_text, sh.Cells(K, 1))
& && && && && && && &sh.Range(Cells(K, 3), Cells(K, 12)) = Split(Replace(Mid(S_text, Int_1, 138), &&/TD&&, &&), &&TD&&)
& && && && &End With
& && && && &Set ie = Nothing
& && && &End If
& & Next K
End Sub复制代码
感谢帮助,谢谢！
阅读权限90
在线时间 小时
查询实际网址。
http://218.28.109.125:81/cjcx/tmp_cx_zzcj.php?textdate=2012&textkh=&textzjhm=
阅读权限20
在线时间 小时
本帖最后由 nyxmq 于
16:35 编辑
xmyjk 发表于
00:59 http://218.28.109.125:81/cjcx/tmp_cx_zzcj.php?textdate=2012&textkh=&text ...
阅读权限50
在线时间 小时
nyxmq 发表于
Sub 普通中招成绩查询系统_2012年()
& & Columns(&A:C&).NumberFormatLocal = &@&
& & [a1:k1] = Split(&准考证号,照片号,姓名,语文,数学,英语,物理,化学,历史,思想品德,总分(7门文化课)&, &,&)
& & On Error Resume Next
& & With CreateObject(&internetexplorer.application&)
& & .Visible = True
& && &&&For p = 2 To Range(&a65536&).End(xlUp).Row
& && && && &.Navigate &http://218.28.109.125:81/cjcx/tmp_cx_zzcj.php?textkh=& & Cells(p, 1) & &&textzjhm=& & Cells(p, 2)
& && && && &While .readyState && 4 Or .Busy
& && && && && & DoEvents
& && && && &Wend
& && && && &Set r = .document.all.tags(&td&)
& && && && &For i = 14 To 22
& && && && && & Cells(p, i - 11) = r(i).innerText
& && && && &Next i
& && &&&Next p
& && &&&.Quit
& & End With
& & Cells.Font.Size = 9
& & Cells.Columns.AutoFit
& & Set r = Nothing
阅读权限50
在线时间 小时
普通中招成绩查询系统_2012年
17:43 上传
点击文件名下载附件
18.74 KB, 下载次数: 194
太强大了,感谢您的帮助！
阅读权限10
在线时间 小时
好神奇，蓝天老师，不知道可收徒不？
阅读权限20
在线时间 小时
进来学习。目前还看不懂，不知道怎么使用？
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师2017萧山中考成绩可以查啦！萧山考生如何查分？哪些注意点？看这里！
萧山2017年中考生注意啦！今天中午12：00以后，考生可凭准考证号、查询密号登录萧山教育网（www.），在“网上办事”一栏点击“网上查分”，查询自己的中考成绩啦！
查完成绩，下面这4点或许对你有帮助哦！
萧山各大高中历年中考分数线汇总↓↓↓
2016年分数线
2015年分数线
2014年分数线
萧山十一中
萧山实验高中（普高）
萧山实验高中（国际班）
城厢综合高中
萧山初中一览表
义桥实验学校
虎山路初中
金帆实验学校
红山农场学校
这些招生录取政策要记牢
各类高中招生录取批次分为，萧山中学提前招生录取（已完成）、特长班（生）录取、第一批次（定向分配）录取、第二批次（普高）录取、第三批次（职高、中专、技校）录取。
各类高中招生录取采用“平行志愿——分数优先、遵循志愿”的投档规则进行录取。第一批次志愿考生最多可填报1个，第二批次志愿考生最多可填报4个，其中，主城区面向萧山招生的六所学校中只能选报一所，第三批次志愿考生最多可填报8个。三个批次的志愿，在升学考试成绩揭晓后一次填报完毕。
对于外来务工人员子女，须在本区初中连续就读满三年（拥有我区连续三年初中学籍）且父母一方按规定在本区参加相应时段的社会保险满三年（凭缴纳社会保险清单凭证）即可填报全部批次的志愿。不满足上述条件的只可填报第三批次及第二批次的民办普高的志愿。杭州大江东产业集聚区户籍的学生只需拥有本区初中连续就读满三年即可（2018年起无效）。有特殊情况的考生，经个人申请，教育局审核同意后，可报考各类高中。
对于往届初中毕业生只允许报考第三批次及第二批次的民办普高的志愿（非萧山户籍往届生必须在萧山区毕业并有三年学籍且父母一方按规定在本区参加社会保险满三年）。
各类高中招生录取操作序列为：
●体育特长生录取
●普高特长班录取
●第一批次录取
●第二批次录取
●第三批次录取
按照此录取操作序列，凡被前一序列操作中录取的考生，其后续录取操作序列中所填报的志愿自动失效。
报考特长班（生）的考生需参加特长测试。报考普高特长班的学生可选报1～2个特长班，报考区教育局直属高中招收的体育特长生，可根据自身特长确定1个体育特长专项，选报1～4个学校。报名和测试在5月完成，具体根据各招生学校《招生简章》上的时间要求。
此外，特别要提醒的是，普通中专与第一、二批次招生学校二者不得兼报，对既填报第一、二批次志愿又填报普通中专志愿的学生，则第一、二批次的志愿按废弃处理。普通中专的成绩计分方式、志愿填报和录取办法请参阅杭州市教育考试院发布的《2017年杭州市各类普通中专招生手册》。
杭州主城区在萧山定额招生126人
今年杭州主城区的杭高、杭二中、学军中学、长河高中、杭四中、杭十四中6所省一级重点高中将面向萧山初三学生招生，每校各招21人，共计126人。
今年，萧山中学和萧山五中也面向杭州主城区定额招生126人。
来源 | 萧山发布
轮班小编 | 奇异果
责任编辑：
声明：本文由入驻搜狐号的作者撰写，除搜狐官方账号外，观点仅代表作者本人，不代表搜狐立场。
今日搜狐热点中考招生信息网ZKZS.NET
历年中考线
各地中考网
各年级视频辅导入口
友情链接中考招生信息网，为中学生的梦想加油!热门排行榜用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-7 18:13
查看: 4424
有知道在哪里查询中考成绩的吗？
这个宝宝好任性哦，都不嗦是哪个地方的，小编怎么查嘛~
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-7 19:22
怎么查中考成绩
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-8 01:10
云南曲靖怎么查
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-8 09:19
请问云南丽江的怎么查中考成绩
用户等级：管理员
注册时间：
在线时长：3702 小时
元宝：2291
金币：27673
<em id="authorposton17-7-7 18:16
冷眸0904 发表于
有知道在哪里查询中考成绩的吗？这个宝宝好任性哦，都不嗦是哪个地方的，小编怎么查嘛~
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-8 08:54
青海的中考分
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-7 19:31
吉林省松原市宁江区一中的成绩怎么能查到
用户等级：学前班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-8 09:02
袁永芳 发表于
云南曲靖怎么查还没改出来
用户等级：学前班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-8 09:03
希望考好一点
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-8 23:10
怎样查询毕节杨家湾中考成绩
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-9 07:40
风云吞吞吐吐 发表于
吉林省松原市宁江区一中的成绩怎么能查到松原成绩出来了么
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-9 10:59
六盘水市的中考成绩是多少
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-11 13:23
安徽宿州灵璧中考分数怎么查
用户等级：初中一年级
注册时间：
在线时长：22 小时
<em id="authorposton17-7-11 13:35
这个宝宝好任性哦，都不嗦是哪个地方的，小编怎么查嘛~
说的不错。
用户等级：幼儿园中班
注册时间：
在线时长：0 小时
<em id="authorposton17-7-13 09:06
云南保山的怎么查
Powered by