用 VB 实现表单的自动提交[1]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 woodcoal 的 blog

【序】

    以摩托罗拉的九月大奖赛为例,下面介绍用 VB 实现带校验码的网页表单的自动提交。我们现看看摩托罗拉的投票页面:http://www.motorola.com.cn/news/925/photo.asp?id={525147e1-c4a7-41ee-9190-95800ac81e29}


    如果要对用户投票的话就必须先填写验证码!由于验证码是图片,而且是随即的,所以对自动提交数据增加了很大的难度。因此,如果要提交投票就必须先得到验证码!

    难点:(1)取得验证码图片并识别成相应数据;(2)提交数据表单。

    首先我们来剖析一下本页面的 html 源代码,代码如下:

        … …
<table>
        <form name="form1" method="post" action="photo_vote.asp">
                <input type="hidden" name="id" value="{525147e1-c4a7-41ee-9190-95800ac81e29}">
        <tr>
                <td>请输入4位数字验证码: <input type="text" name="checkcode" size=4><img src="count.asp?sksid=624be861d1ff9641de7f1d1ff967c1e711d1ff95cd5e9b1d1ff9|3812d0|1af2d7">

<input type="submit" name="submit" value="投 票"><input type="button" value="关 闭" onclick="javascript:window.close()"></td>
        </tr>
        </form>
</table>

        … …


为了保证代码的易读性,进行了相应的处理,并省略了部分无用的代码!不难看出的是:

    (1)表单的名称是:form1 ; 提交的页面是:photo_vote.asp ; 提交方式是:post
    (2)表单提交的数据有:id 和 checkcode 。其中 id 为隐藏域,内容是:{525147e1-c4a7-41ee-9190-95800ac81e29}
    (3)验证码的图片文件为:count.asp?sksid=624be861d1ff9641de7f1d1ff967c1e711d1ff95cd5e9b1d1ff9|3812d0|1af2d7 它是由 count.asp 随即动态生成,存在不确定性!
    (4)在网页的验证码的图片上按右键,保存图片时显示为:count.xbm 即图片的格式为:xbm

    通过上面的分析,问题就可以一个一个解决了。

 

【表单的提交】


    表单的提交有几种方式,常用的有两种:一是直接提交含表单提交数据的网址;二是修改原表单,然后提交新数据!
    对于第一种,我们在得到验证码后可以这样发送:http://www.motorola.com.cn/news/925/photo_vote.asp?id={525147e1-c4a7-41ee-9190-95800ac81e29}&checkcode=6793 然而由于摩托罗拉的网站对 cookies 进行了操作,这样做起来不是很好,而且也难成功,所以我们直能改用第二种方法,修改原有的表单。
    首先,利用 webbrowers 控件取得网页源代码(具体方法,请参考:http://www.cndevx.com/tips/showdoc.asp?detail_id=1337)利用vb中的 replace 函数将原表单网页的代码修改成:
        … …
<table>
        <form name="form1" method="post" action="http://www.motorola.com.cn/news/925/photo_vote.asp";>
                <input type="hidden" name="id" value="{525147e1-c4a7-41ee-9190-95800ac81e29}">
        <tr>
                <td>请输入4位数字验证码: <input type="text" name="checkcode" size=4 value=6739><img src="count.asp?sksid=624be861d1ff9641de7f1d1ff967c1e711d1ff95cd5e9b1d1ff9|3812d0|1af2d7">

<script>
        form1.submit();
</script>

<input type="button" value="关 闭" onclick="javascript:window.close()"></td>
        </tr>
        </form>
</table>
        … …


本文关键:VB 表单 自动提交 XBM
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top