Port parameter in wininet.dll for FTP file transfer in VFP

[Shamina]

thread184-480895

Hi Guys,

How can I enter the port I want the file to be transfered to using the FtpPut.prg in the linked thread?

Many thanks,
Shamina

 

[GriffMG]

Do you mean your target ftp server is not running on port 21 - it is perhaps on 4900 or somesuch?




Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[Olaf Doschke]

If you want to use FTP or any FTP/HTTP file transfer mechanism within VFP instead of powershell, I'd suggest you try VFPConnection FLL:

https://www.sweetpotatosoftware.com...ction-update-http-post-ftp-commands-and-more/

Bye, Olaf.

 

[GriffMG]

I'm guessing a little but the ftpconnect function receives a host string, which might be something like

ftp.mysite.com

and could include a reference to a port using a colon delimiter thus

ftp.mysite.com:4910





Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[GriffMG]

Apparently there is a standard

Standard FTP URL format is recognized:
ftp://[user IDassword@]<host name>[ort]/[path name/]

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[Nigel Gomm]

DECLARE INTEGER InternetConnect ;
IN WININET.DLL ;
INTEGER hIPHandle,;
STRING lpzServer,;
INTEGER dwPort, ;
STRING lpzUserName,;
STRING lpzPassword,;
INTEGER dwServiceFlags,;
INTEGER dwReserved,;
INTEGER dwReserved

looks like the 3rd parameter to internetconnect

but i'm with Olaf - vfpconnectiom.fll (or westwind) will do most of the heavy lifting for you.

hth

n

 

[JRB-Bldr]

While I haven't used it for a good while now, for 'generic' FTP operations I was using the routines found at:

How do I transfer files using FTP?​

Those routines use the Default FTP Port 21, but the parameter passed is '0' indicating USE THE DEFAULT PORT.

Good Luck,
JRB-Bldr

 

[Shamina]

Hi Guys,

I have an FTP address like so: 00.000.000.000 and the port is 22 ...
Below is the function I'm using and passing a parameter called nServerPort which is declared publicly at the top of my program along with all other parameters - nServerPort holds the value 22.
However I'm still receiving a message saying the FTP address is not available.

Please assist:

FUNCTION  connect2ftp (lcHost, lcUser, lcPassword)   
   * open access to Inet functions    
   hOpen = InternetOpen ("vfp", 1, 0, 0, 0) 
	
   IF hOpen = 0    
      ? "Unable to get access to WinInet.Dll"   
      RETURN .F.   
   ENDIF   

   *... The first '0' says use the default port, usually 21.    
   hftpSession = InternetConnect (hOpen, lcHost, nServerPort, lcUser, lcPassword, 1, 0, 0)   &&... 1 = ftp protocol
   IF hftpSession = 0    
   * close access to Inet functions and exit    
      = InternetCloseHandle (hOpen)    
      ? "ftp " + lcHost + " is not available"   
      RETURN .F.   
   ELSE    
      ? "Connected to " + lcHost
   ENDIF    
RETURN .T.   
RETURN
ENDPROC

 

[Olaf Doschke]

Take a read on this:

https://www.lifewire.com/four-zero-ip-address-818384

I'm sure the FTP server you want to reach needs other addressing than 0.0.0.0

lcHost should be something like 'ftp.yourdomain.com', no IP.

Bye, Olaf.

 

[Nigel Gomm]

port 22 suggests SFTP rather than FTP/FTPS ???

if so you may be better off using

https://www.chilkatsoft.com/refdoc/xChilkatSFtpRef.html

hth

n