---
title: "Upload script vill inte funka"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12528-upload-script-vill-inte-funka"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "His Divine Shadow"
published: "2001-11-08T10:47:00.000Z"
updated: "2001-11-08T12:20:00.000Z"
replies: 1
views: 166
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/12528-upload-script-vill-inte-funka"
---

# Upload script vill inte funka

## #1 — His Divine Shadow, 2001-11-08T10:47Z

Problem med mitt upload script, när jag gör en ny användare får jag detta felmeddelande:
Microsoft VBScript runtime error '800a003a' 

File already exists 

/katalog/swe/adduser.asp, line 19 

Fast det inte stämmer.

```
<%

'  Variables
'  *********
   Dim mySmartUpload
   Dim intCount
       

'  Object creation
'  ***************
   Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
'  Upload
'  ******
   mySmartUpload.Upload

dim skapamapp
skapamapp = mySmartUpload.Form("Username")
Set Skapa = Server.CreateObject("Scripting.FileSystemObject")
Set Mapp = Skapa.CreateFolder(Server.MapPath("/Katalog/images/" & skapamapp))

'  Save the files with their original names in a virtual path of the web server
'  ****************************************************************************
   intCount = mySmartUpload.Save("/Katalog/Images/" & skapamapp)
   ' sample with a physical path 
   ' intCount = mySmartUpload.Save("c:\temp\")
%>
```

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

## #2 — His Divine Shadow, 2001-11-08T12:20Z

Detta är linje 19:
Set Mapp = Skapa.CreateFolder(Server.MapPath("/Katalog/images/" & skapamapp))

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/12528-upload-script-vill-inte-funka