Snippets

Home / Snippets / VBScript - Self Deleting Script

VBScript - Self Deleting Script

Snippet Menu

snippet |

revisions |

comments | Related Snippets

related |

Add to Favorites | Email

download | Print

print | Blog It

blog it

Mon. Oct. 9th, 2006 2:22 AM

1 of 1

TimboTheGreat

"self deleting" | VBSCRIPT

1 comments

This script demonstrates the use of a function that allows a script to delete itself from disk. The function can be called from anywhere within the script and the script will continue to function normally (assuming the script does not further attempt to access itself on disk). Handy for homebrew uninstallation programs that require the removal of all installation files, including the setup file.

Option Explicit

MsgBox "Before the self delete", vbInformation, "Self Deleting Script"

'Delete the script

DeleteSelf

MsgBox "After the self delete", vbInformation, "Self Deleting Script"

Sub DeleteSelf()        

        Dim objFSO

        'Create a File System Object

        Set objFSO = CreateObject("Scripting.FileSystemObject")

        'Delete the currently executing script

        objFSO.DeleteFile WScript.ScriptFullName

        Set objFSO = Nothing

End Sub