以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] 狐表数据 填入网页 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=141202) |
-- 作者:zcgmxf -- 发布时间:2019/9/24 7:27:00 -- [求助] 狐表数据 填入网页 老师,如何将狐表的数据填入某个网页?谢谢! |
-- 作者:有点蓝 -- 发布时间:2019/9/24 8:33:00 -- 参考:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=32808 |
-- 作者:zcgmxf -- 发布时间:2019/11/6 7:29:00 -- 老师,本人学艺不精,请告诉我如何将 我们foxtable 表中的姓名、性别填入 VPn 网页就行了,其余的自己学习。谢谢! 附:VPN网页源码 |
-- 作者:有点蓝 -- 发布时间:2019/11/6 11:06:00 -- 比如全局代码 Public Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Dim web As System.Windows.Forms.WebBrowser = sender \'把触发该事件的Sender转换为WebBrowser If web.ReadyState=System.Windows.Forms.WebBrowserReadyState.Complete\'由于加载完成事件会触发多次,分别为页面数据加载完成,DOM树加载完成.所以这里要判断一下.确保所有东西都加载完成再执行下面的操作 web.Document.GetElementById("physical_workerName").SetAttribute("Value",tables("表A").current("姓名")) web.Document.GetElementById("physical_workerSex").innertext = tables("表A").current("性别") End If End Sub |