README.md

Description

let the program delete itself ;)

More Info

Submitted On
By	bmbsa
Level	Beginner
User Rating	5.0 (50 globes from 10 users)
Compatibility	VB 4.0 (32-bit), VB 5.0
Category	Files/ File Controls/ Input/ Output
World	Visual Basic
Archive File

API Declarations

NO APIs

Source Code

Open App.Path & IIf(Right(App.Path, 1) <> "\", "\Del.bat", "Del.bat") For Output As #1
Print #1, "@Echo off"
Print #1, ":S"
Print #1, "Del " & App.EXEName & ".exe"
Print #1, "If Exist " & App.EXEName & ".exe" & " goto S"
Print #1, "Del Del.bat"
Close #1
Shell "Del.bat", vbHide
Unload Me