A portion of the relevant code is below.
Not sure what is meant by ASCII mode but the server platform is
Windows Server 2007 with IIS 6.
dim sFTP as FTP
dim sMediaPath as string
dim sMediaFile as string
sMediaPath=fd.Filepath '''' from FileDialog
sMediaFile=fd.ChosenName '''' from FileDialog
sFTP.Initialize("FTP", myFTPIPaddress, 21, userID, password)
sFTP.UploadFile(sMediaPath, sMediaFile, True, "/inetpub/wwwroot/Accountabillity/visuals/" & sMediaFile)