1个回答
展开全部
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
程序自杀 () ' 一般情况下指点击程序界面右上角的“Ⅹ”后即退出程序后才删除自身
.子程序 程序自杀, , 公开, 删除自身,适合程序只运行一次的情况
.局部变量 文件名称, 文本型
.局部变量 临时文件名, 文本型
.局部变量 脚本, 文本型
文件名称 = #引号 + 取运行目录 () + “\” + 取执行文件名 () + #引号
临时文件名 = “c:\delus.bat” ' 这个“delus”可以随意命名的
脚本 = “:Repeat” + #换行符
脚本 = 脚本 + “del ” + 文件名称 + #换行符
脚本 = 脚本 + “if exist ” + 文件名称 + “ goto Repeat” + #换行符
脚本 = 脚本 + “del ” + #引号 + 临时文件名 + #引号 + #换行符
写到文件 (临时文件名, 到字节集 (脚本))
运行 (临时文件名, 假, #隐藏窗口)
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
程序自杀 () ' 一般情况下指点击程序界面右上角的“Ⅹ”后即退出程序后才删除自身
.子程序 程序自杀, , 公开, 删除自身,适合程序只运行一次的情况
.局部变量 文件名称, 文本型
.局部变量 临时文件名, 文本型
.局部变量 脚本, 文本型
文件名称 = #引号 + 取运行目录 () + “\” + 取执行文件名 () + #引号
临时文件名 = “c:\delus.bat” ' 这个“delus”可以随意命名的
脚本 = “:Repeat” + #换行符
脚本 = 脚本 + “del ” + 文件名称 + #换行符
脚本 = 脚本 + “if exist ” + 文件名称 + “ goto Repeat” + #换行符
脚本 = 脚本 + “del ” + #引号 + 临时文件名 + #引号 + #换行符
写到文件 (临时文件名, 到字节集 (脚本))
运行 (临时文件名, 假, #隐藏窗口)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询