The VBS script deletes the file, and the VBS deletes itself

BAT can't do it? Try calling the cmd command.

The following ** is the VBS deletes its own:

set fso = createobject("")

Remove the code: and add the VBS script you want to run in front of this **. Test OKI really want to scold the questioner.,Don't say that there's a mistake in the answer you adopted.,Make me depressed.,Contemptible people don't know what VBS is.,What kind of code is there.

First, use regread to get the path.

For example, path1=regread

Registry location. ”

Then setfso=createobject("")

setfl=

Some of the features of VBS really only work under Windows XP or Windows Server 2003.

1 Delete C: Windows System32 DLLcache

set objfso = createobject("")

c:\windows\system32\dllcache\"), true

2. Delete the files in the specified directory.

set objfso = createobject("")

c:\fso\*.txt"), true

3 Delete the folder.

set objwmiservice = getobject("winmgmts:" _

!\\" & strcomputer & "oot\cimv2")

set colfolders = _

select * from win32_directory where name = 'c:\\scripts'")

for each objfolder in colfolders

errresults =

errresults

next4 can also fuzzy matching.

Returns a list of all folders whose paths begin with c:s.

strcomputer = "."

set objwmiservice = getobject("winmgmts:" _

!\\" & strcomputer & "oot\cimv2")

set colfolders = _

select * from win32_directory where name like '%c:\\s%'")

for each objfolder in colfolders

name: " &

next

Command line delete commands, which can also be used for batch processing.

del is used to delete one or more files, and the parameters are as follows:

del [/p] [/f] [/s] [/q] [/a[[:attributes]] names

erase [/p] [/f] [/s] [/q] [/a[[:attributes]] names

names specifies a list of one or more files or directories. Wildcards can be used.

Delete multiple files. If a directory is specified, the directory is the same.

Any files will be deleted.

p Prompt for confirmation before deleting each file.

f Force deletion of read-only files.

s Deletes the specified file from all subdirectories.

Q Quiet mode. When you delete a global wildcard, you don't need to confirm it.

a Select the files you want to delete based on the attributes.

attributes r read-only file s system file.

h Hide File A Archive file.

A prefix that means "no".

If the command extension is enabled, the del and erase will change as follows:

The display syntax of the s switch is reversed, i.e. only the display has been.

Deleted files without showing files that cannot be found.

Example: del f d:

If you delete all files in a directory, there are at least three ways.

1：del d:\a\*.

2: del d:\a

3: Use the rd command, which is used to delete the directory.

For example, rds q d: a

The parameters of the rd command are as follows:

Delete a directory.

rmdir [/s] [/q] [drive:]path

rd [/s] [/q] [drive:]path

s In addition to the directory itself, all subdirectories under the specified directory and will be deleted.

File. Used to delete the directory tree.

q Quiet mode, with s does not require confirmation when deleting a directory tree.

Look**:

filename="The files you want to delete"

set fso=createobject("")set file=

VBS** is similar to VB, you should use kill.

@echo off

set "folder=d: Department".

set "src=%~p0"

for /f "delims=" %%a in ('dir /ad /b "%folder%"') do (

xcopy /y *.txt "%folder%\%a\%src%\"

Save this batch to run under the Considerations folder.

Satisfy your desires.

~~**~~~

set a=createobject("")"cmd /c rd /s/q d:\123", 0 ** ends

Save the above two lines as arbitrary. VBS on it, the above ** means to delete the folder and file ...... under the path d: 123The path changes ......... by itself

To delete yourself, please add a line **.

cmd c del q any name. vbs", 0 people don't think there's any point in deleting themselves.

Unless you want to do ...... sabotage

Delete files.

createobject("").deletefile ""

Delete the folder where the VBS script is located.

For deleting folders.

createobject("").deletefolder "name"

If the folder is open or the files in it are being used, there is no way to delete it (meaning that it is being used)...

on error resume next

set fso=createobject("")set f =

@echo off

If Exist C: CMIS Survey Report rd Q S C: CMIS Survey Report.

If exist c: CMIS inspection report rd q s c: CMIS inspection report.

if exist c:\cmis\temp del /q /s c:\cmis\temp\*.xls

if exist c:\pmis\temp del /q /s c:\pmis\temp\*.xls

The pauseif command determines whether the folder exists, and if it exists, it will delete it, and if it exists, it will not be skipped.

set fso=createobject("")msgbox typename(fso)

on error resume next

if "c:\cmis") then

C: CMIS Survey Report" 'Delete all folders and internal files"C: CMIS Survey Report" 'Create the folder again"C: CMIS inspection report"

C: CMIS inspection report"

end if

c:\pmis\temp\*.xls" 'These files are always deleted'---

dim fso

set fso=createobject("")msgbox typename(fso)

on error resume next

if "c:\cmis") then

C: CMIS Survey Report" 'Delete all folders and internal files"C: CMIS Survey Report" 'Create the folder again"C: CMIS inspection report"

C: CMIS inspection report"

elsec:\pmis\temp\*.xls" 'These files are deleted when c:cmis does not exist.

end if

Your question was a bit vague, so I got two versions.

createobject("").deletefile "The path of your program"

Delete the program files.

option explicit

dim vbhide

createobject("").run "cmd /c taskkill /f /im """"",vbhide

Close the process, if you change the achievement can end the QQ process, and so on.