vb webbrowser自动填表问题
用VB的Webbrowser实现百度空间评论的自动填表功能,就内容那个地方无法实现自动填,其他地方都可以。高手帮看看如何实现,测试可以用后把代码发上,谢谢。
我的代码是:
If vTag.Name = "spBlogCmtText" Then '内容
vTag.Value = "value"
End If
网页里的代码是这样的:
<td valign="top" class="f14" id="reTitle">内 容: </td>
<td> <textarea name="spBlogCmtText" id="spBlogCmtText" style="width:520px;height:155px" onFocus="hidErr(3);" > </textarea>
这个没做过 我的思路:
查找text name=spBlogCmtText 就赋值个他 比如 spBlogCmtText。text=“是打发斯蒂芬”
不知道是不是可行
可能评论那边有加密的吧 如果没的话不就乱套咯
防止有人刷帖~~~~
楼主要。。。?
mark
晕,难道真的没解决的方法,自己顶一下~~~
VB code:
If vTag.Name = "spBlogCmtText" Then '内容
vTag.innerhtml= "value"
End If
楼主,下面验证码怎么解决的?
up
用AutoHotKey
谢谢大家。
sysdzw,你那代码我测试了怎么还是不可以,如果你测试可以的话,可不可以把全部代码都发上来啊?
验证码我还没解决,验证码是要手动输入的。
啊。什么还是无法解决额??再顶~~
路过,帮顶下
{{----}
相关问答:
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好,用instance不是就可以了 ......
请教一下:我用vb写了一个调用Illustrator的测试程序,代码很简单:Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
在下是vb的新手,想写段程序,在vb中,使用wscript调用一些外部的命令,但是程序执行一直有错误,请各位高手帮忙解答下,谢谢。
代码如下:
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
请各位指点下:程序代码如下mingchen = "C:\文件路径\"
cat = New ADOX.Catalog
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & min ......
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害,回答基本都是爆料级的
大胡子升级真快啊,这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......