Notifikationer

Markér alle som læst Log ud

bodyguard Nybegynder

22. september 2004 - 07:45 Der er 5 kommentarer og
1 løsning

Singel upload med funktioner

Hejsa

Jeg mangler et script hvor man kan uploade 1 billede, samt indtaste informationer om dette billede: Info og Pris. Man skal også kunne vælge hvilken mappe det skal uploades til via af en Select.

Venligst
Mark Zweidorff

Synes godt om

fennec Nybegynder

22. september 2004 - 08:21 #1

hvilket upload komponent bruger du???

Synes godt om

bodyguard Nybegynder

22. september 2004 - 08:23 #2

Dem som Wannafind har :|

Synes godt om

locturian Nybegynder

22. september 2004 - 08:32 #3

Du bruger da bare alle dine point her fra morgenstunden hva body :D

Synes godt om

bodyguard Nybegynder

22. september 2004 - 08:33 #4

Hehe ja... :]

Synes godt om

eagleeye Praktikant

22. september 2004 - 08:38 #5

Du kan lave en form som denne:

<HTML>
<BODY BGCOLOR="#FFFFFF">
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="uploadfile.asp">
File:<INPUT TYPE=FILE NAME="FILE1"><br>
Pris:<INPUT TYPE=TEXT NAME="pris"><BR>
Information:<INPUT TYPE=TEXT NAME="info"><BR>
Væg mappe:<select NAME="mappe"><BR>
<option value="/images/xxx/">Mappen xxx</option>
<option value="/images/yyy/">Mappen yyy</option>
<option value="/images/zzz/">Mappen zzz</option>
<INPUT TYPE=SUBMIT VALUE="Upload!">
</FORM>
</BODY>
</HTML>

Så kan du i filen uploadfile.asp ligge dette kode:

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

sti = Upload.form("mappe")
if right(sti,1)<>"/" then sti=sti&"/"

For Each File in Upload.Files
file.saveas Server.mappath(sti & File.Name)
filnavn = sti & File.Name
Next
'Man henter form felterne ved at skrive nanvet på upload objektet og ikke request:
pris=upload.form("pris")
info=upload.form("info")

'Så kan du evt gemme det i en database
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("db.mdb")
SQL = "insert into tabelnavn (fil, pris, info) values ('" & filnavn & "','" & pris & "', '" & info & "')
Conn.Execute(sql)
Conn.Close
Set conn=nothing

response.write "Filen " & filnavn & " er uploadet"

set upload=nothing
%>

Synes godt om

bodyguard Nybegynder

22. september 2004 - 08:40 #6

Nice :]

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
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS