Fehlermeldung

[Thomas S.]

Hallo Gemeinde
ich habe folgendes Problem.

FOR EACH feld IN Request.Form
DBvar = Request.Form(feld)
IF IsNumeric(DBvar)THEN
  SET RS = nameConn.Execute("SELECT PhysikalischerPfad, Dateiname FROM Projektdatenbank WHERE ID = "+DBvar)
  PfadDatei=RS("PhysikalischerPfad") & RS("Dateiname")
  Response.Write("PfadDatei="+PfadDatei)
  'nameConn.Execute("DELETE FROM Projektdatenbank WHERE ID = "+DBvar)
  SET FileObjekt=Server.CreateObject("Scripting.FileSystemObject")
  SET OneFile= FileObjekt.GetFile(PfadDatei)
Zeile 26  OneFile.Delete(FALSE)
END IF
NEXT

Fehlermeldung:

Serverobjekt-Fehler 'ASP 0177 : 800a0046'

Server.CreateObject-Fehler

/ZEL/ASP/secure/BenutzerVerwProjektloeschdb.asp, Zeile 26

Der Vorgang wurde erfolgreich beendet.

Das Script läuft auf zwei Servern. Bei einem geht es, beim anderen bekomme ich diese Fehlermeldung. Wieso??
Hat das was mit Benutzerrechten auf dem Verzeichnis zu tun oder habe ich was übersehen im Script?
Auf beiden ist der IIS4.

Vielen Dank

Gruß Thomas S.

[Stefan Falz]

SET FileObjekt=Server.CreateObject("Scripting.FileSystemObject")
  SET OneFile= FileObjekt.GetFile(PfadDatei)
Zeile 26  OneFile.Delete(FALSE)

Hallo,

also der beschriebene Fehler dürfte eigentlich nichts mit OneFile.Delete(False), sondern eher mit Set FileObjekt=... zusammenhängen.
Wenn ansonsten alles funktioniert, dann ist evtl. das ASP-Modul oder die Datei scrrun.dll nicht korrekt registriert.
Einfach mal per Regsvr32 ausprobieren. Wenn's dann immer noch nicht geht, mal schauen, ob der IUSR_Rechnername Leserechte auf %WINDIR%\System32\ und %WINDIR%\System32\Inetsrv\ hat. Daran liegt es in den meisten Fällen.

Tschau, Stefan