使⽤vb获取⽹页源⽂件并保存的简单代码使⽤vb获取⽹页源⽂件并保存的简单代码
Private Sub Command1_Click()
Inet1.URL = ""
qq = Inet1.OpenURL(Text2.Text)
Text1.Text = qq
Open "" For Output As #1怎么编辑网页源代码
Print #1, qq
Close #1
answer = MsgBox("已经保存⽹页源代码到中", 0, "友情提⽰")
Print answer
End Sub
Private Sub Command2_Click()
End
End Sub
本⽂转⾃分⽠博客51CTO博客,原⽂链接blog.51cto/aiqing/1714如需转载请⾃⾏联系原作者aiqing
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论