---
title: "Kan man göra en if sata av denna?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/14337-kan-man-göra-en-if-sata-av-denna"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Asa"
published: "2002-02-11T03:05:00.000Z"
updated: "2002-02-11T07:18:00.000Z"
replies: 1
views: 142
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/14337-kan-man-göra-en-if-sata-av-denna"
---

# Kan man göra en if sata av denna?

## #1 — Asa, 2002-02-11T03:05Z

Kan man göra med hjälp av en if sats så att denna kod gör bilden ex 520 bred om bilden är 520 eller bredare!? Om den är mindre än 520 så ska den bli den storlek som den är. Hoppas på hjälp :)

\<%Response.Write GetPicSize("pics\\aibo_wallpaper1_1024x768.jpg") 

Function GetPicSize(FN) 
   Set FSO = CreateObject("Scripting.FileSystemObject") 
   If FSO.FileExists(Server.MapPath(FN)) = False Then Exit Function 
   PN = Server.MapPath(FN) 
   Set File = FSO.OpenTextFile(PN) 

   Select Case UCase(Right(FN,4)) 
   Case ".GIF",".JPG" 
       If NOT File.AtEndOfStream Then 
           If UCase(Right(FN,4))=".GIF" Then 
               chars        = File.read(10) 
               width        = asc(mid(chars,8,1))\*256 + asc(mid(chars,7,1)) 
               height    = asc(mid(chars,10,1))\*256 + asc(mid(chars,9,1)) 
           Else 
               chars        = File.read(200) 
               height    = asc(mid(chars,164,1))\*256 + asc(mid(chars,165,1)) 
               width        = asc(mid(chars,166,1))\*256 + asc(mid(chars,167,1)) 
           End If 
       End If 
       GetPicSize ="\<img src=" & FN & " border=1\>\<p\>Bilden är \<b\>" & width & "\</b\> px bred och \<b\>" & height & "\</b\> px hög.\<br\>"
End Select 
   File.Close 
   Set File = Nothing 
   Set FSO = Nothing 
End Function%\>

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

## #2 — OveRRidE, 2002-02-11T07:18Z

Vill du skala om bilden permanent i storlek eller vill du bara ange width och height-attribut i \<img\>-taggen?

Om du vill uppnå det första krävs det en komponent installerad på servern.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/14337-kan-man-göra-en-if-sata-av-denna