在webbrowser控件中vb6中的內部錨

如何使內部錨在WebBrowser控件上工作？在webbrowser控件中vb6中的內部錨

這是我試過到目前爲止：

Private Sub Form_Load() 

    WebBrowser.Navigate "about:blank" 
    DoEvents  

    WebBrowser.Document.Open 
     WebBrowser.Document.Write "<html><head></head><body><a href=""#target"">link</a><a id=""target"" name=""target""><h1>target</h1></a></body></html>" 
    WebBrowser.Document.Close 

End Sub

來源

2017-01-09 xvan

你能描述它是怎麼出錯的嗎？什麼不按預期工作？ – DaveInCaz

點擊一個鏈接，重新加載about：blank而不是跳轉到書籤 – xvan

對不起？ -------- – DaveInCaz

使用JS寫的文件允許內部鏈接，但是HTML字符串必須是JavaScript的轉義。

Private Sub Form_Load() 

    Dim shtml As String 

    WebBrowser1.Navigate2 "about:blank" 
    DoEvents 

    shtml = "<html><head></head><body><a href=""#target"">link</a><a id=""target"" name=""target""><h1>target</h1></a></body></html>" 

    WebBrowser1.Document.parentWindow.execScript "document.write(" & Chr(39) & shtml & Chr(39) & ")" 

End Sub

來源

2017-01-09 20:07:02 xvan

在webbrowser控件中vb6中的內部錨

回答

相關問題