Avatar billede jeg_var_gangsta Nybegynder
15. september 2002 - 10:49 Der er 7 kommentarer og
2 løsninger

Slet fil med FileSystemObject

Jeg skal bruge et script der kan slette en fil fra en mappe på webserveren.
Filnavnet er i en variabel, der hedder varFileName

Jeg skal bruge hele kode-eksemplet, incl. oprettelse of afslutning af FSO. Et link er ikke nok

PS Jeg aner absolt intet om filesystemobject, så vær blid :)

MVH Gangsta
Avatar billede jeg_var_gangsta Nybegynder
15. september 2002 - 10:50 #1
PS mappen, hvor filen ligger i hedder /upload/
Avatar billede likedon Nybegynder
15. september 2002 - 10:52 #2
noget i retning af dette:

------------------
    set billeder=connect.execute("SELECT * FROM tblannonce_pic WHERE pic=1 AND id_local="&local&" AND id_annonce="&id)
    Set fs = CreateObject("Scripting.FileSystemObject")
    do while not billeder.eof
        fs.deletefile(server.mappath("billeder\"&id&"_"&billeder("id_local")&".jpg"))
        fs.deletefile(server.mappath("billeder\"&id&"_"&billeder("id_local")&"_small.jpg"))
        billeder.movenext
    loop
    set fs=nothing
------------------------
Avatar billede jeg_var_gangsta Nybegynder
15. september 2002 - 10:54 #3
:)
Gider du sætte nogle kommentarer ind i scriptet, så jeg ved hvad der foregår?
Avatar billede likedon Nybegynder
15. september 2002 - 10:58 #4
-----------
Finder filnavnene fra databasen:
-----------
set billeder=connect.execute("SELECT * FROM tblannonce_pic WHERE pic=1 AND id_local="&local&" AND id_annonce="&id)
---------
"starter" FSO
-------
    Set fs = CreateObject("Scripting.FileSystemObject")
----------------
Kørere et loop så længe der er filnavne i databasen der passer til forespørgelsen
---------------
    do while not billeder.eof
--------------
sletter filer på web.
---------------------
        fs.deletefile(server.mappath("billeder\"&id&"_"&billeder("id_local")&".jpg"))
        fs.deletefile(server.mappath("billeder\"&id&"_"&billeder("id_local")&"_small.jpg"))
----------------
loop
----------------
        billeder.movenext
    loop
---------------
"Standser" FSO
---------------
    set fs=nothing
-----------------
sletter filnavnene fra databasen
--------------------
connect.execute("DELETE * FROM tblannonce_pic WHERE id_local="&local&" AND id_annonce="&id)
Avatar billede likedon Nybegynder
15. september 2002 - 10:59 #5
'-----------
'Finder filnavnene fra databasen:
'-----------
set billeder=connect.execute("SELECT * FROM tblannonce_pic WHERE pic=1 AND id_local="&local&" AND id_annonce="&id)
'---------
'"starter" FSO
'-------
    Set fs = CreateObject("Scripting.FileSystemObject")
'----------------
'Kørere et loop så længe der er filnavne i databasen der passer til forespørgelsen
'---------------
    do while not billeder.eof
'--------------
'sletter filer på web.
'---------------------
        fs.deletefile(server.mappath("billeder\"&id&"_"&billeder("id_local")&".jpg"))
        fs.deletefile(server.mappath("billeder\"&id&"_"&billeder("id_local")&"_small.jpg"))
'----------------
'loop
'----------------
        billeder.movenext
    loop
'---------------
'"Standser" FSO
'---------------
    set fs=nothing
'-----------------
'sletter filnavnene fra databasen
'--------------------
connect.execute("DELETE * FROM tblannonce_pic WHERE id_local="&local&" AND id_annonce="&id)
Avatar billede 2989 Nybegynder
15. september 2002 - 13:04 #6
Hej Gangsta

'opretter et FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")

'Sletter filen
fso.deletefile("/upload/" & varFileName)

'For en god ordens skyld fjerne vi fso fra rammene
set fso = nothing

Håber du kan bruge det
Hilsen FRANKE
Avatar billede jeg_var_gangsta Nybegynder
15. september 2002 - 20:27 #7
Franke > Tak for det! der er dog en lille rettelse:
fso.deletefile(server.mappath("/upload/") & "\" & varFileName)

I deler points'ene, tak for hjælpen til jer begge :)
Avatar billede jeg_var_gangsta Nybegynder
15. september 2002 - 20:28 #8
...likedon > Hvis du lige laver et svar...
Avatar billede likedon Nybegynder
16. september 2002 - 09:08 #9
ok
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