Upload til mappe

Hey Worm...
Det her script kan uploade, uploade flere på en gang (mener jeg), gemme indhold i database, og så er det uden komponent..
http://activedeveloper.dk/download/default.asp?mode=showdownload&id=430

Der er nogle eksempler med...

Har jeg prøvet... Var ingen succes :) Der er en der uploader billeder til samme dir, og en der uploader .txt filer til en mappe..

Jeg skal bruge en der uploader billeder til en mappe. og det skal helst være uden database :)

det er da uden database...
Jeg har da ikke nogen problemer med at bruge det i hvert fald..
2 sek.

Det er uden database.

Men problemet er at jeg ikke kan finde hoved og hale i de koder.

Jeg skal bruge en upload af billeder til en mappe der hedder pictures, og jeg kan ikke finde ud af at sætte dem sammen..

formen skal være:

<B>SUBMIT FORM</B><BR>

<FORM ENCTYPE="multipart/form-data" ACTION="eksempel2_svar.asp" METHOD="POST">
<P>Vedl&aelig;g en lille tekstfil:<BR>
<INPUT NAME="fileupload_file" TYPE="file"><INPUT NAME="fileupload_dir" TYPE="hidden" VALUE="pictures"><BR>

<P><INPUT NAME="Action" TYPE="submit" VALUE="Udf&oslash;r upload">
</FORM>

Aspsiden skal så være:

<%@ Language="VBScript" %>
<%  Option Explicit %>
<B>SVAR TEKST</B><BR>

<!-- #INCLUDE FILE="fileupload4inc.asp" -->
<%
    Dim objDict

    'Hent fil og evt. øvrige data
    Set objDict = FileUpload(Null, 10000, Null, Array("gif", "jpg", "jpeg"), "pictures", True, True)

    'Giv passende resultat
    If objDict("FILEUPLOAD_STATUS") = 0 Then
        'Giv en positiv besked
        Response.Write "Filen <A HREF=""" & objDict("FILEUPLOAD_URL") & """>" & objDict("FILEUPLOAD_FILENAME") & "</A> er uploaded til mappen " & objDict("FILEUPLOAD_DIR") & "<BR>"
        Response.Write "Det er en fil af typen " & objDict("FILEUPLOAD_CONTENTTYPE") & " og den fylder " & objDict("FILEUPLOAD_SIZE") & " bytes.<BR>"
    Else
        'Giv en negativ besked
        Response.Write objDict("FILEUPLOAD_STATUSTXT") & " (Fejl nummer " & objDict("FILEUPLOAD_STATUS") & ")<BR>"
    End If
%>

Sådan noget i den stil..
Så kan du ændre i den her linie efter hvad den skal kunne uploade:
Set objDict = FileUpload(Null, 10000, Null, Array("gif", "jpg", "jpeg"), "pictures", True, True)

Dem i arrayet er extensions der er accepteret.
Jeg er ret sikker på det her virker, men det er ikke testet.

hvilken mappe uploader den så til?

det skulle gerne uploade til pictures...

Det virker ikke helt.. den åbner slet ikke noget...

Kan jeg ikke få dig til at pakke de filer du har og sende?

jeg har ikke testet det..
kan jeg ikke gøre det i morgen ?

Har du husket at rette scriptnavnet i formen =

Jo.. Selvfølgelig.. Haster ikke..

den vil slet ikke åbne nogle sider.. den står bare og tænker...

Ville være rart hvis du ville smide filerne :)

Skal jeg nok ...

Smutter i seng nu..
Snakkes.

Så lykkedes det...

www.zix.dk/exp/exp.zip

Hvilken fil er det jeg skal rette i, hvis jeg nu vil flytte rundt på mappen. Dvs hvis jeg nu vil have den skal ligge billedet i ../pic

så skal du rette i svar.asp, i den her linie:
Set objDict = FileUpload(Null, 100000, Null, Array("gif", "jpg", "jpeg"), "pictures", True, True)

den skal vidst se ud som noget i stilen af:

Set objDict = FileUpload("../", 100000, "pic", Array("gif", "jpg", "jpeg"), "pictures", True, True)

samt du skal rette i filen submit.asp, der er en hidden folder der har value="pictures" nu, den skal så have navnet på det nye bibliotek.

jeg ved godt det er meget besværligt.. men jeg tænkte på..

kan man ikke lave noget med at sige at jeg et sted skal skrive placeringen og et andet sted skrive hvilke filtyper jeg vil have?

Jo... Det kan du godt.
Du kan rette i den her linie: Set objDict = FileUpload("../", 100000, "pic", Array("gif", "jpg", "jpeg"), "pictures", True, True)

så den hedder noget i stilen af:
Set objDict = FileUpload("../", 100000, Null, Array("gif", "jpg", "jpeg"), "pictures", True, True)

Og så rette linien med den hidden form i din submit side til at være ikke hidden, og så bare selv definere hvilken mappe du vil skirve..

Og så hvis du vil acceptere alle filer, så skal Array("gif", "jpg", "jpeg") byttes ud med null...

men kan jeg ikke lave en fil der f.eks. hedder setup.asp og inkludere den i alle filerne, som indeholder noget alá

placering = ../pictures
filer = "gif","jpg","jpeg"

jo da...

Så skal du bare sige:
Set objDict = FileUpload(placering, 100000, Null, filer, Null, True, True)

tror jeg nok.

har du fået det fikset..?

Nej.. Men sløjfede det.. satte en masse ' og så fik jeg det til at virke :)