---
title: "Aspupload"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/14384-aspupload"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Jesper T"
published: "2002-02-12T11:10:00.000Z"
updated: "2002-02-12T20:45:00.000Z"
replies: 11
views: 322
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/14384-aspupload"
---

# Aspupload

## #1 — Jesper T, 2002-02-12T11:10Z

Ja det var ju det!
Undrar hur man definerar egna namn på bilder som skall laddas upp med aspupload, jag har kollat deras manual(säkert fuskkollat) och sökt på det i webforum, men icke!

MVH Jesper

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

## #2 — OveRRidE, 2002-02-12T13:34Z

Byt namn på filen med FSO efter det att du laddat upp den istället.

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

## #3 — Jesper T, 2002-02-12T17:16Z

Har gjort så här men är helt ute och virrar kanske, byter inte namn i alla fall (till test. och "orginaländelsen")!

```
Microsoft VBScript compilation error '800a0414' 

Cannot use parentheses when calling a Sub 

/ner.asp, line 32 

fso.movefile (right(strFileName),4), (right(ny),4)
```

Och hela koden är:

```
<%sokvag = Server.MapPath("\files\imgs\")
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.SetMaxSize 25000, True

Upload.Save(sokvag)

For Each File in Upload.Files
strFileName = File.ExtractFileName
If ( Instr(strFileName, ".jpg") > 0 ) Then _
bolImageOk = "TRUE"

If ( Instr(strFileName, ".gif") > 0 ) Then _
bolImageOk = "TRUE"

If Not ( bolImageOK = "TRUE" ) Then _
File.Delete
Next
ny ="test"
If ( bolImageOK = "TRUE" ) Then 
Set fso = Server.CreateObject("Scripting.FileSystemObject")
fso.movefile (right(strFileName),4), (right(ny),4)
Response.Write (strFileName & " är uppladdad, klicka <a href=up.asp>här</a> för att komma tillbaka.")
Else
Response.Write "Bilden är för stor (max 25kb) eller har fel format. Du kan bara ladda upp JPEG eller GIF bilder."
End If

%>
```

MVH Jesper T

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

## #4 — Jesper T, 2002-02-12T18:01Z

eller är det något typ detta?

```
fso.MoveFile strFileName,"test." & right(strFileName),3
```

Verkar inte heller funka:

```
Microsoft VBScript runtime error '800a01c2' 

Wrong number of arguments or invalid property assignment: 'right' 

/ner.asp, line 32
```

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

## #5 — Jesper T, 2002-02-12T18:26Z

Detta blir också fel:

```
Microsoft VBScript runtime error '800a0035' 

File not found 

/ner.asp, line 33
```

Med:

```
nytt = ""& strFileName
nytt = Left(nytt,(len(nytt)-3))
[b]fso.MoveFile strFileName,"test." & nytt[/b]
```

??????????????????

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

## #6 — Jesper T, 2002-02-12T19:22Z

Help!! :(

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

## #7 — solbulle, 2002-02-12T19:59Z

Verkar inte som om du har filändelsen i variabeln nytt.

```
fso.movefile sokvag&"\"&strFileName,sokvag&"\"&ny  & right(strFileName,4)
```

Red.
Fast nu får ju alla filer samma namn!?! Det kanske inte riktigt var meningen?

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

## #8 — Jesper T, 2002-02-12T20:25Z

```
nytt = ""& strFileName
nytt = Left(nytt,(len(nytt)-3))
fso.MoveFile strFileName,"test." & nytt
```

Nej detta ger ju: **test.gamlanamnet.**
det skall ju bli **test.nyändelse**

Jag vet inte hur man skall plocka ut .ändlesen!!

MVH Jesper T

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

## #9 — Jesper T, 2002-02-12T20:27Z

> Fast nu får ju alla filer samma namn!?! Det kanske inte riktigt var meningen?

Ok, men test skall jag byta ut till co(o)kies("användarnamn")

Tack skall kolla! :)

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

## #10 — solbulle, 2002-02-12T20:28Z

right(strFileName,4)

Fast det spricker om det är en filändelse på fyra bokstäver, sök så hittar du något bättre sätt.

Pröva annars min redigerade variant, tror det fungerar. (Ovan)

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

## #11 — solbulle, 2002-02-12T20:36Z

<http://cgi.webforum.nu/wf/Forum11/HTML/007176.html>

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

## #12 — Jesper T, 2002-02-12T20:45Z

Nej, du är ju en PÄRLA! Du måste då ha en riktig bullmamma!!

Tack! Pssst du skulle inte kunna kika på vad @nders menar här också är du snäll? Jag har försökt med nåt sånt här men jag är inte riktigt 100, vad jag skall lägga in det, och vad som skall kompletteras?:

```
SQL = "SELECT username FROM users WHERE username = "& username
```

 <http://cgi.webforum.nu/wf/Forum11/HTML/008914.html> 

MVH Jesper T

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/14384-aspupload