---
title: "problem med bilduppladdning"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/177345-problem-med-bilduppladdning"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "WebbisNet"
published: "2009-03-08T12:38:25.000Z"
updated: "2009-03-13T17:21:50.000Z"
replies: 18
views: 886
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/177345-problem-med-bilduppladdning"
---

# problem med bilduppladdning

## #1 — WebbisNet, 2009-03-08T12:38Z

Min form som jag skickar bilden från är

```
<form method="post" name="frmUpload"  action="/pictureupload/preupload.asp" enctype="multipart/form-data">
```

Skickar vidare till en sida för att kolla så att värdet kommer med

```
<%varUpload = request.form("frmUpload")
varUsername = Session("username")
varUID = Session("userID")
if varUpload <> "" then
response.write frmUpload
else
response.write "Din bild "& frmUpload &" kunde inte laddas upp<br>"
response.write "Inloggad som "& varUsername &" (userID "& userID &")<br>"
response.write "<a href=""/settings/change/photo.asp"">Tillbaka</a>"
end if
```

När jag kommer hit får jag inte med nåt värde alls, kommer inte vidare till nästa sida som ska ladda upp och förminska

```
<!-- #include virtual="/include/dbconn.asp" -->
<!-- #include virtual="/include/variabler.asp" -->

<%'Ladda upp den valda bilden
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save(Server.MapPath("/images/users/"))

'Sätt lite variabler
userID = Session("userID")
username = Session("username")
strPath = Upload.Form("frmUpload")
filnamn = Right(strPath, Len(strLink) - InStrRev(strPath, "\"))

'Skala ner den uppladdade bilden
	Set Jpeg = Server.CreateObject("Persits.Jpeg")
		response.write "Filnamnet är "& filnamn &" , "&strPath
		response.end
'Jpeg.Open Server.Mappath("/images/users/"& filnamn &"")
			L = 140
		Jpeg.Width = L
		Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
		Jpeg.Save Server.Mappath("../images/users/thumbnails")

'	SET objConn = connect()
'	picture = "update tblUsers set picture='" & FileName & "' , fotovalidering=1 where userID=" & userID
'	objConn.Execute(picture)
'	Set objConn = Nothing

'	sTo = "stefan@stene.nu"
'	sFrom = "image@stene.nu"
'	sSubject = "Fotovalidering från " & username & " [medlemsID " & userID & "]"
'	sTextBody = "Det har anlänt ett nytt foto som ska valideras på "& title

'	Set JMail = Server.CreateObject("JMail.SMTPMail")
'	JMail.ServerAddress = "smtp.axentus.net"
'	JMail.Sender = username
'	JMail.Silent = true
'	JMail.Logging = true
'	JMail.AddRecipientBCC "stefan@stene.nu"
'	JMail.Subject = sSubject
'	JMail.Body = sTextBody
'	JMail.Priority = 1
'	If Not JMail.execute Then
'		Response.Write( "ERROR MESSAGE: " & JMail.ErrorMessage & "<BR>" & vbcrlf )
'		Response.Write( "ERROR SOURCE: " & JMail.ErrorSource & "<BR>" & vbcrlf )
'		Response.Write( "LOG: <pre>" & JMail.Log & "</pre>" & vbcrlf )
'	Else
'		JMail.execute
'	End If

	Response.Redirect "/pictureupload/validatePhoto.asp?filename=" & FileName & "&id=" & userID & "&usr=" & username & "&size=" & File.Size & "&file=" & File.FileName%>
```

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

## #2 — voigtann1, 2009-03-09T18:46Z

Du kan inte skicka Request.Form från en sida till en annan utan en \<form\> postning. Du få flytta kontrollen till samma sida där det är "OK" att lägga upp bilden.

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

## #3 — WebbisNet, 2009-03-09T21:09Z

> **[voigtann1 skrev:](https://www.webforum.nu/p/1459385)**
>
> Du kan inte skicka Request.Form från en sida till en annan utan en \<form\> postning. Du få flytta kontrollen till samma sida där det är "OK" att lägga upp bilden.

Innan jag hade "mellansidan" så hade jag fprm på ena sidan och tog emot med upload.form på andra men det ville inte funka ändå

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

## #4 — doggelito, 2009-03-09T21:17Z

> **WebbisNet skrev:**
>
> \<%'Ladda upp den valda bilden
> Set Upload = Server.CreateObject("Persits.Upload.1")
> Upload.Save(Server.MapPath("/images/users/"))
>
> 'Sätt lite variabler
> userID = Session("userID")
> username = Session("username")
> strPath = Upload.Form("frmUpload")
> filnamn = Right(strPath, Len(strLink) - InStrRev(strPath, "\\"))

Ser minst två fel med denna kod:
1\. Du anger inte något filnamn vid save-metoden och du anropar den innan du sätter sökvägen.
2\. Du sätter sökvägen ifrån formtaggen. frmUpload har du satt på form-taggen på sidan innan, du måste hämta ifrån filfältet.

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

## #5 — WebbisNet, 2009-03-10T04:43Z

> **[doggelito skrev:](https://www.webforum.nu/p/1459406)**
>
> > **WebbisNet skrev:**
> >
> > \<%'Ladda upp den valda bilden
> > Set Upload = Server.CreateObject("Persits.Upload.1")
> > Upload.Save(Server.MapPath("/images/users/"))
> > 
> > 'Sätt lite variabler
> > userID = Session("userID")
> > username = Session("username")
> > strPath = Upload.Form("frmUpload")
> > filnamn = Right(strPath, Len(strLink) - InStrRev(strPath, "\\"))
>
> Ser minst två fel med denna kod:
> 1\. Du anger inte något filnamn vid save-metoden och du anropar den innan du sätter sökvägen.
> 2\. Du sätter sökvägen ifrån formtaggen. frmUpload har du satt på form-taggen på sidan innan, du måste hämta ifrån filfältet.

På nr 1 så vet jag ju inte vilket filnamn den uppladdade bilden kommer att ha så då räcker det bara med var katalogen ska ligga och hur menar du med nr 2?

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

## #6 — doggelito, 2009-03-10T06:41Z

Jag har dålig koll på hur persits upload fungerar och tydligen kallar man på savemetoden utan filnamn precis som du gör. Förvirrande metodnamn tycker jag! :)

Du kan inte hämta filnamnet från *strPath = Upload.Form("frmUpload")* då frmUpload är formtaggen och inte filefältet.
Här kan du läsa om hur du plockar ut filnamnet:
<http://www.aspupload.com/manual_db.html>

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

## #7 — WebbisNet, 2009-03-10T15:47Z

skrev
\<input size="30" type="file" name="fileupload"\>
och ska kolla så jag får med filnamnet 

```
<%'Ladda upp den valda bilden
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.Save(Server.MapPath("/images/users/"))

'Sätt lite variabler
userID = Session("userID")
username = Session("username")
strPath = Upload.Form("fileupload")
filnamn = Right(strPath, Len(strLink) - InStrRev(strPath, "\"))

'Skala ner den uppladdade bilden
	Set Jpeg = Server.CreateObject("Persits.Jpeg")
		response.write "Filnamnet är "& filnamn &" , "&strPath
		response.end
```

men får ett tomt resultat

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

## #8 — doggelito, 2009-03-10T18:21Z

> **AspUpload.com skrev:**
>
> ' Obtain file object
> Set File = Upload.Files("THEFILE")
> filnamn = File.Filename

Titta på deras exempel vetja! ;)
<http://www.aspupload.com/manual_db.html>

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

## #9 — WebbisNet, 2009-03-10T18:56Z

set uppladdadBild = Upload.Files("fileupload")
'filnamn = Right(uppladdadBild, Len(strLink) - InStrRev(uppladdadBild, "\\"))

'Skala ner den uppladdade bilden
	Set Jpeg = Server.CreateObject("Persits.Jpeg")
		response.write uppladdadBild
		response.end

ger mig 
Response object error 'ASP 0185 : 80020003'

Missing Default Property

/pictureupload/upload.asp, line 0

A default property was not found for the object.

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

## #10 — @nders, 2009-03-10T18:59Z

Du kan inte "skriva ut" ett objekt. Läs igen. Det räcker nog med att läsa dogges korta citat.

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

## #11 — WebbisNet, 2009-03-10T19:10Z

Detta gav mig filnamnet men då även hela sökvägen, hur kortar man ner sökvägen till bara den uppladdade filens namn

	Set File = Upload.Files("fileupload")
If Not File Is Nothing Then
   Response.Write File.Path
End If 
response.end

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

## #12 — voigtann1, 2009-03-10T19:12Z

Du kör File.Path, du är ute efter File.Filename som doggelito har skrivit.

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

## #13 — WebbisNet, 2009-03-10T19:31Z

Allt funkar som det ska nu, förutom skalningen av bilden........

```
'Skala ner den uppladdade bilden
	Set Jpeg = Server.CreateObject("Persits.Jpeg")
	Set File = Upload.Files("fileupload")

Jpeg.Open Server.Mappath("/images/users/"&File.Filename)
			L = 140
		Jpeg.Width = L
		Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
		Jpeg.Save Server.Mappath("../images/users/thumbnails")
```

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

## #14 — voigtann1, 2009-03-10T19:47Z

skall det vara ../images på save? skall det inte bara vara images/

???

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

## #15 — WebbisNet, 2009-03-10T19:59Z

måste ju gå tillbaka i strukturen från den plats koden ligger i

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

## #16 — voigtann1, 2009-03-10T20:32Z

På ena platsen har du:

```
Jpeg.Open Server.Mappath("/images/users/"&File.Filename)
```

Och på nästa:

```
Jpeg.Save Server.Mappath("../images/users/thumbnails")
```

Hur ser din mappstruktur egentligen ut?

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

## #17 — WebbisNet, 2009-03-10T21:02Z

jag var enbart blind där,

får access denied nu

'Skala ner den uppladdade bilden
	Set Jpeg = Server.CreateObject("Persits.Jpeg")
	Set File = Upload.Files("fileupload")

Jpeg.Open Server.Mappath("../images/users/"&File.Filename)
			L = 140
		Jpeg.Width = L
		Jpeg.Height = Jpeg.OriginalHeight \* L / Jpeg.OriginalWidth
		Jpeg.Save Server.Mappath("../images/users/thumbnail/")

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

## #18 — voigtann1, 2009-03-10T21:38Z

Kolla att du har rättigheter att skriva till mappen thumbnail

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

## #19 — WebbisNet, 2009-03-13T17:21Z

> **[voigtann1 skrev:](https://www.webforum.nu/p/1459603)**
>
> Kolla att du har rättigheter att skriva till mappen thumbnail

när jag skrev in file.filename på den andra raden med efter /thumbnail så funkade det

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/177345-problem-med-bilduppladdning