'--------------------------------------------------------------------------------------------
' The below parameters are passed in
'--------------------------------------------------------------------------------------------
' Dim FTP_Address as String = "192.168.1.2" ' Printer Address
' Dim FTP_UserID as String = "" ' No USERID Needed
' Dim FTP_Password as String = "" ' No Password Needed
mFTP.Initialize("FTPResults", FTP_Address, 21, FTP_UserID, FTP_Password)
mFTP.SendCommand("BIN", "")
mFTP.SendCommand("PUT", File.Combine(File.DirRootExternal, Main.gDirectoryPDFs &"FakeBTPrinter.prn"))
mFTP.SendCommand("QUIT", "")
mFTP.Close