---
title: "Nån som kan ASPupload?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10945-nån-som-kan-aspupload"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Jymdis"
published: "2001-08-06T15:13:00.000Z"
updated: "2001-08-06T15:46:00.000Z"
replies: 7
views: 239
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/10945-nån-som-kan-aspupload"
---

# Nån som kan ASPupload?

## #1 — Jymdis, 2001-08-06T15:13Z

för att jag får ett litet fel.. 
ska nämligen köra in filnamnet i en databas samtidigt.. 

```
<% 
recordset1.addnew
filnamn = File.ExtractFileName
recordset1("filnamn") = filnamn
recordset1("typ") = Upload.Form("CATEGORY")
recordset1("kommentar") = Upload.Form("Description")
recordset1.update
%>
```

Den här koden ligger på sidan som fångar upp uppladdningen. Jag kan skriva ut File.ExtractFileName med response.write . 

Nån som ser mitt fel?

Permalänk: https://www.webforum.nu/p/10945

## #2 — LarsG, 2001-08-06T15:19Z

Nej, inte jag i alla fall. Får du något felmeddelande från databasen eller så?

Permalänk: https://www.webforum.nu/p/279706

## #3 — Jymdis, 2001-08-06T15:21Z

```
Microsoft VBScript runtime error '800a01a8' 

Object required: '' 

/admin/Upload.asp, line 49
```

Är felmeddelandet. 49 motsvarar "filnamn = File.ExtractFileName"

Permalänk: https://www.webforum.nu/p/279707

## #4 — Pace, 2001-08-06T15:23Z

Du har inte stängt "file" innan då?

Permalänk: https://www.webforum.nu/p/279708

## #5 — emission, 2001-08-06T15:27Z

Visa mer kod, tack.

Permalänk: https://www.webforum.nu/p/279709

## #6 — Jymdis, 2001-08-06T15:28Z

```
<%@LANGUAGE="VBSCRIPT"%> 
<!--#include file="../Connections/industri.asp" -->
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_industri_STRING
Recordset1.Source = "SELECT * FROM arkiv"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>
<% Server.ScriptTimeOut = 100000 %>
<body bgcolor="E6E6E6">
<table width="400" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td colspan="2"><font face="Verdana, Arial, Helvetica, sans-serif"><b> 
      <!--#include file="version.inc" -->
      </b></font></td>
  </tr>
  <tr> 
    <td width="300"> <font face="Verdana, Arial, Helvetica, sans-serif"> <font size="-2"> 
      <%
Set Upload = Server.CreateObject("Persits.Upload.1")

' Upload files
Upload.OverwriteFiles = True ' Generate unique names
Upload.SetMaxSize 10048576 ' Truncate files above 10MB
Count = Upload.SaveVirtual("../upload")

' Display description field

if Upload.Form("CATEGORY") = "Bild" then 
Response.Write "Du har laddat upp en bild med filnamn: " 
Else
Response.Write "Du har laddat upp ett prospekt med filnamn: " 
End if
For Each File in Upload.Files
response.write "<b>" & File.ExtractFileName & "</b>"
Next
%>
      </font></font> </td>
    <td width="100"> </td>
  </tr>
</table>
<% 
recordset1.addnew
filnamn = File.ExtractFileName
recordset1("filnamn") = filnamn
recordset1("typ") = Upload.Form("CATEGORY")
recordset1("kommentar") = Upload.Form("Description")
recordset1.update
%>
<%
Recordset1.Close()
%>
```

Permalänk: https://www.webforum.nu/p/279710

## #7 — emission, 2001-08-06T15:45Z

filnamn = File.ExtractFileName

måste ligga inom for each-loopen, annars finns inte file-objektet.

Sannolikt bör du väl lägga hela databas-insert-biten där.

Permalänk: https://www.webforum.nu/p/279711

## #8 — Jymdis, 2001-08-06T15:46Z

tackar så enormt mycket =)
\*känna sig som ett klantarsel\*

Permalänk: https://www.webforum.nu/p/279712

---

Tråden på webben: https://www.webforum.nu/amne/asp/10945-nån-som-kan-aspupload