如何用VB寫一個執行後自動刪除的檔案?

Question

如何用VB寫一個程式

讓程式執行完之後自動刪除

麻煩教教我~謝謝~

Answer 1

VB提供一些維護資料及檔案的敘述，說明如下：
===================================================================
1. MkDir 資料夾
>> 建立新的資料夾 例：MkDir "C:\新資料夾"
注意：一定不能有資料夾路徑存在，不然路徑會錯誤
===================================================================
2.RmDir 資料夾
>> 移除指定資料夾 例：RmDir "C:\新資料夾"
注意：一定要有資料夾路徑，不然會找不到路徑
===================================================================
3.Kill 檔名
>> 刪除指定的檔案 例：kill "C:\新資料夾\檔案.dat"
注意：一定要有檔案路徑，不然會找不到路徑
===================================================================
4.App.Path
>> 取得目前程式執行所在的路徑
例：可以與kill連用，就像 kill App.Path+"\檔案.dat"
就可以殺掉跟程式同一層的檔案，
程式執行完之後自動刪除的話，就寫在 Form_Unload 事件吧！
===================================================================

Answer 2

To:威廉
你的方法好像不能自我毀滅吧@@?

Answer 3

你是要讓程式執行完它的工作後自我毀滅嗎?利用批次檔去做就可以了.
Private Sub Command1_Click()
Dim Dr As String, A As Long
Dr = "C:\Test.exe" '自己的程式
A = FreeFile
Open "c:\kill.bat" For Output As #A
Print #A, "@echo off"
Print #A, ":a1"
Print #A, "if exist " & Dr & " goto a2"
Print #A, "goto a3"
Print #A, ":a2"
Print #A, "del " & Dr
Print #A, "cls"
Print #A, "if exist " & Dr & " goto a1"
Print #A, "cls"
Print #A, ":a3"
Print #A, "echo Hello!!!>" & Dr & " "
Print #A, "del " & Dr
Print #A, "del c:\kill.bat"
Print #A, "cls"
Print #A, "exit"
Close #A
Shell "command.com /c c:\kill.bat", 6
End
End Sub