Public Sub ReadH(ByVal H As String)
Dim MyClient As Net.WebClient = New Net.WebClient
Dim MyReader As New System.IO.StreamReader(MyClient.OpenRead(H), System.Text.Encoding.Default)
Dim MyWebCode As String = MyReader.ReadToEnd
Form1.Rich1.Text = MyWebCode
MyReader.Close()
End Sub这个过程获取的源码,和用浏览器右键查看的结果一样的。源码只有20KB
里面没有<a href...>这样的内容用浏览器的保持全部页面的话,就可以看到一个文件夹和一个HTML文件,有900KB
里面有<a href...>这样的内容请问 webbrowser 如何保持当前页面的全部内容呢,
Dim MyClient As Net.WebClient = New Net.WebClient
Dim MyReader As New System.IO.StreamReader(MyClient.OpenRead(H), System.Text.Encoding.Default)
Dim MyWebCode As String = MyReader.ReadToEnd
Form1.Rich1.Text = MyWebCode
MyReader.Close()
End Sub这个过程获取的源码,和用浏览器右键查看的结果一样的。源码只有20KB
里面没有<a href...>这样的内容用浏览器的保持全部页面的话,就可以看到一个文件夹和一个HTML文件,有900KB
里面有<a href...>这样的内容请问 webbrowser 如何保持当前页面的全部内容呢,
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货