Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Uploading file via HTTP
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Internet applications
Title:
Uploading file via HTTP
Miscellaneous
Thread ID:
00819019
Message ID:
00819019
Views:
85
Hi,

I'm working on a project for uploading files via HTTP to a secure site. I'm using xxIPStuff to see if it will do the job but I keep getting a 'The server name or address could not be resolved' error message. I can't give out the User name and pass word but here is the code I am using.
*** Sending Files via HTTP from a VFP client
#INCLUDE WCONNECT.h
SET PROCEDURE TO wwUtils ADDITIVE
SET CLASSLIB TO wwIPStuff ADDITIVE

CLEAR

oHTTP = CREATEOBJECT("wwHTTP")

*** Connect to the server
oHTTP.HTTPConnect("https://www.aesdirect.gov/aesdirect/system/entry.cgi?p_action=BU", "UserName", "PassWord", .T.)

*** Initialize the variables that will be filled by HTTPGetEx
lcHTML=""     && Data buffer 
lnText=0      && Size of the output to return - 0 means autosize

*** Send the POST data and retrieve HTTP result
oHTTP.nHTTPPostMode = 2
oHTTP.AddPostKey("filename", "C:\EXPORTVSS\AES_OUT\UPTEST01.000", .T.)
lnResult = oHTTP.HTTPGetEx("/aesdirect/system/fup.cgi",@lcHTML,@lnText)
oHTTP.nHTTPPostMode = 1
IF lnResult # 0
   WAIT WINDOW ALLTRIM(STR(lnResult)) + " - " + oHTTP.cErrorMsg NOWAIT
   RETURN
ENDIF

? TRIM(lcHTML)

oHTTP.HTTPClose()   && Close the connection

RETURN
Any help is greatly appreciated.

Thanks,
Arriyel
Speak using soft and sweet words in case you have to eat them later.
Next
Reply
Map
View

Click here to load this message in the networking platform