1、弹出msgbox(fl) msgbox(fpath & filesys.GetName(fl)) 看值是否正确;
2、单独测试,看是否报错 Ftp1.Upload("d:\test.jpg", "/abc.jpg",True)