---
title: "MysmartUpload"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/54050-mysmartupload"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bucher"
published: "2002-09-23T12:24:34.000Z"
updated: "2002-09-23T14:32:01.000Z"
replies: 3
views: 198
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/54050-mysmartupload"
---

# MysmartUpload

## #1 — Bucher, 2002-09-23T12:24Z

HJÄLP!
jag håller på med MysmartUpload och får inte till felet..Jag har skrivit så att filen ska laddas upp till en databas. men jag får ständigt samma felmeddelande:

"Feltyp:
aspSmartUpload (0x800A0009)
Subscript out of range
/skoter/ny.asp, line 66

Webbläsare:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) 

Sida:
POST 202 bytes to /skoter/ny.asp

POST Data:
fel '80020009' 
Undantag inträffade. 

/iisHelp/common/500-100.asp, rad 224 "

Kan någon hjälpa mig jag håller på att bli tokig..Sample filerna laddar upp filen till databasen men ej mitt script...

\<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%\>
\<!--#include file="adovbs.inc" --\>
\<html\>

\<head\>
		\<meta http-equiv="content-type" content="text/html;charset=iso-8859-1"\>
		\<title\>Skoter\</title\>
\</head\>

\<body\>
\<p\>\<font face="verdana, arial" size="4"\>\<b\>\<font face="Arial, Helvetica, sans-serif"\>Lägg 
  till skoter\</font\>\</b\>\</font\>\</p\>
\<p\>\<font face="Verdana, Arial, Helvetica, sans-serif" size="1"\>\<b\>\<a href="adm_menu.asp"\>Huvudmeny\</a\> 
  \| \<a href="javascript:window.close()"\>Logga ut\</a\>\</b\>\</font\>\</p\>
\<form method="POST" action="ny.asp?add=yes"\>
  \<p\>\<font face="verdana,arial" size="1"\>\<b\> M&auml;rke:\</b\>\<br\>
    \<input name="Marke" type="text" id="Marke" size="60" maxlength="250"\>
    \<br\>
    \<b\>Modell:\</b\>\<br\>
    \<input name="Modell" type="text" id="Modell" size="60" maxlength="250"\>
    \</font\>\<br\>
    \<font face="verdana,arial" size="1"\>\<b\>&Aring;rsmodell:\</b\>\<br\>
    \<input name="Arsmodell" type="text" id="Arsmodell" size="15" maxlength="10"\>
    \</font\> \<font face="verdana,arial" size="1"\>\<br\>
    \<b\>Motor:\</b\>\<br\>
    \<input name="Motor" type="text" id="Motor" size="50" maxlength="100"\>
    \<br\>
    \<b\>Kylsystem:\</b\>\<br\>
    \<input name="Kylsystem" type="text" id="Kylsystem" size="50"\>
    \<br\>
    \<b\>Matta:\</b\>\<br\>
    \<input name="Matta" type="text" id="Matta" size="50"\>
    \<br\>
    \<b\>M&auml;tarst&auml;llning:\</b\>\<br\>
    \<input name="Miltal" type="text" id="Miltal" size="20"\>
    \<br\>
    \<b\>Utrustning:\</b\>\<br\>
    \<input name="Utrustning" type="text" id="Utrustning" size="60"\>
    \<b\>\<br\>
    &Ouml;vrig info:\</b\>\<br\>
    \<b\> \</b\> \</font\>\<font face="verdana,arial" size="1"\> 
    \<textarea name="Ovrigt" cols="50" rows="8" id="Ovrigt" style="font-family: verdana,arial;"\>\</textarea\>
    \</font\>\<br\>
    \<font face="verdana,arial" size="1"\>\<b\>Pris:\</b\>\<br\>
    \<input name="Pris" type="text" id="Pris" size="20"\>
    kr (inkl moms)\</font\>\</p\>
  \<p\>\<font face="verdana,arial" size="1"\>\<b\>Bild (ange s&ouml;kv&auml;g):\</b\>\<br\>
    \</font\> 
    \<input type="file" name="Fil" size="60"\>
  \</p\>
  \<p\>\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>\<strong\>TIPS!\</strong\>\<br\>
    F&ouml;r att bilden ska passa webbsidans storlek b&ouml;r den vara ungef&auml;r 
    ???x??? pixlar. \</font\>\</p\>
  \<font face="verdana,arial" size="1"\>\<p\> 
  \<p\> 
    \<input type="submit" value="Spara" style="font-size: 8pt; font-family: verdana, arial"\>
  \</font\> 
\</form\>

\<% If Request.QueryString("add") = "yes" Then %\>
\<% 	Dim mySmartUpload	
	Dim File
	
	Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
	
	mySmartUpload.Upload
 'På raden ovan är felet....
	
%\>
\<!--#include file ="data.asp"--\>
\<%	tmp = Now()
	

	Addera = "SELECT \* FROM files"
	rs.Open Addera, conn, adOpenStatic, adLockOptimistic
	rs.AddNew
	rs("marke") = Request.Form("Marke")
	rs("modell") = Request.Form("Modell")
	rs("arsmodell") = Request.Form("Arsmodell")
	rs("motor") = Request.Form("Motor")
	rs("kylsystem") = Request.Form("Kylsystem")
	rs("matta") = Request.Form("Matta")
	rs("miltal") = Request.Form("Miltal")
	rs("utrustning") = Request.Form("Utrustning")
	rs("ovrigt") = Request.Form("Ovrigt")
	rs("pris") = Request.Form("Pris")
	rs("datum") = FormatDateTime(tmp,vbShortdate)
	rs("kl") = FormatDateTime(tmp,vbShorttime)
   'For each file In mySmartUpload.Files

    'If not file.IsMissing Then
		 file.FileToField rs.Fields("File Data")
		 rs("File Name") = file.FileName
	'End If
   'Next

	rs.Update

	rs.Close
	Conn.Close
	Set rs = Nothing
	Response.Redirect "adm_menu.asp"
%\>
\<% End If %\>
\<br\>
\</body\>
\</html\>

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

## #2 — solbulle, 2002-09-23T12:40Z

Ändra denna rad:

```
<form method="POST" action="ny.asp?add=yes">
```

Till:

```
<form method="POST" action="ny.asp?add=yes" ENCTYPE="multipart/form-data">
```

Btw så har de bra manualer o dylikt på sin webbsida, tex: <http://www.aspsmart.com/scripts/aspSmartUpload/publigen/content/templates/TPL_ADV_FAQ_01.asp?P=267&L=EN#9>

Osså föressten: **Välkommen till WF!**

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

## #3 — Bucher, 2002-09-23T13:51Z

tack för svaret Solbulle =))
har fler fel jag måste lösa nu...
t.ex
"Feltyp:
Request-objekt, ASP 0208 (0x80004005)
Det går inte att använda den allmänna Request-samlingen efter att BinaryRead har anropats.
/skoter/ny.asp, line 76"

tack för hjälpen =)

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

## #4 — martinpartin, 2002-09-23T14:32Z

samma gäller här

RS("databas") = MySmartUpload.Form("form")

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/54050-mysmartupload