계정풀백업 + DB덤프 백업을 다운로드해놓고
파일 삭제를 늘 까먹어요.
그러다보니 늘 경고메일을 받고있어서
이대로 가다간 계정이 잘릴지도 모른다는 생각도 들고 해서
cute ftp pro용의 스크립트를 만들었어요.
텔넷에서 10번 계정풀백업 메뉴로 계정과 DB를 백업한 후에
이 스크립트를 실행하시면 다운로드가 끝난 후에
백업파일을 삭제할거에요.
... 이제 거대파일 경고메일 받는 일은 없을듯.. ;






Dim MySite 
Dim strHost 
Dim strLogin 
Dim strPassword 

'// ----- 설정시작 ------------------------------------------------------
- 
'// FTP 사이트의 주소를 입력합니다. 
strHost = "" 
'// FTP 사이트의 아이디를 입력합니다. 
strLogin = "" 
'// FTP 사이트의 패스워드를 입력합니다. 
strPassword = "" 
'// 백업받을 로컬 디렉토리를 입력합니다. 
strLocal = "" 
'// ----- 설정종료 ------------------------------------------------------
- 

Set MySite = CreateObject("CuteFTPPro.TEConnection") 

MySite.Protocol = "FTP" 
MySite.Host = strHost 
MySite.Login = strLogin 
MySite.Password = strPassword 
MySite.Connect 

If (Not Cbool(MySite.IsConnected)) Then    
   MsgBox "사이트에 연결할 수 없습니다." 
   Quit(1) 
End If 

If (Not (MySite.LocalExists(strLocal))) Then 
   MySite.CreateLocalFolder strLocal 
End If 

MySite.LocalFolder = strLocal 

MySite.Download strLogin + ".sql" 
MySite.RemoteRemove strLogin + ".sql" 
MySite.Download strLogin + ".tgz" 
MySite.RemoteRemove strLogin + ".tgz" 

MsgBox "작업완료: " + MySite.Status

full_backup_download.vbs