关于WebBrowser1的方法(Navigate)问题

时间:2021-06-22 20:07:02
有一段代码,内容如下,但是我在执行时却说找不到方法,请问需要进行什么设置吗?
补充说明:
1.WebBrowser1是pictureBox
2.在客户那里运行exe文件时好像是能够执行的

Private Sub Command1_Click()
    Dim URL As String
    Dim Flags As Long
    Dim TargetFrame As String
    Dim PostData() As Byte
    Dim Headers As String
    Dim tVal As String

     URL = "http://www.xxx.com/timeecho.php"
     Flags = 0
     TargetFrame = ""
    
     PostData = "Information sent to host"
     PostData = StrConv(PostData, vbFromUnicode)
    
     Headers = "Content-Type: application/x-www-form-urlencoded" & _
        vbCrLf
    MyFrame_Name.WebBrowser1.Navigate URL

    Do While MyFrame_Name.WebBrowser1.Busy
        DoEvents
    Loop
    
    dakoku.WebBrowser1.Navigate URL
    tVal = dakoku.WebBrowser1.Document.body.outerhtml
    
    tVal = Delete_Tag(tVal)
    Debug.Print tVal
    
End Sub


5 个解决方案

#1


晕,没有人知道吗?

我安装了ocx还是没用。是不是还需要什么设置?

#2


1.WebBrowser1是pictureBox 

这个是什么逻辑??

#3


WebBrowser1是pictureBox

不知所云

#4


WebBrowser1和pictureBox 是两个东东哟,我也不清楚说什么哦

#5


pictureBox 命名为 WebBrowser1了吧?

#1


晕,没有人知道吗?

我安装了ocx还是没用。是不是还需要什么设置?

#2


1.WebBrowser1是pictureBox 

这个是什么逻辑??

#3


WebBrowser1是pictureBox

不知所云

#4


WebBrowser1和pictureBox 是两个东东哟,我也不清楚说什么哦

#5


pictureBox 命名为 WebBrowser1了吧?