Upload

Hej

Jeg bruger Persits upload komponent.

I min upload form har jeg både text og fil input felter.

Eksempel fra Persits sample:

<%
    Set Upload = Server.CreateObject("Persits.Upload")

    ' Uncomment this line if unique file name generation is necessary
    ' Upload.OverwriteFiles = False

    ' We must call Upload.Save or SaveVirtual before we can use Upload.Form!
    Upload.Save "c:\upload"
%>

Der skriver man hvor man vil gemme filen før man kan hente noget fra eventuelle text felter i formen.

Det vil jeg ikke, da brugeren skal have mulighed for at bestemme hvilken uge han/hun uploader til. Dette uge nr skal også bruges til at oprette et bibliotek.

F.eks. har jeg et text felt i formen der hedder ugenr. Hvis denne er tom skal uge nr findes via DatePart("ww", date(), 2, 2) ...

lidt kode:

  if Upload.Form("ugenr") <> "" then
    year = DatePart("yyyy", date(), 2, 2)
    week = Upload.Form("ugenr")
  else
    dim year, week
    year = DatePart("yyyy", date(), 2, 2)
    week = DatePart("ww", date(), 2, 2)
  end if

Derefter opretter jeg bibliotek filerne skal uploades til:

Upload.CreateDirectory server.mappath("images\" & year & "\" & week), True

Og gemmer filerne
Count = Upload.SaveVirtual("images\" & year & "\" & week & "\")

og skriver hvor mange der er uppet

<%'=Count%> files uploaded.


Men..

Min Upload.Form("ugenr") ting fungerer ikke, da man skal skrive hvor filerne skal gemmes FØR man kan bruge Upload.Form() (f.eks.)...

Nogen der en ide til hvordan jeg kunne lave dette om?