Hi to all. I have the following code in a VB app:
**** CODE SNIPETT START
Private Sub PostFile(strServer As String, strLocalFile As String, strURL As
String, Optional strUser As String, Optional strPass As String)
Dim hSession, hConnect, hRequest, hOpenUrl As Long
MORE CODE HERE that is not relevant....
If CBool(hRequest) Then
blnRequestEXok = UseHttpSendReqEx(hRequest, strLocalFile) ERROR HERE, vb
hilights hRequest as the offending dude!!!
End If
Call InternetCloseHandle(hRequest)
Call InternetCloseHandle(hConnect)
Call InternetCloseHandle(hSession)
End Sub
Private Function UseHttpSendReqEx(hRequest As Long, strUpFile As String) As
Boolean
**** CODE SNIPPET ENDS
When I try to run the app, I get the following:
Compile Error!
ByRef Argument Type Mismatch
VB indicates the error is in the line labled ERROR HERE above.
The Parameter list for UseHttpSendReqEx clearly has hRequest declared as
LONG, while strUpFile is a string (so is strLocalFile).
VB Hilights hRequest in the calling routine (line labelled ERROR HERE).
What am I not seeing here?
Thanks to all.
Wiley.
Wiley - 27 Jun 2005 18:53 GMT
Please ignore this post. I meant to drop it into VB Forums.
> Hi to all. I have the following code in a VB app:
>
[quoted text clipped - 39 lines]
>
> Wiley.