通过FTP连接linux服务器
Dim arrayText = ""
Dim isRemoteFileExists = ""
Dim isRemoteDirectoryExists = ""
Dim objFTP = ""
/*
参数一:服务器地址
参数二:登陆名
参数三:登陆密码
参数四:是否SSL
参数五:端口号
参数六:是否匿名
参数七:
参数八:是否sftp
*/
// 创建链接
objFTP = FTP.Connect("1.1.1.1","AAAA","BBBB!",False,22,False,1,{"sftp":True,"private_key":""})
TracePrint(objFTP)
// 获取根目录下面的文件夹,返回数组
arrayText = FTP.GetFileAndFolderList(objFTP,"/")
TracePrint(arrayText)
// 判断远程文件夹是否存在
isRemoteDirectoryExists = FTP.RemoteFolderExists(objFTP,"/home")
TracePrint(isRemoteDirectoryExists)
// 判断远程文件是否存在
isRemoteFileExists = FTP.RemoteFileExists(objFTP,"/home/xdc/bin/1.txt")
TracePrint(isRemoteDirectoryExists)
// 关闭连接
FTP.Disconnect(objFTP)