---
title: "Bildstorlek och annan info!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/128998-bildstorlek-och-annan-info"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "paddan"
published: "2005-05-28T07:54:49.000Z"
updated: "2005-05-28T14:41:59.000Z"
replies: 4
views: 366
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/128998-bildstorlek-och-annan-info"
---

# Bildstorlek och annan info!

## #1 — paddan, 2005-05-28T07:54Z

Hej!
Undrar hur man gör för att skriva ut en bilds storlek..
Jag tar fram bilden  genom detta scriptet:

```
 <%
			rootname = server.mappath("bilder/")& "/"
			Dirfolder = request.querystring("dir")
			
			Set FSO = Server.CreateObject("Scripting.FileSystemObject")
			Set Folder = FSO.GetFolder(rootname & Dirfolder)
			set Files = Folder.Files
			
			'ParentFolderName = FSO.GetParentFolderName(rootname & Dirfolder)
			
			For each Item in Folder.SubFolders
				response.write "<img src=mapp.gif>"
				
				response.write "<a href='" & strScriptname & "?Dir=" & Item.Name & "'>" & Item.Name & "</A>"
				'response.write Item.Name
				response.write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
				
				i=i+1
			Next
			%>
						
			
			<%
			For each Item In Files
				
				Response.Write "<img border=""1"" height=""510"" width=""680"" src=""bilder/" & Dirfolder & "/" & Item.Name & """>"
			
				response.write "<br>"
				response.write "<br>"
				t=t+1
			Next
			
			set Folder = nothing
			set FSO = nothing
			set Files = nothing
			%>
```

Skulle gärna också veta om man kan skriva ut annan information om bilden..tex när den skapades m.m.

Mvh Martin

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

## #2 — paddan, 2005-05-28T07:56Z

Glömde en sak..
Hur gör man för att koden enbart ska visa jpg bilder???

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

## #3 — paddan, 2005-05-28T13:27Z

Ingen som jar något...
Har aspjpeg komponent på min webhotell!

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

## #4 — @nders, 2005-05-28T14:29Z

Då har du förstås sökt, sökt, sökt, och testat, testat, testat. :)

Hur ser dina försök ut när du använder den komponenten?

För att bara skriva ut jpg-bilder i listan använder du en if-sats, typ:

```
If lcase(split(Item.Name)(1)) = "jpg" then
       ' koden för att visa bild i lista
end if
```

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

## #5 — paddan, 2005-05-28T14:41Z

lite taskig är du faktiskt...!
Mina försök har varit många...!
Både med fso och med aspjpeg...men med aspjpeg har jag inte kommit någonvart eftersom jag inte kan få den att skriva ut en bild....!
Men just nu ser det ut så här:

```
<%
			rootname = server.mappath("bilder/")& "/"
			Dirfolder = request.querystring("dir")
			
			Set FSO = Server.CreateObject("Scripting.FileSystemObject")
			Set Folder = FSO.GetFolder(rootname & Dirfolder)
			set Files = Folder.Files
			
			'ParentFolderName = FSO.GetParentFolderName(rootname & Dirfolder)
			%>
					
			
			<%
			For each Item In Files
				If right( Item.Name, 3 ) = "jpg" then
				response.write "<div class=""bild_namn""> " & Item.Name & "</div>"
				Response.Write "<img border=""1"" height=""510"" width=""680"" src=""bilder/" & Dirfolder & "/" & Item.Name & """>"
				response.write "<div class=""bild_info"">"
				Response.Write "<div class=""rubrik_ruta"">" & Item.size & "</div>"
				response.write "</div>"
				
				end if

				
				t=t+1
			Next
			
			set Folder = nothing
			set FSO = nothing
			set Files = nothing
			%>
```

Får ut storleken nu med item.size, men vill ah det omgjort till mb, 
eller kb....

En fråga till...vad kan man mer få ut för egenskaper med item ???

Mvh Martin

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/128998-bildstorlek-och-annan-info