<%
If Not Request.QueryString("v")="" Then
Dim Obj, Strmapp
Set Obj = CreateObject("Scripting.FileSystemObject")
Obj.CreateFolder("d:\upload\" & Request.Querystring("v") & "\")
Response.Write("Mappen"& Request.Querystring("v") &" är nu tillagd")
Else
%>
<script type="text/javascript">
<!--
location.href=location.href+'?v='+prompt ("Mappnamn?");
// -->
</script>
<%End If%>
jag håller på att försöka göra en javascript prombt för
att skapa en mapp mha av asp på en server.
Men jag får det inte att fungera.
Kan någon säga hur man gör?
Detta är min kod:
<script type="text/javascript">
<!--
var answer = prompt ("Mappnamn?)
// -->
</script>
<%
Dim Obj, Strmapp
Set Obj = CreateObject("Scripting.FileSystemObject")
Strmapp = "<script language='JavaScript'>document.write ( answer )</script>"
Obj.CreateFolder("C:\Dynamic\" & Session("Username") & "" & Request.Querystring("v") & "\" & Strmapp)
%>