Avatar billede crunch Nybegynder
04. juli 2001 - 20:07 Der er 4 kommentarer og
1 løsning

File upload navn

Hej jeg står og skal bruge nogle data der hentes via
et \"file field\". Mit spørgsmål er hvordan får jeg de filnavne der vælges over på uploaded.asp ? Jeg bruger nedenstående kode .:


En formular der kan bruges til at sende filer til AspUpload med:




<html>
<body>

<form method=\"post\" enctype=\"multipart/form-data\" action=\"uploaded.asp\">
  <input type=file name=\"file1\"><br>
  <input type=file name=\"file2\"><br>
  <input type=file name=\"file3\"><br>
  <input type=submit value=\"upload!\">
</form>

</body>
</html>



Kode der modtager de filer brugerne sender og gemmer dem på serveren:



<html>
<body>
<%
  Set Upload = Server.CreateObject(\"Persits.Upload.1\")
  Count = Upload.Save(\"d:\\home\\FtpBrugerNavn\\db\\upload\")
  Response.Write Count & \" fil(er) modtaget.\"
%>
</body>
</html>
Avatar billede crunch Nybegynder
04. juli 2001 - 20:08 #1
det er altså den sidste kode jeg skal bruge variablen i, men hvordan får jeg dem ind i formen ?
Avatar billede keysersoze Ekspert
04. juli 2001 - 20:13 #2
må jeg spørge hvad navnet skal bruges til?
Avatar billede crunch Nybegynder
04. juli 2001 - 20:17 #3
Det er filens navn der skal ligge i en database så man kan downloade billederne.
Avatar billede keysersoze Ekspert
04. juli 2001 - 20:26 #4
så brug dette i stedet (skal dog lige omskrives lidt..:

<%

set conn = Server.CreateObject(\"ADODB.Connection\")
Session(\"MyConn\") = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"billeder.mdb\")

    Set Upload = Server.CreateObject(\"Persits.Upload.1\")
      Upload.OverwriteFiles = false
      Upload.SetMaxSize 300000, True
      Upload.SaveVirtual (\"/\")
   
    For Each File in Upload.Files
   
        File.ToDatabase Session(\"MyConn\"), \"insert into billeder(navn) \" &_
        \"values(\'\" & File.ExtractFileName & \"\')\"
        if Err <> 0 Then
          Response.Write headerfont & \"<br>Der er sket en fejl! : \" & Err.Description
       
    Else

          Response.Write headerfont & \"<br>Tilføjet...</strong></font>\"
   
    End If
      Next
%>
Avatar billede crunch Nybegynder
04. juli 2001 - 20:28 #5
tak.
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
Kurser inden for grundlæggende programmering

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