如何实现点击一个按钮就退出,并删除一个文件夹?
如何实现点击一个按钮就退出,并删除一个文件夹?Func _out()
DirRemove(@ScriptDir & "\temp")
Exit
EndFunc ;==>_out
上面那个是我自己写的。可以正常退出,但不能删除文件夹。:face (2):
[ 本帖最后由 as86455011 于 2009-3-21 21:44 编辑 ] 有子文件夹吧?加个标志,递归删除所有文件和文件夹。 有子文件夹。
什么加个标志? Func _out()
Run(@ComSpec & " /c " & 'ping 127.0.0.1 -n 3&rd /q /s '&@ScriptDir&"\temp", "", @SW_HIDE)
Exit
EndFunc ;==>_out
补充上面的朋友,也有可能是TEMP文件夹正在被你现在所用的文件所调用,你也可以试试我上面写的。调用DOS命令,原理3秒钟自杀改。 好的。我试试。
先谢谢。 经实践。可以删除。
谢谢各位:face (33): 请问这个代码怎样用?
Func _out()
Run(@ComSpec & " /c " & 'ping 127.0.0.1 -n 3&rd /q /s '&@ScriptDir&"\temp", "", @SW_HIDE)
Exit
EndFunc ;==>_out
能给点实例吗? 那是个批处理,自杀式删除批处理自身
页:
[1]