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 Next 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 教程 目录
总结以上是内存溢出为你收集整理的vb.net 教程 12-3 HtmlElement类 8 突破网页限制全部内容,希望文章能够帮你解决vb.net 教程 12-3 HtmlElement类 8 突破网页限制所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)