Notifikationer

Markér alle som læst Log ud

mo-bo Nybegynder

25. juli 2001 - 00:46 Der er 3 kommentarer og
1 løsning

aspupload

Hej alle, jeg er ved at lave et site hvor det skal være muligt at uploade 2 filer.(gif/jpg)

Jeg er lige glad hvad der bliver brugt, om det er med eller uden ASPupload eller en anden form for komponent.
Det det skal kunne er at omdøbe billedernes navne til id fra en Access db ( feks. 1_billede.gif/jpg & 1_logo.gif/jpg) Hvor 1 er id nummeret.

Kan dette ikke lade sig gøre?? Jeg har dog en anden lille ting - jeg vil meget gerne hvis det kan skrives i JavaScript, da jeg ikke er nogen haj til VBscript.

På forhånd tak :-)

Synes godt om

mo-bo Nybegynder

25. juli 2001 - 00:48 #1

I er velkommen til at kontakte mig på icq 17988083, eller mail morten@bork.dk.

Synes godt om

eflow Nybegynder

25. juli 2001 - 01:18 #2

og det tror du du kan få for 30 point ??

Synes godt om

tzr Nybegynder

25. juli 2001 - 05:40 #3

Det kommer selvfølgelig an på om der er diverse 3. parts software og så\'n

-- Her er en der virker med Persits Upload --
<HTML>
<BODY BGCOLOR=\"#FFFFFF\">
<FORM METHOD=\"POST\" ENCTYPE=\"multipart/form-data\" ACTION=\"Upload.asp\">
<INPUT TYPE=FILE NAME=\"FILE1\"><BR>
<INPUT TYPE=FILE NAME=\"FILE2\"><BR>
<INPUT TYPE=FILE NAME=\"FILE3\"><BR>

<INPUT TYPE=TEXT NAME=\"DESCRIPTION\"><BR>

<SELECT NAME=\"CATEGORY\" MULTIPLE>
<OPTION>Image
<OPTION>Text
<OPTION>Source Code
<OPTION>Archive
</SELECT><BR>

<INPUT TYPE=SUBMIT VALUE=\"Upload!\">
</FORM>
</BODY>
</HTML>

Corresponding Upload Script (Upload.asp):
<%
Set Upload = Server.CreateObject(\"Persits.Upload.1\")

\' Upload files
Upload.OverwriteFiles = False \' Generate unique names
Upload.SetMaxSize 1048576 \' Truncate files above 1MB
Upload.Save \"c:\\upload\"

\' Process all files received
For Each File in Upload.Files

\' Save in the database as blob
File.ToDatabase \"DSN=data;UID=sa;PWD=zzz;\", _
\"insert into mytable(blob) values(?)\"

\' Move to a different location
File.Copy \"d:\\archive\\\" & File.ExtractFileName
File.Delete
Next
\' Display description field
Response.Write Upload.Form(\"Description\") & \"<BR>\"
\' Display all selected categories
For Each Item in Upload.Form
If Item.Name = \"Category\" Then
Response.Write Item.Value & \"<BR>\"
End If
Next
%>

Så kan du jo bruge det eller lade være :)

/Kenneth

Synes godt om

tzr Nybegynder

28. januar 2002 - 01:27 #4

takker for point :)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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
ASP classic kopiere database fil på server Af bsn i ASP	7	31/10/202610:20	01/11/202620:28
Persits.Upload Af bsn i ASP	9	17/09/202611:37	21/09/202615:15
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

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS