---
title: "Uploadscript utan komponent"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/46131-uploadscript-utan-komponent"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "OveRRidE"
published: "2002-06-18T07:09:05.000Z"
updated: "2007-09-04T23:17:00.000Z"
replies: 307
views: 16840
page: 1
pages: 16
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/46131-uploadscript-utan-komponent"
---

# Uploadscript utan komponent

_Sida 1 av 16._

## #1 — OveRRidE, 2002-06-18T07:09Z

Jag har (äntligen?) lagt till ett uploadscript [här](http://www.webforum.nu/showthread.php?s=&threadid=45211) eftersom jag inte fått ändan ur vagnen att göra det innan. Scriptet är helt komponentlöst, vilket jag tror ganska många har användning av ibland om det inte finns ordentliga komponenter installerade på servern. (Vilket det visserligen oftast finns ;))

Buggar eller problem rapporteras i denna tråd. 

Håll till godo! //OveRRidE

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

## #2 — sin_adec, 2002-06-18T07:33Z

Men hur blir det om jag vill bestämma vad filen ska hamna.. vart ska jag ändra...

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

## #3 — OveRRidE, 2002-06-18T07:48Z

På **rad 38** i outputfile.asp:

T.ex:

```
Set MyFile = ScriptObject.CreateTextFile(Server.mappath("/bilder/uppladdat/" & filename))
```

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

## #4 — Toonster, 2002-06-18T11:01Z

Lägg till följande, så är det komplett...
(precis samma script jag har hemma i burken, samma variabelnamn osv, men saknar följande)

Kolla typ av bild, ex:

```
If contentType="image/pjpeg" THEN
```

Kontroll av bildstorlek (bild mindre än 250k) och bildtyp, variablerna finns redan, bara att använda..

```
If contentType="image/pjpeg" THEN   

  If byteCount<=250000 THEN

Set ScriptObject = Server.CreateObject"Scripting.FileSystemObject")
```

/T

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

## #5 — sin_adec, 2002-06-18T11:03Z

Men..-

Men när det står MapPath så kan man inte typ använda 

c:\\mina dokument..

hur gör jag om jag vill använda det..

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

## #6 — Toonster, 2002-06-18T11:07Z

Ta bort mappath

```

Set MyFile = ScriptObject.CreateTextFile("c:\mina dokument\"&filename)
```

/T

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

## #7 — sin_adec, 2002-06-18T11:14Z

Tackar....

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

## #8 — sin_adec, 2002-06-18T11:29Z

Alltså

jag känner mig så jäkla dum...

Om vi har en medlem som har användarnamnet "David"...

recset("anv")

Set MyFile = ScriptObject.CreateTextFile("c:\\mina dokument\\"&filename)

hur ska jag få att det hamnar typ på C:\\mina dokument\\david...
hoppas ni förstår.. och ursäktar mig för min dumhet...

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

## #9 — OveRRidE, 2002-06-18T11:37Z

Det beror på var du lagrat användarnamnet. 
Ligger det i en sessionsvariabel kan du t.ex. ordna det på följande sätt.
session("username") innehåller alltså användarnamnet.

```
Set MyFile = ScriptObject.CreateTextFile("c:\mina dokument\" & session("username") & "\" & filename)
```

Detta förutsätter att mappen 'david' skapats, annars:

```
set fso = server.createobject("scripting.filesystemobject")
if fso.folderexists(server.mappath(session("username"))) = false then
   fso.createfolder(server.mappath(session("username")))
   Set MyFile = ScriptObject.CreateTextFile("c:\mina dokument\" & session("username") & "\" & filename) 
else
   response.write "Mappen finns redan. Skapar ingen fil."
end if
set fso = nothing
```

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

## #10 — sin_adec, 2002-06-18T12:19Z

Vill..

Jag vill tacka alla för hjälpen...

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

## #11 — Havregryn, 2002-06-23T16:09Z

Hur ska man göra om man samtidigt vill lägga in bilden i en databas?
Tex om användaren Havregryn laddar upp en bild (Session("username")) till sin sida. Hur ska man då få bilden att både hamna i mappen bilder och i databsen members?
Tacksam för svar.

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

## #12 — OveRRidE, 2002-06-23T16:16Z

Spara bildnamnet i en kolumn i databasen. 

Tänk på att två stycken personer **kan** ladda upp en bild med samma namn, vilket kan skapa problem om du har alla bilder som laddas upp i samma mapp på servern. Därför kan det vara bra med en slags "bildnamns-generator" som ger ett unikt bildnamn på bilden innan den sparas. Exempelvis besökarens sessions-id + tid + slumpmässig siffra + ändelse. (Typ **32434334_1700_453.gif**.

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

## #13 — Havregryn, 2002-06-23T17:01Z

Ja jag märkte att det vållade lite problem...
Exakt var skall jag sätta id, tid med mera för att inte få ett syntaxfel?
Så här ser koden ut:
username = Session("username")
Set connection = server.createObject("adodb.connection")
connection.open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("/tsp/forum/members.mdb")&";pwd=losen"
SQL = "SELECT \* FROM members"
set RS = Connection.Execute(SQL)
SQL = "UPDATE members Set bild = '" & filename & "' where username = '" & username & "'"
Connection.Execute(SQL)
response.redirect "/tsp/forum/medlem.asp?username="&session("username")

Som vanligt tacksam för svar.

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

## #14 — Jesper T, 2002-06-23T17:26Z

Om username är unikt är det smartare att byta namn på bilden till ex. username.gif så slipper du konstigheter

Tror att du kan göra det med fso.movefile gör en sökning!

Hittade:
<http://www.webforum.nu/showthread.php?s=&threadid=10861&highlight=movefile>

Kanske kan vara ngt?!

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

## #15 — Havregryn, 2002-06-24T09:35Z

Jo då.
Ska försöka och se hur det går.
Tack för hjälpen. :)

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

## #16 — OveRRidE, 2002-06-24T09:47Z

Jesper T:s lösning funkar ju dock inte så bra om användaren vill ha flera bilder, men så kanske inte var fallet. Annars funkar ju det utmärkt. :)

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

## #17 — solbulle, 2002-06-24T10:02Z

Man kan ju med FSO (med en liten nätt funktion) kolla om det redan finns en bild: username.gif och om det finns döpa den nya till username2.gif osv.

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

## #18 — OveRRidE, 2002-06-24T10:09Z

Och då måste du hålla på och ta reda på vilket nummer nästa bild skall ha, jämföra och krångla med det. (kanske inte såå svårt, men.. ;)) 

En enkelt 'algoritm' för att generera ett bildnamn lägger jag min röst på. ;)

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

## #19 — solbulle, 2002-06-24T13:35Z

> (med en liten nätt funktion)

Om du har en funktion som denna:

bild = username (.gif)

 om bilden bild finns

bild = bild & 1

annars spara bilden med namnet bild

åsså runt igen tills den hittar ett ledigt nummer.

Fördelen som man kan ha med detta system är att det är enklare om man ska visa en användares bilder, du behöveri nte öppna databasen för att plocka ut alla namn, utan lista bara rakt av.

Väl medveten om att alla system har sin plus o minus. Även givetvis detta. Bara en tanke.

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

## #20 — crisse6, 2002-06-25T19:09Z

Hur gör man om man vill att varje fil som laddas upp måste vara zip format? och sedan max 20 kb... och få den att skriva ut att om det är mer än 50 kb så får den ej laddas upp. jag fattade inte ovanstående inlägg om det där med strl och format... hur ska koden placeras i koden? ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/46131-uploadscript-utan-komponent  
Nästa sida: https://www.webforum.nu/amne/asp/46131-uploadscript-utan-komponent/page2.md