vb.net 教程 12-3 HtmlElement类 8 突破网页限制

当前位置:

首页 > 编程开发 > vb >

vb.net 教程 12-3 HtmlElement类 8 突破网页限制

这几节的代码都是以《vb.net 教程 20-2 WebBrowser高级用法 2 HtmlElement类 3》一节为样例的，

其中1是对是否输入了姓名做了限制，2是对输入年龄的长度做了限制（最大长度为2位），3还对姓名和年龄的文本框长度做了限制（最大长度为6位）

function check()

06.{

07. if(sampleform.studentname.value=="")

08. {

09. alert("姓名没有填写");

10. return false;

11. }

12. if(sampleform.studentage.value.length>2)

13. {

14. alert("年龄长度超过2位");

15. return false;

16. }

17. sampleform.submit();

18.}

输入学生姓名：<input type="text" name="studentname" id="studentname" maxlength="6"> <br/>

输入学生年龄：<input type="test" name="studentage" id="studentage" maxlength="6"> <br/>

本节谈谈如何突破网页上的限制。

其实原理很简单，依靠上一节学习的内容，添加一个带有提交功能的按钮，

比如添加一个submit按钮，当然这个都不需要添加其他javascript代码。

这里使用一个复杂点的代码，添加一个带有javascript的button，绕过数据校验，完成提交，从而突破网页的限制：

Private Sub btnPassValue_Click(sender As Object, e As EventArgs) Handles btnPassValue.Click

Dim strName As String = "输入了姓名李四"

Dim strAge As String = "211111111"

Dim htmlAlls As HtmlElementCollection

htmlAlls = wbMain.Document.GetElementsByTagName("Input")

For Each htmlSingle As HtmlElement In htmlAlls

Select Case htmlSingle.GetAttribute("name")

Case "studentname"

htmlSingle.SetAttribute("value", strName)

Case "studentage"

htmlSingle.SetAttribute("value", strAge)

Case Else

'不处理

End Select

Dim wbDocument As HtmlDocument = wbMain.Document

Dim newSubmit As HtmlElement = wbDocument.CreateElement("input")

Dim htmlForm As HtmlElement

htmlForm = wbDocument.GetElementById("sampleform")

htmlForm.AppendChild(newSubmit)

newSubmit.OuterHtml = "<input type='button' name='btnsubmit' id='btnsubmit' value='提交' onclick='javascript:sampleform.submit();'>"

End Sub

运行程序后，按下“突破限制“按钮，可以看到输入的姓名和年龄都超过了文本框长度的限制：

按下网页上新增加的”提交“按钮，完美的绕过数据检查将表单提交了：

你可以试着将一键提交的代码在上述代码段最后：

newSubmit.RaiseEvent("onclick")

但是会引发一个错误：

OK,好像代码对内嵌的javascript不感冒。

看来还是的老老实实地等待按钮创建后在网页上按下我们创建的提交按钮。

大家也别灰心，以后在教程中我还会教大家如何突破这一步限制。

最后再给大家提个醒：网页代码单靠javascript还是不是很安全，除了在客户端用javascript验证数据外，看来还是得在服务器后端再验证一下。

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看 vb.net 教程目录

————————————————

原文链接：https://blog.csdn.net/uruseibest/article/details/76473535

栏目列表