12. januar 2006 - 15:47Der er
14 kommentarer og 1 løsning
Browser fryser ved brug af FilesystemObject
Har denne kode på en asp-side hvor der skal slettes en fil, men når jeg forsøger at afvikle koden på min IIS 5.0 sker der intet.
Hvad er der galt med min kode???
----------------------------------------------------------- Dim filnavn filnavn = Request.Querystring("filnavn")
Dim fso, Filepath, fileObject Set fso = Server.CreateObject("Scripting.FileSystemObject") Filepath = "d:\Inetpub\wwwroot\testmiljo\filer\" Set filObject = fso.GetFile(Filepath&filnavn)
On error resume next If (err.number = 0) Then
If filObject.FileExists(Filepath&filnavn) Then filObject.DeleteFile(Filepath&filnavn) End if
AI skal væves ind i kultur og processer for at skabe reel forretningsværdi
Slettet bruger
12. januar 2006 - 15:57#1
Hej
I mine øjne ser dit ovenstående script rigtigt ud! Men for at lokalisere problemet lidt så prøv lige at lave en test med dette her script som med sikkerhed virker: <% dim fs Set fs=Server.CreateObject("Scripting.FileSystemObject") fs.CreateTextFile("c:\test.txt",True) if fs.FileExists("c:\test.txt") then fs.DeleteFile("c:\test.txt") end if set fs=nothing %> - Bare med en fil som gerne må slettes...
Jeg mener. Det er ikke sikkert at det er på serveren fejlen ligger... Det kunne også godt være browseren eller lignende...
\Dan
Synes godt om
Slettet bruger
12. januar 2006 - 16:00#2
ups... Jeg overså da lige noget i dit script... Skal din linie hvor du tjekker om filen eksisterer inden du sletter den ikke indeholde "true"? Sådan her: If filObject.FileExists(Filepath&filnavn) = True Then
Hm, har nu tjekket med dit eksempel, men resultat er det samme.
Browserne, Firefox og IE, står og venter på at scriptet bliver færdigt.
Men det sker bare ikke...
Synes godt om
Slettet bruger
12. januar 2006 - 22:20#5
hmm... lyder underligt... Jeg kunne godt tilbøjelig til at tro det er serveren og ikke scriptet der er et problem med...
- Men jeg synes det er underligt den ikke bare kommer med en fejlmeddelelse så... Prøv lige at fjerne dit tjek med om filen eksisterer, og se om den så kommer med en fejlmeddelelse om at filen ikke eksisterer...
- Og hvordan kan din querystring "filnavn" for eksempel se ud? Der må jo ikke være to skråstreger i træk...
Hænger browseren også bare hvis du prøver med nedenstående? <% dim fs Set fs=Server.CreateObject("Scripting.FileSystemObject") fs.CreateTextFile("c:\test.txt",True) if fs.FileExists("c:\test.txt") then fs.DeleteFile("c:\test.txt") Response.Write "Filen blev stettet!" end if set fs=nothing %>
Har nu ændret i koden : ------------------------- Dim fso, Filepath et fso = CreateObject("Scripting.FileSystemObject") Filepath = Server.MapPath("../uploadfiler/"&filnavn&"")
On error resume next If (err.number = 0) Then fso.DeleteFile Filepath,true else response.write "Fejl : " & err.description End if
Set fso = Nothing ----------------------------------------------
Har afprøvet scriptet på mit webhotel og det virker som del skal!
Tjae... Det kan måske være mappen der er skrivebeskyttet. Og du skal også give IIS-kontoen skrive-rettigheder til mapperne i root´en... Derudover skal du også "overordnet" give IIS tilladelse til at "skrive" til noget i al almindelighed...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.