Ta bort bildfil på server

4 svar · 396 visningar · startad av devotion 27 mars 2005

devotionMedlem sedan jan. 20013 582 inlägg

Frågan27 mars 2005 18:50#1

:)
Hej!

Har ett script för att publicera nyheter. Jag laddar upp; datum, nyhetstext, publicist samt sökväg till bilden på servern. Bilden laddas upp med hjälp av en komponent (som jag inte kommer ihåg namnet på just nu :r ) Bilden sparas på servern i mappen "newsImages"

Jag kan också ta bort nyheten från databasen m h a ett annat script.

Men..

Hur gör jag för att ta bort bilden som är kopplad till nyheten???

Som det är nu tas bara informationen som ligger i databasen bort. Bilden ligger därmed kvar...

Mvh

sifixMedlem sedan maj 200373 inlägg

28 mars 2005 08:42#2

pic="bild_som_ska_bort.gif"

Dim objFSO 

set objFSO=Server.CreateObject("Scripting.FileSystemObject") 
If objFSO.FileExists(Server.MapPath("../../img/"&pic&"")) Then 
    objFSO.DeleteFile Server.MapPath("../../img/"&pic&"")
else
 	response.Write("Ett fel uppstod vid borttagning av: "&pic&"")
End IF 

Set objFSO = Nothing

devotionMedlem sedan jan. 20013 582 inlägg

28 mars 2005 11:39#3

:)
Oki!

Hur kombinerar jag det med den övriga koden som skall ta bort posten i databasen?

Ska jag först göra en select för att ge variabeln "pic" filnamnet?

@ndersMedlem sedan juni 200032 967 inlägg

28 mars 2005 18:57#4

devotion skrev:

Ska jag först göra en select för att ge variabeln "pic" filnamnet?

Jepp!

Först en vanlig select-fråga. Använd sedan server.mappath() för att skapa en finfin sökväg (om du inte har komplett sökväg lagrad i databasen), gör delete med FSO, och kör din DELETE-SQL-fråga.

Mvh

devotionMedlem sedan jan. 20013 582 inlägg

28 mars 2005 18:59#5

Okidoki!!

Tack ska ni ha!

Mvh