Solved

Inet control

Posted on 1998-12-16
2
169 Views
Last Modified: 2013-12-26
Using OpenURL, with SP3 installed, I still dont get the entire file heres my code (copied from BooksOnline)

Dim strURL As String
Dim intFile As Integer

strURL = "http://www.stomped.com/main.html
intFile = FreeFile()

Open App.Path & "\plandata.txt" For Output As #intFile
    Write #intFile, Inet1.OpenURL(strURL)
Close #intFile

Now I use VB6 at work, and this code works there under VB6 sp1. I only have VB5 at home, but I DO have SP3 installed and it only gets 2k of the file......Is there another way or a fix?? I searched thru the MS Tech Support site and found only the "fixed in SP2" articles.
0
Comment
Question by:jcorbin
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 1

Expert Comment

by:jf26028
ID: 1489038
you could use the winsock control.  It is very simple to use and will get the same job done.
0
 
LVL 18

Accepted Solution

by:
mdougan earned 100 total points
ID: 1489039
Since you are nesting the Write function with the OpenURL method, perhaps the OpenURL method has yet to return all of the data to the INet control before the Write function finishes.  Try doing the openUrl first.  Then, I think that there is an "IsBusy" property of the INet control (or something equivilant) that you can use to "DoEvents" until it is False.  Then, do your write statement against the INet document property.  (I'm doing this from memory, so forgive me if I don't have the exact names of things.)

MD
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction I needed to skip over some file processing within a For...Next loop in some old production code and wished that VB (classic) had a statement that would drop down to the end of the current iteration, bypassing the statements that were c…
Introduction While answering a recent question (http://www.experts-exchange.com/Q_27402310.html) in the VB classic zone, I wrote some VB code in the (Office) VBA environment, rather than fire up my older PC.  I didn't post completely correct code o…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

742 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question