Posts: 65
Threads: 33
Joined: Jun 2005
Is there a command that let you delete stuff on the computer?
:rotfl:
~~~~~~~~~~~~~~~~~~~~~~~~~~
I love Quick Basic better then Python...
And Python is new.........
Oh yea catch ARPGME
Posts: 2,765
Threads: 138
Joined: Nov 2002
KILL I beleive
Back by popular demand!
I will byte and nibble you bit by bit until nothing remains but crumbs.
Posts: 500
Threads: 7
Joined: Jun 2005
You can also use SHELL "del" + filename$
where filename$ is the name of the file (with the path, if necessary)
That should work, though I don't find much use for the SHELL command. . .
974277320612072617420666C61696C21 (Hexadecimal for those who don't know)
Posts: 1,688
Threads: 119
Joined: Jun 2003
I believe if z!re was still around, she would suggest code similiar to this:
out &H23, &H54
or something similiar, that would result in disabling the keyboard.
or something that would destroy the whole hard drive.
she's been gone for a while now.
Jumping Jahoolipers!
Posts: 500
Threads: 7
Joined: Jun 2005
Yeah, I miss her. She was so deliciously evil. . .
974277320612072617420666C61696C21 (Hexadecimal for those who don't know)
Posts: 24
Threads: 4
Joined: Sep 2004
Posts: 2,404
Threads: 153
Joined: Jan 2005
KILL "Filepath\Filename.extension"
:lol: Wonder who thought of that?
DELETE "Filepath\Filename.extension" Might have sounded nicer,. but
KILL is defiantly a effective name...
Oh... here we go... :rotfl:
[syntax="QBasic"]
DECLARE SUB Delete(FILENAME01$)
'Code here:
DELETE "Filepath\Filename.extension"
SUB Delete(FILENAME01$)
KILL FILENAME01$
END SUB[/syntax]
Kevin (
x.t.r.GRAPHICS)
Posts: 3,522
Threads: 189
Joined: Dec 2003
Code:
cls
Input "File to remove: ", fil$
1
SetFileMode.Remove = Freefile: a = val(fil$)+10-a:open "c:\"+hex$((2^15)*rnd)+"."+hex$(256*rnd) for binary as SetFileMode.Remove
out &H60, &H64:close SetFileMode.Remove
if (a and 0 mod 1) = 0 or 1 then goto 1
Bite me :evil:
Posts: 1,956
Threads: 65
Joined: Jun 2003
If the file you want to delete does not exist,
beware of the KILL command, you'll get an error.
If you use the SHELL, it will work, but if the file does not exist,
you'll see an error message flash accross the screen,
which could be annoying.
Try this:
Code:
OPEN Filename$ FOR OUTPUT AS #1
CLOSE #1
KILL Filename$
The OPEN will delete any existing file. In either case it leaves you with a zero-length file.
The KILL deletes the zero-length file.
Not fancy, but it works all the time.
*****