rolo
asked on
internet transfer control
is there any way to use this control without placing it on a form. all processes to be done in a module. i am able to use this control as mentioned by doing "dim aaa as new inet"
but i dont know how to track the statechanged event without a form.
any suggestions
but i dont know how to track the statechanged event without a form.
any suggestions
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
When using AzraSounds suggestion the event will appear in the class. Just look for the events in the class the way you would if it is on a form.
Assuming all above:
Bas module code:
Dim myInet As Class1
Sub Main()
Set myInet = New Class1
Do
DoEvents
Loop
End Sub
Public Sub InetStateChange(ByVal State As Integer)
MsgBox "State changed to " & State
End Sub
'--Class (Class1) module code
Dim WithEvents itc As Inet
Private Sub Class_Initialize()
Set itc = New Inet
End Sub
Private Sub itc_StateChanged(ByVal State As Integer)
Call InetStateChange(State)
End Sub
Cheers
Bas module code:
Dim myInet As Class1
Sub Main()
Set myInet = New Class1
Do
DoEvents
Loop
End Sub
Public Sub InetStateChange(ByVal State As Integer)
MsgBox "State changed to " & State
End Sub
'--Class (Class1) module code
Dim WithEvents itc As Inet
Private Sub Class_Initialize()
Set itc = New Inet
End Sub
Private Sub itc_StateChanged(ByVal State As Integer)
Call InetStateChange(State)
End Sub
Cheers
ASKER
THANX