Avatar billede bennetsen Nybegynder
21. maj 2001 - 23:16 Der er 4 kommentarer og
1 løsning

Slette billeder fra server + database

Jeg skal lave en mindre auto database med billeder.
Jeg gemmer stien til billerne i et tekstfelt og sletter posterne med nedenstående kode.

case \"del\"
    sql = \"delete from auto where id=\"&id
    conn.execute(sql)
    conn.close
    set conn = nothing
    response.redirect \"search.asp\"

Hvordan sletter jeg billedet fra serveren, når posten i databasen bliver slettet?
Kn nogen hjæpe med en lille bid kode :-)
Avatar billede netsrac Praktikant
21. maj 2001 - 23:20 #1
Sub DeleteAFile(filespec)
  Dim fso
  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  fso.DeleteFile(filespec)
End Sub

DeleteAfile server.mappath(\"fil.jpg\")
Avatar billede bennetsen Nybegynder
21. maj 2001 - 23:29 #2
Men jeg vil gerne have at (\"fil.jpg\") = indholdet i database feltet f.eks \"billedesti\".
Skal der køres en ny forespørgsel eller kan det inkluderes i nedenstående kode?

case \"del\"
    sql = \"delete from auto where id=\"&id
    conn.execute(sql)
    conn.close
    set conn = nothing
    response.redirect \"search.asp\"
Avatar billede erikjacobsen Ekspert
21. maj 2001 - 23:33 #3
Ja, du skal lave en select for at få filnavnet, og så slette posten i SQL-en
med \"delete from...\" og derefter slette filen som netsrac. Denne rækkefølge
er bedst, hvis noget går galt - så står du ikke pludselig og mangler et billede.
Avatar billede netsrac Praktikant
21. maj 2001 - 23:33 #4
  Sub DeleteAFile(filespec)
  Dim fso
  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  fso.DeleteFile(filespec)
End Sub

case \"del\"
    set rs = conn.execute(\"select billedesti from auto where id =\" & id)
DeleteAfile rs(\"billedesti\")
set rs = nothing
    sql = \"delete from auto where id=\"&id
    conn.execute(sql)
    conn.close
    set conn = nothing
    response.redirect \"search.asp\"
Avatar billede bennetsen Nybegynder
22. maj 2001 - 10:44 #5
Til netscat
Det ligner noget jeg kan bruge.
Jeg er på arbejde og kan først afprøve det når jeg kommer hjem, men her har du dine points.
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester