Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
I need a help with ftp
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
01512871
Message ID:
01513512
Views:
70
Reading around i realized that the very mosto of the examples you can find around the internet are about ftp without proxy or with proxy different from Cern Proxy. I haven't found anything serious about this topic but I want to work around that as soon as i can. I will let you know. Thanks again for your support.
Alessio
>existing class?!? No.
>
>I cannot elaborate without proxy server.
>
>MartinaJ
>
>>what a mess !! :(
>>Do you know any already made class ?
>>Thanks anyway Martina
>>Alessio
>>
>>>http://support.microsoft.com/kb/166961
>>>
>>>
>>>>What if the proxy was a CERN ?
>>>>
>>>>>The big problem is... I have not proxy server for testing... :-(
>>>>>
>>>>>
>>>>>MartinaJ
>>>>>
>>>>>>Nothing to do :(
>>>>>>the right settings seems to be CProxyProtoco = 'http' and cProxyHost = zProxyIp
>>>>>>
>>>>>>Anyway I'm quite sure there's a bug in the code as I cannot get any Handle unless i set my new nInternetService property to INTERNET_SERVICE_HTTP
>>>>>>
>>>>>>Actually I can't call successfully the getFtpCurrentDir function (but it work unde my PC which is not under proxy :( )
>>>>>>
>>>>>>>Hmm,
>>>>>>>
>>>>>>>- lnConnect_Handle is zero
>>>>>>>- GetLastError() is zero
>>>>>>>
>>>>>>>- try set
>>>>>>> this.ftp.cProxyProtocol = "http"
>>>>>>> this.ftp.cProxyHost = "http://"+zProxyIp && 10.4.50.10
>>>>>>>
>>>>>>>
>>>>>>>The proxy is CERN type?
>>>>>>>
>>>>>>>MartinaJ
>>>>>>>
>>>>>>>>that's the problem :) it seems to be the errorcode = 0 and no errormessage :(
>>>>>>>>
>>>>>>>>>And ErrorCode and ErrorMsg are?
>>>>>>>>>
>>>>>>>>>MartinaJ
>>>>>>>>>
>>>>>>>>>>thanks for your help.
>>>>>>>>>>I put some messages inside the ftp class and discovered that the problem is in the call at the proc "OpenFTPConnection" where i cannot get a Handle from the internetConnect.
>>>>>>>>>>I tried to retrieve the error but I can't :
>>>>>>>>>>
>>>>>>>>>>   This.GetExtendedError()
>>>>>>>>>>      IF lnConnect_Handle = 0
>>>>>>>>>>	=MessageBox(Transform(this.GetExtendedErrorCode())+Chr(13)+Transform(this.GetExtendedErrorMsg()),0,"1")
>>>>>>>>>>         RETURN .F.
>>>>>>>>>>      ENDIF
>>>>>>>>>>
>>>>>>>>>>
>>>>>>>>>>
>>>>>>>>>>>What error you get after calling method OpenInternet()?
>>>>>>>>>>>?this.Ftp.GetExtendedErrorCode(),this.Ftp.GetExtendedErrorMsg()
>>>>>>>>>>>
>>>>>>>>>>>MartinaJ
>>>>>>>>>>>
>>>>>>>>>>>
>>>>>>>>>>>>here is lines of code :
>>>>>>>>>>>>
>>>>>>>>>>>>If !(Type("this.ftp") == 'O' and !IsNull(this.ftp))
>>>>>>>>>>>>	this.Ftp = createobject('ftp_service')
>>>>>>>>>>>>	this.ftp.cProxyPort = zProxyPort && 3128
>>>>>>>>>>>>	this.ftp.cProxyHost	= zProxyIp && 10.4.50.10
>>>>>>>>>>>>	If !Empty(zProxyip)
>>>>>>>>>>>>		this.ftp.cProxyProtocol = zProxyProtocol  && "http"
>>>>>>>>>>>>	Else
>>>>>>>>>>>>		this.ftp.cproxyProtocol = ''	
>>>>>>>>>>>>	EndIf 	
>>>>>>>>>>>>EndIf 
>>>>>>>>>>>>
>>>>>>>>>>>>this.statoConn = this.Ftp.OpenInternet(zUserFtp, zPwFtp, zFtpAddress, zFtpPort)
>>>>>>>>>>>>
>>>>>>>>>>>>
>>>>>>>>>>>>
>>>>>>>>>>>>
>>>>>>>>>>>>
>>>>>>>>>>>>>How you set cProxy???? properties on FTP object?
>>>>>>>>>>>>>
>>>>>>>>>>>>>MartinaJ
>>>>>>>>>>>>>
>>>>>>>>>>>>>
>>>>>>>>>>>>>>I tried but without success :(
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>I installed a filezilla ftp client on that pc and it works with these settings :
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>proxy FTP = none
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>Generic Proxy : connection method = http/1.1
>>>>>>>>>>>>>> host proxy = 10.4.50.10
>>>>>>>>>>>>>> proxy port = 3128
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>What should I do to make my program working ?
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>thanks again
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>Hi Alessio,
>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>Check cProxyProtocol property in help...
>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>MartinaJ
>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>Hi Michel, sorry for disturbing you, but I don't know what to do for connecting to a ftp server from a under proxy client.
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>I'm using the Robert Abram ftp service V.2.0.9 and it works fine without proxy but I don't know what to do for bypassing the proxy
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>actually I call the openinternet function in this way
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>	this.Ftp = createobject('ftp_service')
>>>>>>>>>>>>>>>>	this.ftp.cProxyPort      = zProxyPort  && 3128
>>>>>>>>>>>>>>>>	this.ftp.cProxyHost	= zProxyIp   &&  10.4.50.10     
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>       this.connStatus = this.Ftp.OpenInternet(zUserFtp, zPwFtp, zFtpAddress, zFtpPort)
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>well, i can't connect
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>what should I do to make it working ?
>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>Thank you so much
>>>>>>>>>>>>>>>>Alessio
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform