Ticket #2982: _FTP_Connect.au3
| File _FTP_Connect.au3, 467 bytes (added by mLipok, 10 years ago) |
|---|
| Line | |
|---|---|
| 1 | #include <FTPEx.au3> |
| 2 | #include <MsgBoxConstants.au3> |
| 3 | |
| 4 | Local $sServer = 'ftp.csx.cam.ac.uk' ; UNIVERSITY OF CAMBRIDGE ANONYMOUS FTP SERVER |
| 5 | Local $sUsername = '' |
| 6 | Local $sPass = '' |
| 7 | |
| 8 | Local $hOpen = _FTP_Open('MyFTP Control') |
| 9 | Local $hConn = _FTP_Connect($hOpen, $sServer, $sUsername, $sPass) |
| 10 | If @error Then |
| 11 | MsgBox($MB_SYSTEMMODAL, '_FTP_Connect', 'ERRROR') |
| 12 | Else |
| 13 | ; do something ... |
| 14 | EndIf |
| 15 | Local $iFtpc = _FTP_Close($hConn) |
| 16 | Local $iFtpo = _FTP_Close($hOpen) |
