Inet controls

[mdmilner]

I realize I'm being a little stubborn. I can do this by executing a shell command to open FTP and to use a batch file as the series of commands...but, it appears I can use a pure code (no DOS) to do this.

What I'd like to do is ftp data to a location where I can import it into Office.
I found this:

Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal strURL As String, _
ByVal strFileName As String, ByVal dwReserved As Long, _
ByVal lpfnCB As Long) As Long

But the syntax it needs for the strURL is:
userassword@hostort/url-path

Problem is, the ability to throw userassword was removed (patched) by MSN due to a vulnerability with it just a few weeks ago.

Found these references:
http://search.microsoft.com/search/...n&st=a&qu="internet+transfer+control"&c=0&s=1
and
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/web/015.asp

I found MSInet.ocx on my machine and added a reference, but now I'm running into the most basic of problems.

How to use it.

Tried

Dim Inet1 As Inet
With Inet1
.AccessType = icUseDefault
End With

But this fails – it acts like it doesn’t know what this is.
Good 'ol Runtime Error '91'
Object Variable or With Variable not set

Any ideas at all?

Mike

 

[mdmilner]

Well drat - I keep doing this. Posting a question and figuring it out.
At least, I think I'm closer.

Think I was misreading the example.
As information should anybody be searching here later...

You add the Internet Control to the form and then add Text Boxes/Buttons referencing the control to have it do things. So far I've made this return a webpage.

Private Sub btnURL_Click()
    Me.Text1.Value = Inet1.OpenURL("http://www.microsoft.com/")
End Sub

Name of the Internet Control is Inet1


Mike