如何刷新WebBrowser控件MS Access

时间:2013-11-03 02:28:24

标签: vba ms-access browser access-vba

如何刷新MS Access 2010上的Web浏览器控件?

我正在尝试这个:

Private Sub Btn_Report_Click()
   'Create the report HTML...
   Set objFSO = CreateObject("Scripting.FileSystemObject")
   Set objFile = objFSO.CreateTextFile("C:\Windows\Temp\test_report.html")
   message= "Test of line on variable"
   objFile.WriteLine (message)
   objFile.WriteLine ("This is the second line")
   objFile.Close
End Sub

webcontrol在Control Source属性

上有此功能
="C:\Windows\Temp\test_report.html"

谢谢,

4 个答案:

答案 0 :(得分:3)

当更改/更新webBrowser控件的ControlSource属性时,它会自动刷新窗体上的webBrowser控件。

说过你可以使用以下技巧(在网址末尾生成随机数)

Form_frm_Codes.WebBrowser.ControlSource = "=""D:\abcd.html?rnd=" & Int((300 - 200 + 1) * Rnd + 200) & """"

答案 1 :(得分:2)

我做到了。

Show_Report.SetFocus
SendKeys "{F5}"

其中Show_Report是来自MS Access的Control:WebBrowser控件的名称。

谢谢。

答案 2 :(得分:0)

在我的情况下,我指的是一个本地文件,它在创建某个按钮后才开始存在。我解决了它:

Webbrowser1.ControlSource = "=""about:blanc"""
Webbrowser1.ControlSource = "=""N:\My Documents\test.xml"""

答案 3 :(得分:0)

很晚,但是:

wWebBrowserControl.Object.Refresh