VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 7111|回复: 2

[讨论] vb webbrowser填写有编辑器的网页

[复制链接]
 楼主| 发表于 2011-1-19 17:13:35 | 显示全部楼层 |阅读模式
如题,在填写表单的时候会遇到编辑器,比如百度博客新浪博客和讯博客等

百度博客 用inet控件正确提交
新浪     得一高手代码,用webbrowser 成功提交
  
和讯  用inet 提交  总是不成功,改了n次参数,用webbrowser 正文无法填写
关于这类的编辑框 有会填写的么
大家一起讨论下  
这个算是webbrowser 应用里比较难一点的

最后给出新浪填写这类内容的核心
关键是一个函数  如下

Private Sub panduan()
On Error Resume Next
Dim x
   For Each x In WebBrowser1.Document.All("editorContainer")
       If strnum = 0 Then
          x.Checked = 1 '如果只想模拟点击获取焦点就把这行去掉
          x.FireEvent ("onclick")
       ElseIf strnum = 1 Then
          x.Checked = 0
          x.FireEvent ("onclick")
       End If
   Next
End Sub

抛砖引玉 共同探讨

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
发表于 2011-1-19 21:06:11 | 显示全部楼层
你是不是在csdn问的那个人?我不是都告诉你了吗,webbrowser全可以写的
回复 支持 反对

使用道具 举报

 楼主| 发表于 2011-1-22 09:56:51 | 显示全部楼层
bu shi a 哥们留个qq交流下
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2023-2-6 07:21

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表