作者在 2015-04-07 19:52:08 发布以下内容
obj=CREATEOBJECT("MSComDlg.CommonDialog.1")
obj.Flags = 524288 + 512 + 4
obj.filter = "文件类型(*.TXT)|*.TXT"
obj.FileName = "D:\"+"请选择升级文件 (可以拖动鼠标多选)"
obj.maxFileSize=10000
obj.ShowOpen()
self=obj.FileName+CHR(0)
?self
