Problemer med IIS

Det er kan være at du bruger noget kode der betegnes som "farligt", og derfor nægtes adgang..

her er en af de koder som driller :
<%
  Set fs = CreateObject("Scripting.FileSystemObject")
  if Request.QueryString.Count() THEN
    Set sletfil = Request.QueryString("fil")
    Set f1 = fs.GetFile(replace(Server.MapPath(sletfil), "%20", " "))
    f1.Delete
  Response.Write "<div align=center><font face=Verdana size=2><b>Filen blev slettet !!</b></font></div><br><br>"
END IF
%>

er det fordi det er et script som kan slette filer ?

skal det ikke være Server.CreateObject?

gør det nogen forskel ?

åbenbart ikke..

Nogen steder havde du skrevet "1" (tal), andre "l" (lille L) i "f1"

<%
Option Explicit ' skal være øverst!
dim fs, sletfil, fl ' definer alle variablerne!

  if Request.QueryString("fil") <> "" THEN
  Set fs = Server.CreateObject("Scripting.FileSystemObject")
    sletfil = Request.QueryString("fil")
    Set fl = fs.GetFile(replace(Server.MapPath(sletfil), "%20", " "))
    fl.Delete
    Response.Write "<div align=center><font face=Verdana size=2><b>Filen blev slettet !!</b></font></div><br><br>"
  set fs = nothing
  set fl = nothing
END IF
%>

I mit eksempel, har jeg bruger "l" (lille L).
Og det virker.

Jeg tror at du ville have fanget den, hvis du havde brugt Option Explicit og defineret variablen!

..skulle have været et svar..
så, her er et svar :)

nå ja, jeg siger tusinde tak :o)

Det var så lidt :)

jo det virker fint... min fejl... Tak igen...

Kommentar: zentral
09/12-2003 01:07:38      fjernet efter ønske fra thesurfer da linket kan misbruges

eagleeye / CoAdmin

Jeg siger tak. :)