Tabort!

13 svar · 415 visningar · startad av freddssite 18 apr. 2004

freddssiteMedlem sedan maj 2001123 inlägg

Trådstart18 apr. 2004 10:42#1

<%

Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
On Error Resume Next

Upload.SetMaxSize 1048576	' Limit files to 1MB
Count = Upload.SaveVirtual("/db/filer")


Set File = Upload.Files(1)
If File.ImageType = "GIF" or File.ImageType = "JPG" or File.ImageType = "PNG" Then

response.write("bild fil ej tabort\<br\>")%\>

\<%=File.ExtractFileName%\>

\<%

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("/db/upload.mdb") & ";pwd=;"
Set RecSet = Server.CreateObject("ADODB.Recordset")

AdGbook = "SELECT \* FROM annons"

RecSet.Open AdGbook, Connect, adOpenDynamic, adLockOptimistic

RecSet.AddNew

If Upload.Form("namn") \<\> "" Then
RecSet("namn") = Upload.Form("namn")
End If

If Upload.Form("telefon") \<\> "" Then
RecSet("telefon") = Upload.Form("telefon")
End If

Set File = Upload.Files(1)

RecSet("fil") = File.ExtractFileName
RecSet("hojd") =  File.ImageHeight
RecSet("bred") = File.ImageWidth

RecSet.Update
RecSet.Close
Connect.Close

else

'Det är här som filen identifieras med den tas ej bort!!!!!!!!!!

Dim fs, filename 
filename = File.ExtractFileName 

Set fs = Server.CreateObject("Persits.Delete.1") 

fs.DeleteFile(Server.MapPath("/db/filer/" & filename)) 

response.write("vanlig fil tabort\<br\>" & filename &"")
	
end if

Filen försvinner inte även att den är indentifierad som en icke bild fil! Va gör jag för fel?????

MogMedlem sedan nov. 2003266 inlägg

18 apr. 2004 11:15#2

Prova om det funkar med

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile Server.MapPath("/db/filer/" & filename), True
Set objFSO = Nothing

freddssiteMedlem sedan maj 2001123 inlägg

18 apr. 2004 11:36#3

Nej de fungerar inte heller! va kan man göra??

@ndersMedlem sedan juni 200032 967 inlägg

18 apr. 2004 12:12#4

"Fungerar inte" är en ganska dålig felbeskrivning. Vad händer / händer inte? Felmeddelande?

MogMedlem sedan nov. 2003266 inlägg

18 apr. 2004 12:43#5

Testa att skriva ut hela sökvägen till filen så att den stämmer.

response.write("vanlig fil tabort<br>" & Server.MapPath("/db/filer/" & filename))

Om den stämmer, kolla rättigheterna på filen så att scriptet får ta bort den. Hade själv strul med det, när jag lade upp filer via ftp fick inte scripten ta bort dessa.

Och som @nders sa:

"Fungerar inte" är en ganska dålig felbeskrivning. Vad händer / händer inte? Felmeddelande?

freddssiteMedlem sedan maj 2001123 inlägg

18 apr. 2004 13:12#6

Jag få detta om jag till ovanstående stäng!

D:\WWW\sajtensnamn\db\filer\filensnamn

kan de va att ja inte har har rättigheter att ta bort då eller???

Men jag får ju heller inget felmess....utan allt bara går igenom utan att filen tas bort!

@ndersMedlem sedan juni 200032 967 inlägg

18 apr. 2004 18:47#7

Det är inte så konstigt att du inte får något felmeddelande när du använder on error resume next. Ta bort genast.

freddssiteMedlem sedan maj 2001123 inlägg

19 apr. 2004 19:27#8

När jag tar bort den raden blir de ett

http 500 internt server fel!

hur får man fel kod från detta???

@ndersMedlem sedan juni 200032 967 inlägg

19 apr. 2004 19:28#9

Man avmarkerar "Friendly error messages" / "Egna http-felmeddelanden" i inställningarna i IE.

PeeerMedlem sedan mars 20025 907 inlägg

19 apr. 2004 19:29#10

Stäng av "visa egna HTTP-felmeddelanden" i Internet Explorer så du får ett riktigt felmeddelande istället (verktyg--> internetalternativ--> avancerat). Klistra in det meddelandet här.

freddssiteMedlem sedan maj 2001123 inlägg

23 apr. 2004 23:47#11

Jag får detta felmeddelandet!

Microsoft VBScript runtime error '800a0046'

Permission denied

/upload1.asp, line 58

PeeerMedlem sedan mars 20025 907 inlägg

24 apr. 2004 07:04#12

http://www.webforum.nu/search.php?s=&forumid=22 ->
Permission denied -> *enter*

Wow.. frågan har dykt upp tidigare. :OO
Tips: Rättigheter för IUSR_XYZ

freddssiteMedlem sedan maj 2001123 inlägg

24 apr. 2004 18:16#13

skall man kontakta sitt webbhotell eller skall man göra ngt själv i sin kod???

PeeerMedlem sedan mars 20025 907 inlägg

24 apr. 2004 22:34#14

Du kan inte göra det via din kod, men om du har en speciell mapp där det är meningen att du ska ha dina databaser så kan du med fördel lägga filen i den mappen istället. Den mappen borde ha tillräckliga rättigheter. Har du ingen sådan mapp så får du nog kontakta ditt hotell ja!