(مشکل ضروری) لطفا کمک کنید
سلام : دوستان من میخوام در تکه کد زیر که اینترنت اکسپلورر را به صورت مخفی باز میکنه میخوام جای اینترنت
اکسپلورر ، فایرفاکس موزیلا رو باز کنه همین . ممنون میشم کسی کمکم کنه
نکته : InternetExplorer.Application با این کد اکسپلور باز میشه به طور پیش فرض
[PHP]Private Sub Form_Load()
Dim IE As Object
Dim data As String
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = False
IE.Navigate ("http://google.com")
Do While IE.Busy
Loop
data = IE.Document.body.innerhtml
MsgBox data
'Text1.Text = data
IE.Quit
Set IE = Nothing
end sub
[/PHP]
