Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Is there a command that let you delete stuff on the computer
#1
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
Reply
#2
KILL I beleive
[Image: sig.php]
Back by popular demand!
I will byte and nibble you bit by bit until nothing remains but crumbs.
Reply
#3
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)
Reply
#4
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. Tongue or something that would destroy the whole hard drive.

she's been gone for a while now.
Jumping Jahoolipers!
Reply
#5
Yeah, I miss her. She was so deliciously evil. . .
974277320612072617420666C61696C21 (Hexadecimal for those who don't know)
Reply
#6
KILL "C:\blah\blah.txt"
Reply
#7
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... Big Grin

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)

[Image: 11895-r.png]
Reply
#8
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:
Reply
#9
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.
*****
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)