소프트웨어 퓨어 베이직 이번에는 무엇이 잘못 되었나요?
2024.12.18 07:56
; FTP 다운로드 함수
Procedure DownloadFileFromFTP()
Protected FTPID, RemoteFile, LocalFile, Result
; FTP 서버 정보 설정
RemoteFile = "/Etc/Code.ini" ; 다운로드할 파일의 원격 경로
LocalFile = "Code.ini" ; 저장할 로컬 파일 경로
; FTP 서버에 연결
FTPID = OpenNetworkConnection("5738.kr", 21) ; FTP 서버 주소와 포트 (기본 FTP 포트 21)
If FTPID
; FTP 로그인
Result = FTPCommand(FTPID, "USER admin") ; 사용자명 전송
If Result = 0
Result = FTPCommand(FTPID, "PASS 0909") ; 비밀번호 전송
EndIf
; FTP 파일 다운로드
If Result = 0
Result = FTPDownload(FTPID, RemoteFile, LocalFile) ; 원격 파일 다운로드
If Result
MessageRequester("FTP Download", "Download complete!", #PB_MessageRequester_Ok)
Else
MessageRequester("FTP Download", "Failed to download the file.", #PB_MessageRequester_Ok)
EndIf
Else
MessageRequester("FTP Download", "Failed to login.", #PB_MessageRequester_Ok)
EndIf
; FTP 연결 종료
CloseNetworkConnection(FTPID)
Else
MessageRequester("FTP Download", "Failed to connect to FTP server.", #PB_MessageRequester_Ok)
EndIf
EndProcedure
; 실행
DownloadFileFromFTP()
쳇 gpt 이용해서 알고 싶은 코드만 보고 그대로 응용하는대 죄다 안돼는데 유료 버전은 좀 다른가요?
댓글 [3]
-
GreenTea 2024.12.18 09:17
-
지룡자 2024.12.18 11:44
퓨어배이직은 그런식인가 보군요 파이썬하고 좀 다르네요 파이썬은 오타만 없다면 되니깐요..
소중한 답변 감사 드림니다~ -
지후빠 2024.12.18 13:20
다음과 같은 방식으로 할 수 있을 것 같습니다. 도움말 예제에서 가져왔습니다.
InitNetwork()
If OpenFTP(0, "127.0.0.1", "id", "passwd", 0)
If SetFTPDirectory(0, "Etc")
Result = ReceiveFTPFile(0, "Code.ini", "c:\Code.ini")
Repeat
Debug FTPProgress(0)
Delay(300)
Until FTPProgress(0) = -3 Or FTPProgress(0) = -2
Debug "finished"
EndIf
CloseFTP(0)
Else
MessageRequester("Error", "Can't connect to the FTP server")
EndIf
GPT 답은 100% 라고 생각 하시면 무리입니다.
방향을 가르처 준다는 수준으로 생각으로 봐야 합니다.
최소한 기본 지식이 있어야 가능합니다.
위 내용 같은 경우 방화벽도 고려 해 봐야 합니다