欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

vfp停提取网页上的查询结果,添加到数据表中

更新时间: 2014-01-05 02:27:28 责任编辑: Author_N1

 

VFP下提取网页上的查询结果,添加到数据表中
CREATE CURSOR T (准考证号 C(14),报名序号 C(12))
INSERT INTO T VALUES ([13412401151786],[240121150901])
INSERT INTO T VALUES ([13412401150398],[240121150902])
INSERT INTO T VALUES ([13412401150480],[240121150903])
INSERT INTO T VALUES ([13412401150631],[240121150904])


在VFP中,用代码方式根据上面数据表中的信息,在下面的网页上,自动填写网页表单上的内容:
准考证号:
报名序号: 
点击网页上的[查询]按钮后,将查询到的录取信息,添加到数据表中。
网址=[http://www.haedu.gov.cn/hadoe_plus/gk_cx/queryresult.aspx]

请大师们帮忙,在此表示感谢了!
oXML=Createobject("Microsoft.XMLHTTP")
oXML.Open("POST","http://www.heao.gov.cn/PZQuery/PZLQueryResult.aspx",.F.)
postdata = "ksh=13412401150398&bmxh=240121150902"
oXML.setRequestHeader("Content-Length",Len(postdata))
oXML.setRequestHeader("CONTENT-TYPE", "application/x-www-form-urlencoded")
oXML.Send(postdata)
If oXML.Status = 200 Then
=Strtofile(oXML.responseBody,'C:\A.TXT')
Endif

通过上面可以发现,PZLQueryResult.aspx 加了限制,提示“您现在访问的网站未被授权发布录取信息”
--参考方法--
网页使用了框架集和css
直接分析网址取内容不可行

以前所有类似的使用javascript
通过执行网页中的javascript来获取内容
这大概就是解决途径
对网页不熟
不知道如何调用

联系【回马枪】试试
--参考方法--
加了调试语句
运行后看看:ABC.TXT 文件
有没有 吕玉洁 信息???
=======================

Clear

*!* ctxtZKZH = "13412401150631"  && 准考证号
*!* ctxtSFZH = ""                && 身份证号
*!* ctxtBMXH = "240121150904"    && 报名序号

ctxtZKZH = "13412401151786"  && 准考证号
ctxtSFZH = ""                && 身份证号
ctxtBMXH = "240121150901"    && 报名序号
*!* 身份证号与报名序号选其一即可

oXML = Createobject("Microsoft.XMLHTTP")
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 02:27:28
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/10033/
本文WWW.DOC100.NET DOC100.NET版权所有。