wodhttp.dll - WeOnlyDo Discussion board

wodhttp.dll (General questions)

by Rick Shaw, Tuesday, September 11, 2007, 15:53 (6283 days ago)

I want to use the dll in array because i seen in the help files that the notifications are 30times faster than events.

I am trying to use a array of the control, but when i run the project, all it does it freeze vb completely and i have to end task on it, what am i doing wrong? Could you please post the correct code to use the .dll in a array?

[code]
Dim Http1(0 to 100) as wodHttpDLXCom
Implements IwodHttpNotify


Private Sub Form_Load()
Dim x as Integer

For x = 1 to 100
Set Http1(x) = new wodHttpDLXCom
Set Http1(x).Notification = Me
DoEvents
Next
End Sub

Private Sub IwodHttpNotify_ClientCertRequired(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom)

End Sub

Private Sub IwodHttpNotify_Connected(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom)

End Sub

Private Sub IwodHttpNotify_Disconnected(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom, ByVal ErrorCode As Long, ByVal ErrorText As String)

End Sub

Private Sub IwodHttpNotify_Done(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom, ByVal ErrorCode As Long, ByVal ErrorText As String)

End Sub

Private Sub IwodHttpNotify_HeadersDone(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom)

End Sub

Private Sub IwodHttpNotify_HostCertificate(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom, ByVal Cert As wodHttpDLXComLib.ICertificate, ByVal ErrorCode As Long, ByVal ErrorText As String, Accept As Boolean)

End Sub

Private Sub IwodHttpNotify_Progress(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom, ByVal Position As Long, ByVal Total As Long)

End Sub

Private Sub IwodHttpNotify_Redirect(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom, URL As String, Allow As Boolean)

End Sub

Private Sub IwodHttpNotify_StateChange(ByVal Owner As wodHttpDLXComLib.IwodHttpDLXCom, ByVal OldState As wodHttpDLXComLib.HttpStates)

End Sub
[/code]


Complete thread:

 

  • wodhttp.dll - Rick Shaw, 2007-09-11, 15:53 [*]