Q语言 释放文件代码

1Sub 释放文件()
2
3    V_sPath = Plugin.Sys.GetDir(0)  & "\"
4    Pic_path = "Attachment:\"
5    bmp_path = V_sPath & "my_bmp\"
6    save_bmp = V_sPath & "save_bmp\"
7    PutAttachment bmp_path , "*.bmp"
8    PutAttachment bmp_path , "*.jpg"        
9    PutAttachment Plugin.Sys.GetDir(0), "作者声明.txt"    
10    PutAttachment Plugin.Sys.GetDir(0), "版本更新说明.txt"
11    PutAttachment Plugin.Sys.GetDir(0), "辅助操作说明.txt"    
12    PutAttachment Plugin.Sys.GetDir(0), "汉字库.ini"
13    PutAttachment Plugin.Sys.GetDir(0), "脚本日志.txt"
14    PutAttachment Plugin.Sys.GetDir(0), "自动登录帐号模板.ini"
15    PutAttachment Plugin.Sys.GetDir(0), "地图数据.ini"
16    PutAttachment Plugin.Sys.GetDir(0) & "\登录器\", "登录器列表.ini"
17    PutAttachment Plugin.Sys.GetDir(0) & "\登录器", "登录器文件请拷入此目录下.txt"          
18    PutAttachment save_bmp, "存图片名称.txt"
19
20End Sub