Søg
Avatar billede karsten_larsen Praktikant
06. juli 2003 - 18:14 Der er 5 kommentarer og
1 løsning

Flytte fil ved opload på server

Så vidt jeg har kunne læse mig til (på www.azero.dk), så skal filer oploades til en sikker folder og dernæst flyttes til en anden, hvorfra de kan downloades.

Det starter mit problem.

Hvordan får jeg flyttet filen over til en anden mappe.

Set Upload = Server.CreateObject("Persits.Upload.1")
    Count = Upload.Save("/modtagelse_folder")
    Response.Write Count & " fil(er) modtaget."

For Each File in Upload.Files
  File.Copy "/endelig_folder" & File.ExtractFileName
  File.Delete
Next

Jeg har hentet hjælp fra http://www.aspupload.com/codesample.html, men det vil ikke fungere.

Der er ingen problemer med at uploade til en sikker mappe. Hvordan sikrer jeg mig også at kun visse fil typer accepteres til opload?

???:-) karsten_larsen
Avatar billede Søren Bech Morsing Praktikant
06. juli 2003 - 18:16 #1
du skal bruge filesystemobject

FileSystemObject.CopyFile "c:\sikkerfolder\test.jpg", "c:\ditweb\"
Avatar billede Søren Bech Morsing Praktikant
06. juli 2003 - 18:17 #2
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(filespec)
fso.CopyFile "c:\sikkerfolder\test.jpg", "c:\ditweb\"
Avatar billede karsten_larsen Praktikant
06. juli 2003 - 18:23 #3
Er det sådan her du mener?

Set Upload = Server.CreateObject("Persits.Upload.1")
    Count = Upload.Save("/modtagelse_folder")
    Response.Write Count & " fil(er) modtaget."

For Each File in Upload.Files
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(filespec)
fso.CopyFile "C:\modtagelses_folder", "C:\endelig_folder"
Next

Det virker ikke?
Avatar billede Søren Bech Morsing Praktikant
06. juli 2003 - 19:09 #4
Jeg ville dog uploade alle filer først, og så flytte dem én ad gangen bagefter.
Men nedenstånede burde virke
Tror ca. nedenståend
Set Upload = Server.CreateObject("Persits.Upload.1")
Count = Upload.Save("/modtagelse_folder")
Response.Write Count & " fil(er) modtaget."

Set fso = CreateObject("Scripting.FileSystemObject")

For Each File in Upload.Files
' tror du skal ha fat i noget upload af filen her?
  fso.CopyFile "C:\modtagelses_folder", "C:\endelig_folder"
fso.DeleteFile("C:\modtagelses_folder\dinfil...")
Next
Avatar billede karsten_larsen Praktikant
06. juli 2003 - 19:30 #5
Hmm - det prøver jeg så efter en ny kop kaffe.

:-) karsten_larsen
Avatar billede karsten_larsen Praktikant
29. juli 2003 - 10:05 #6
tak for hjælpen.
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 17:00 Film Server Af dcedata1977 i Andet software
I dag 12:56 Mistænkelige mails! Af ErikHg i E-mail
I går 14:10 Komme ind på : YouSeeMusic" Af Ikke-ekspert i Musik & videoafspillere
I går 13:27 Send/modtag i Outlook 2024 Af ErikHg i E-mail programmer
10/0915:34 Installer alarmlyd på Samsung Galaxy XCover 7 Pro Af ErikHg i Mobiltelefoner
White papers
Flere white papers »