Zablokowane Błąd w kodzie

[KoRn]

Hejka!

 

Mam taki kod (W basic):

 

input "Chcesz skasowac plik 'error.txt?' (T/N)"; q$
if q$ = "t" then goto 10
if q$ = "n" then goto 20
10 kill "error.txt"
20 end

 

I czemu on mi nie działa? :(

[Yoda]

A co konkretnie nie działa?

[KoRn]

A co konkretnie nie działa?

 

Wszystko :P Chcę zrobić coś takiego:

 

if keyboard_string='t'
{USUWACZ ERROR.TXT}

if keyboard_string='n'
exit;

 

Chcę zrobić to w basic.

[adam014]

Mialem identyczny problem przy pisaniu programu do sprawdzania dyskow.Błąd tkwi w tym że program zanim usunie plik zostaje zamknięty.Powinno byc tak:

dim odp$ as string * 1 
cls
input "Chcesz skasowac plik error.txt[t/n]";odp$
odp$=ucase$(odp$)
if odp$= "t" then
goto usun
elseif odp$="n" then
end
else
print "Nic nie wpisales!"
end
endif
usun:
print "Usuwam plik,czekaj..."
kill "error.txt"
sleep 2 'powinno wystarczyc
end

[KoRn]

THX ^^ zamykam...