vb.net网页元素 vbs获取网页源代码

VB.net如何修改网页中style或者DIV里的元素

在你的工程中引用Microsoft Script Control 1.0 这个COM组件(注意是COM的,不要到.net组件里去找)

为望都等地区用户提供了全套网页设计制作服务,及望都网站建设行业解决方案。主营业务为成都做网站、成都网站制作、望都网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!

然后用下面的方法执行JavaScript:

Dim sc As New MSScriptControl.ScriptControl

sc.Language = "JavaScript" '设置语言种类

sc.AddCode("function TestFunc(){return 'Hello world!'}") '添加脚本代码

MsgBox(sc.Run("TestFunc")) '显示一下那段脚本的返回值(这里你将看到Hello world!字符)

虽然这个人的回答出来了但是没有解决你的问题,以上是我补充的如何使用脚本。

VB.net webBrowser控件获取如何获取下面这网页元素的值

我将你的上面的html代码复制到一个test.html文件中

html

head

titleTest Page/title

/head

body

input name="txtCSRQ" class="textbox" id="txtCSRQ" type="text" readonly="readonly" value="1993-05-10"/

/body

/html

然后在vb.net的webbrowser中加载这个test.html,加载完毕后点击一个按钮获取input的value值,实现代码如下:

' 此方法为Form1的加载事件

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

' 加载本地文档test.html

WebBrowser1.Url = New Uri(String.Format("{0}/test.html", Application.StartupPath))

' 文档没有加载完毕之前将按钮禁用

Button1.Enabled = False

End Sub

' 此方法为Button1的Click事件

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim doc As HtmlDocument = WebBrowser1.Document

' 查找ID为txtCSRQ的元素

Dim element As HtmlElement = doc.GetElementById("txtCSRQ")

' 如果找到了改元素

If element IsNot Nothing Then

' 显示该元素的值

MessageBox.Show(element.GetAttribute("value"))

End If

End Sub

' 此方法为WebBrowser的DocomentCompleted事件

Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

' 文档test.html加载完毕后,使按钮可用

Button1.Enabled = True

End Sub

VB.NET webBrowser 怎么改网页元素的VALUE值 和点击BUTTON

For Each h_e As HtmlElement In WebBrowser1.Document.GetElementsByTagName("Value")

h_e.OuterText = "修改后的值"

Next

是执行button的click事件吗?不过要知道button的id才可以。

webbrowser1.Document.GetElementById(button的id).InvokeMember("click");


分享标题:vb.net网页元素 vbs获取网页源代码
新闻来源:http://azwzsj.com/article/dojgpee.html