Klasör oluştur sil

Tek link ile klasör oluturup oluşturlan klasörü silme ,klasör oluştuktan sonra durmunu altta true değer verir klasör yoksa durumu false verir

<%

set fso=createobject("scripting.filesystemobject")

klasordurumu=fso.folderexists ("c:\mrt\sanane")

if request.QueryString("cmd")="foldercreate" then

fso.createfolder "c:\mrt\sanane"

folderdurum="sanane klasör oluştu"

response.Redirect("folderk.asp")

end if

if request.QueryString("cmd")="folderdelete" then

fso.deletefolder "c:\mrt\sanane"

folderdurum="sanane klasör silindi"

response.Redirect("folderk.asp")

end if

%>

<% if klasordurumu=false then %>

<p><a href="folderk.asp?cmd=foldercreate">klasör oluştur</a></p>

<% end if %>

<% if klasordurumu= true then %>

<p> <a href="folderk.asp?cmd=folderdelete">klasör sil</a></p>

<% end if %>

folderdurumu:<% =klasordurumu %>