Slet filer på server

Kigger med. Har endda problemer med aspimage.

Du skal benytte Scripting.FileSystemObject til dette formål.

Det kan du nok gøre med en kode noget i stil med dette:

dim fso
set fso = Server.CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(sti_til_fil)
set fso = nothing

du henter først brugerens data ud ala:

Set RstObj_Image = Server.createObject("ADODB.Recordset")
Set fso = Server.CreateObject("Scripting.FileSystemObject")

strSQL_Image = "Select ImagePath FROM Image WHERE UsrID="&ditUsrID
RstObj_Image.open strSQL_Image, ConnObj

WHILE NOT RstObj_Image.EOF AND NOT RstObj_Image.BOF
fso.DeleteFile(Server.Mappath(RstObj_Image("ImagePath ")))
RstObj_Image.MoveNext
WEND
RstObj_Image.close
Set RstObj_Image = Nothing

- så erstatter du bare med dine egne navne på tingene :-)

hmm ja det kan jeg ikke helt gennemskue, kan du hjælpe med at sætte det ind i min nuværende kode?

                <% if mode = "ejerslet" then
               
                        'Tjecker om admin er logget ind
                        if session("adminnavn") = "" then
                            Response.Redirect("login_admin.asp?mode=login")
                        end if
                       
                        'Hiver alle brugere ud:
                        Set rs = Conn.Execute("select * from bruger order by brugerDato desc")


                        if request.ServerVariables("REQUEST_METHOD") = "POST" then
                                request.Form("brugernavn")
                                    set rs = conn.execute("select * from bruger where brugernavn = '" & request.Form("brugernavn") & "'")
                                    set beskr = conn.execute("select * from beskrivelse where brugernavn = '" & request.Form("brugernavn") & "'")
                                   
                                    if rs.eof then
                                   
                                        stripstate = "Ingen match"
                                    else
                                        conn.execute("delete from bruger where brugernavn = '" & request.Form("brugernavn") & "'")
                                        conn.execute("delete from beskrivelse where brugernavn = '" & request.Form("brugernavn") & "'")

                                        stripstate = "Bruger er slettet"
                                    end if
                end if %>

Hvor ligger billederne ? Ligger de i beskrivelse ?

Filerne ligger i images/brugernavn_1.* brugernavn_2.* osv (billederne ligger ikke i db)

løst via http://www.solutions2all.dk/forum_spm.asp?id=12218