---
title: "Problem med ASP-SMART-UPLOAD"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/40741-problem-med-asp-smart-upload"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "voigtann1"
published: "2002-04-02T16:57:30.000Z"
updated: "2002-08-14T18:55:28.000Z"
replies: 13
views: 474
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/40741-problem-med-asp-smart-upload"
---

# Problem med ASP-SMART-UPLOAD

## #1 — voigtann1, 2002-04-02T16:57Z

\<HTML\>
\<BODY BGCOLOR="white"\>
\<%

'  Variables
'  \*\*\*\*\*\*\*\*\*
   Dim mySmartUpload
   Dim file
   Dim oConn
   Dim oRs
   Dim intCount
   intCount=0
        
'  Object creation
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

'  Connect to the DB
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   set oConn = Server.CreateObject("ADODB.Connection")
   oConn.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & server.mappath("db/config.mdb")

'  Open a recordset
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   'strSQL = "SELECT \* FROM nobrain ORDER BY id DESC"
   'strSQL = "SELECT \* from files order by filename,FILE"
   strSQL = "SELECT \* from files order by filename"

   Set oRs = Server.CreateObject("ADODB.recordset")
   Set oRs.ActiveConnection = oConn
   oRs.Source = strSQL
   oRs.LockType = 3
   oRs.Open

'  Select each file
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   For each file In mySmartUpload.Files
   '  Only if the file exist
   '  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
      If not file.IsMissing Then

      '  Add the current file in a DB field
      '  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
         oRs.AddNew
         file.FileToField oRs.Fields("FILE")
		 oRs("filename") = file.FileName
         oRs.Update
         intCount = intCount + 1
      End If
   Next

'  Only allow txt or htm files
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   mySmartUpload.AllowedFilesList = "cfg"

'  DeniedFilesList can also be used :
   ' Allow all files except exe, bat and asp
   ' \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   ' mySmartUpload.DeniedFilesList = "exe,bat,asp"

'  Deny physical path
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   mySmartUpload.DenyPhysicalPath = True

'  Only allow files smaller than 50000 bytes
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   mySmartUpload.MaxFileSize = 50000

'  Deny upload if the total fila size is greater than 200000 bytes
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   mySmartUpload.TotalMaxFileSize = 200000

'  Upload
'  \*\*\*\*\*\*
   mySmartUpload.Upload

'  Save the files with their original names in a virtual path of the web server
'  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
   intCount = mySmartUpload.Save("members/" & session("user"))
   ' sample with a physical path 
   ' intCount = mySmartUpload.Save("c:\\temp\\")

'  Trap errors
'  \*\*\*\*\*\*\*\*\*\*\*
   If Err Then
      Response.Write("\<b\>ERROR\</b\>\<br\> You tried to upload something diffrent then: \*.cfg, \*.txt, \*.exe")
   Else
   '  Display the number of files uploaded
   '  \*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
      Response.Write(intCount & " file(s) uploaded.")
   End If

'  Destruction
'  \*\*\*\*\*\*\*\*\*\*\*
   oRs.Close
   oConn.Close
   Set oRs = Nothing 
   Set oConn = Nothing 
%\>
\</BODY\>
\</HTML\>

jag klarar uploada filerna .... men dom sparars inte i databasen.. har försökt mixtra med koden som man fick till men det fungera inte.....

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

## #2 — voigtann1, 2002-04-02T17:40Z

detta är ju helt knäppt!
jag vill ha så att den lägger till:
användarnamnet(session)
sen vilken spel det ska läggas i... men det går inte.. får bara en massa errors... har aldrig sett någon sådan här kod i ASP innan.. knäppt!

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

## #3 — voigtann1, 2002-04-02T19:09Z

ingen som använder ASPsmartupload eller?

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

## #4 — solbulle, 2002-04-02T20:20Z

Är du säker på att du har rätt fält i databasen?

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

## #5 — voigtann1, 2002-04-02T20:41Z

efter många timmas tystnad så började jag pilla.. nu har jag fått allt att fungera.. förutom att man inte kan lägga till någon annan info än filnamnet och ActiveX-objekt.... blir skit sur....:

```
   strSQL = "SELECT user,game,mo,global,version,dl,FILENAME,FILE FROM Files"

   Set oRs = Server.CreateObject("ADODB.recordset")
   Set oRs.ActiveConnection = oConn
   oRs.Source = strSQL
   oRs.LockType = 3
   oRs.Open

'  Select each file
'  ****************
   For each file In mySmartUpload.Files
   '  Only if the file exist
   '  **********************
      If not file.IsMissing Then

      '  Add the current file in a DB field
      '  **********************************

         oRs.AddNew
         file.FileToField oRs.Fields("FILE")
		 oRs("FILENAME") = file.FileName
		 oRs("user") = session("user")
		 oRs("game") = "test"
		 oRs("mo") = "test"
		[b] oRs("global") = upload.Request("global")[/b]
		 oRs("version") = "test"
		 oRs("dl") = "0"
         oRs.Update
         intCount = intCount + 1
         intCount = mySmartUpload.Save("members/" & session("user"))
      End If
   Next
```

Error Type:
Request object, ASP 0208 (0x80004005)
Cannot use the generic Request collection after calling BinaryRead.

Den får ingen data från den andra.. eller så vill den inte ta datan från den andra... VILL VETA HUR MAN FIXAR!!!
snyft!

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

## #6 — solbulle, 2002-04-02T21:01Z

Kanske.. <http://www.aspsmart.com/liblocal/docs/en/aspsmartupload/help/Requirements.htm>

Tror felet blir pga av att du inte kan köra request mm

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

## #7 — erka, 2002-04-03T07:01Z

Om du läser object ref. till asp smart upload på deras hemsida så ser du hur du ska göra, de har även en del exempel.

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

## #8 — voigtann1, 2002-04-03T07:07Z

Solbulle och jag har fixat det här.. =) glömde skriva det =) tack så mycket för alla svar

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

## #9 — Ekström, 2002-04-03T15:01Z

Konstigt detta...

Hade precis samma problem igår :)

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

## #10 — mrhaze, 2002-08-13T09:38Z

skriv gärna hur ni löste det... har samma problem nu - tråkigt att inte hitta lösningen här :OO

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

## #11 — erka, 2002-08-13T11:42Z

MrHaze
Vad har du för stött på för problem ?

Om man läser dokumentationen på <https://www.aspsmart.com> kan man lösa typ allt :) Men posta gärna vad som du misslyckas med

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

## #12 — solbulle, 2002-08-13T13:18Z

Problemet som ALLA verkar ha med ALLA typer av uploadscript/komponenter är att man gör fel vid uppladdningen av formulärsfält.

Först måste man köra uploaden:

```
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
```

Vidare använder man sig INTE av request.form utan av komponentens "inbyggda" variant, i detta fallet: 

mySmartUpload.Form("text")

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

## #13 — medialabs, 2002-08-13T13:53Z

> **solbulle skrev:**
>
> Problemet som ALLA verkar ha med ALLA typer av uploadscript/komponenter är att man gör fel vid uppladdningen av formulärsfält.
> 
> Först måste man köra uploaden:
>
>
> ```
> Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
> ```
>
> 
> Vidare använder man sig INTE av request.form utan av komponentens "inbyggda" variant, i detta fallet: 
> 
> mySmartUpload.Form("text")

Bäst att lyda Solbulle, han kanske tar fram en käpp och börjar slå oss mindre begåvade... :P

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

## #14 — solbulle, 2002-08-14T18:55Z

Ha ha, jo jag har den i bakfickan. ;)

Jag har gjort samma fel jag med, det behöver ju inte vara det som som strular men oftast blir svaret att det är där felet ligger.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/40741-problem-med-asp-smart-upload