Ich glaube, dein Problem liegt in der Pfad-Angabe:
StrPath ="../images/schueler/" & FileName
StrPath_kl = "../images/schueler/" & FileName_kl
Hier definierst du dir deine Pfade für die zu löschendenDateien.
Die liegen eine Ebene “über” der Datei, die diesen Code ausführt.
Mit Server.MapPath bekommst du das Root-Verzeichnis deinerWebanwendung.
Mit ../ willst du eine Ebene höher auf Dateien zugreifen,was nicht geht.
Wenn das Verzeichnis images im Root-Verzeichnis deinerWeb-Anwendung liegt,
versuch mal das .. wegzulassen oder schreib „~/images/“
Gruß
Tom
Von: Ursina Huwiler[mailto:bounce-Ursina_Huwiler@glengamoi.com]
Gesendet: Samstag, 21. Juni 2008 16:56
An: tb@sitepoint.de
Betreff: [ASP] FSO - Datei kann nicht gelöscht werden
Hallo
Warum kann ich die Datei nicht löschen? Ich hab schon viele möglichenVarianten durchprobiert und finde den Fehler einfach nicht. Die Rechte auf demOrdner "images" sind auf Vollzugriff mit Vererbung auf dieUnterordner. Auch die Variablen werden alle richtig ausgegeben mit denrichtigen Pfaden und Dateinamen usw.
Ich bekomme immer die Rückmeldung: Die Datei wurde nicht gefunden, obwohlich im Script abfrage, ob sie existiert und die Antwort ist "ja". DieDatei existiert auch wirklich.
Script:----------------------------------------------------------------------------------------------------------------------
If Request.Form("button") = "Ja" Then
If LCase(StrRef) = "fotos" Then
DIM FSO, StrPath, StrPath_kl, StrFile, StrFile_kl, FileName,FileName_kl
FileName = LCase(StrSName) & ".jgp"
FileName_kl = LCase(StrSName) & "_kl.jgp"
StrPath = "../images/schueler/" & FileName
StrPath_kl = "../images/schueler/" & FileName_kl
ForceDelete = True
Set FSO =Server.CreateObject("Scripting.FileSystemObject")
StrFile = Server.MapPath(StrPath)
StrFile_kl = Server.MapPath(StrPath_kl)
If FSO.FileExists(StrFile) Then
Response.Write "<br><br>Die Datei existiert"
Else
Response.Write "<br><br>Die Datei existiert nicht"
End If
FSO.DeleteFile StrFile, ForceDelete
FSO.DeleteFile StrFile_kl, ForceDelete
Set FSO = Nothing
End If
End If
End Script:-------------------------------------------------------------------------------------------------
Kann mir bitte jemand helfen. DANKE
Ursina