Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
HomeAnnouncementsFree MagazinesWhite PapersSubmit Content
Discussion GroupsASP.NETWindows FormsLanguages.NET FrameworkVisual Studio.NET
Articles.NET FrameworkASP.NETToolsWindows Forms
.NET DirectoryOpen Source ProjectsUser GroupsWeb Resources
Related Topics
Visual Basic 6SQL ServerMS AccessOther DB ProductsMS Server ProductsMore Topics ...

.NET Forum / Visual Studio.NET / General / June 2005

Tip: Looking for answers? Try searching our database.

Help! I can't figure this one out.

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Wiley - 27 Jun 2005 18:47 GMT
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.

Free Magazines

Get these publications absolutely FREE for up to 12 months. There are no hidden fees and no obligation. Simply choose a title, complete the application form and submit it. Read more ...

Oracle MagazineNetwork ComputingComputer WorldBio-IT WorldeWeekInformation WeekInfosecurity
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.