实时滚动条你做不了,你弄一个虚拟的,提示正在下载,然后自己偷偷下载文件,再指定升级路径
Network.DownloadFile("ftp://ftp_XXX:ftp-XXX@XXXXXXXX/Update/Update.txt","D:\data\Update.txt","" ,"" ,False, 100000, True)
Network.DownloadFile("ftp://ftp_XXX:ftp-XXX@XXXXXXXX/Update/Update1.zip","D:\data\Update1.zip","" ,"" ,False, 100000, True)
UpdatePath = "D:\data"
Syscmd.Project.Update(False,True)