---
title: "aspJpeg -- ladda upp bara jpg filer"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/180443-aspjpeg-ladda-upp-bara-jpg-filer"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "preben"
published: "2009-09-27T13:37:32.000Z"
updated: "2009-09-27T16:02:12.000Z"
replies: 3
views: 446
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/180443-aspjpeg-ladda-upp-bara-jpg-filer"
---

# aspJpeg -- ladda upp bara jpg filer

## #1 — preben, 2009-09-27T13:37Z

I min kod går det att ladda upp lite vad som helst och det är fel.

I instruktionen står:
<http://www.aspjpeg.com/manual_03.html>

' Is this a valid image file?
If File.ImageType \<\> "UNKNOWN" Then

Men när jag skriver blir det fel:
IF NOT File IS NOTHING AND File.ImageType = "JPG" THEN

Jag tycker detta är svårt!!

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

## #2 — voigtann1, 2009-09-27T14:34Z

IF NOT (File IS NOTHING AND File.ImageType = "JPG") THEN

```
If Not File.ImageType="JPG" Then
'Är inte en JPEG fil
End If
```

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

## #3 — preben, 2009-09-27T15:44Z

Tack, men det fungerar faktiskt inte.... !!

Jag kunde ladda upp en .DOC -fil som sen givetvis inte kunde skalas om... (bilderna skalas om. det hör inte hit, men så är det...)

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

## #4 — preben, 2009-09-27T16:02Z

OK, detta verkar fungera:

```
	IF NOT File IS NOTHING THEN
		IF File.ImageType = "JPG" THEN
	  ' ## NEW POST
SQL = .............................. dra in data i databas
  	Conn.Execute(SQL)
 ' 	Response.Write "File saved."
 		myFileName = File.Filename
		ELSE
		' ## DELETE FILE
		Set fso = Server.CreateObject("Scripting.FileSystemObject")
		IF fso.fileExists( server.MapPath("\images\" & File.Filename ) ) THEN
			fso.DeleteFile(Server.MapPath("\images\") & "\" & File.Filename)
		END IF
		Set fso = Nothing
		END IF
	ELSE
	'  Response.Write "File not selected."
	END IF ' ## CHECK FOR VALID FILENAME = "JPG"
```

Kanske inte Universums snyggaste lösning, men det funkar. Jag lyfter på hatten och ger dig cred för detta svaret! Kanske itne hela svaret, men väl en god väg dit!

Skål!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/180443-aspjpeg-ladda-upp-bara-jpg-filer