I was able to use webbrowser component to access the pages and save them. However, still there is some problem in automatically saving the pages.
here is the code that i am using
Private Sub Form_Load()
Command3.Caption = "Save pages"
Private Sub Command3_Click()
Dim A(3) As Variant
A(1) = "laptop"
A(2) = "pc"
A(3) = "digital+camera"
For i = 1 To UBound(A)
FileName = "http://google.com/search?q=
" + A(i)
'WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT
WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DONTPROMPTUS
ER, "search_" + A(i) + ".html", "whatshouldbehere"
When i use 'WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT" then I am able to save all three pages.
1) the first file is named using the previous page's name (i.e for laptop page the name is MSN (which was the page displayed before it).
2) Another problem is that it also creates a directory for each file containing objects on that page.
When I use WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DONTPROMPTUS
ER, "search_" + A(i) + ".html", "whatshouldbehere" then the first file shown (here MSN during the form load) is saved three times with different names (using the array elements). Also, even though it says donotprompt user, still I have to press okay to save the file. Only thing is that the name that i have given as the 1rst parameter appears in the "file save dialog box".
Any idea as to what am i doing wrong?