mb wrote:Did you write scripts for CuteFTP? If yes, what exactly did you use the scripts for? Is it CuteFTP Home or Pro with the COM?
Thanks
-Mat
Yes I wrote them. I use them to upload my backup after Veritas runs (it calls it post-backup). I'm using CuteFTP Pro. Here is my script:
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Create TEConnection object
Set MySite = CreateObject("CuteFTPPro.TEConnection")
'File System Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
' Initialize remote server host name, protocol, port, etc.
MySite.Host = "xxx.xxx.xxx.xxx"
MySite.Protocol = "FTP"
MySite.Port = 21
MySite.Retries = 30
MySite.Delay = 30
MySite.MaxConnections = 5
MySite.TransferType = "AUTO"
MySite.DataChannel = "DEFAULT"
MySite.AutoRename = "OFF"
' WARNING!!! SENSITIVE DATA: user name and password.
MySite.Login = "USERNAME"
MySite.Password = "PASSWORD"
MySite.SocksInfo = ""
MySite.ProxyInfo = ""
' Connect to remote server
MySite.Connect
MySite.LocalFilterInclude = ""
MySite.LocalFilterExclude = ""
MySite.RemoteSiteFilter = ""
'Calculate the Date:
strDate = Now()
strMonth = Month(strDate)
If cInt(strMonth) < 10 Then
strMonth = "0" & strMonth
End if
strDay = Day(strDate)
If cInt(strDay) < 10 Then
strDay = "0" & strDay
End if
strYear = MID(Year(strDate),3,2)
DateFormatYYMMDD = " - " & strMonth & "-" & strDay & "-" & strYear
MySite.Upload "E:Backup", "/Backup" & DateFormatYYMMDD
'Report Output Dir
strTempDir = "e:Backup"
objFSO.DeleteFolder strTempDir
objFSO.CreateFolder strTempDir
MySite.Disconnect
MySite.Close
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
It works really well. If you have any questions, please let me know.