---
title: "bildproblem..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/72029-bildproblem"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "P"
published: "2003-03-24T15:24:33.000Z"
updated: "2003-03-24T20:17:21.000Z"
replies: 6
views: 264
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/dotnet/72029-bildproblem"
---

# bildproblem...

## #1 — P, 2003-03-24T15:24Z

Försöker skapa en tumbanil av en bild med denna kod:

```
    Public Shared Function CreateTumbNail(ByVal strPath As String, ByVal strFilePath As String)
        Dim objBMP As System.Drawing.Bitmap
        Dim objGraphics As System.Drawing.Image
        Dim maxImage As Integer = 200
        'open image
        objBMP = New Bitmap(strPath & GetName(strFilePath) & "." & GetExtension(strFilePath))
        Dim imgw As Integer = objBMP.Width
        Dim imgh As Integer = objBMP.Height

        ' Creating a Thumbnail with scale
        Dim newimgw As Integer
        Dim newimgh As Integer
        If imgw > imgh Then
            newimgw = maxImage
            newimgh = (imgh * maxImage) / imgw
        ElseIf imgh > imgw Then
            newimgw = (imgw * maxImage) / imgh
            newimgh = maxImage
        Else
            newimgw = imgw
            newimgh = imgh
        End If
        Try
            'ThumbNail it!!
            objGraphics = objBMP.GetThumbnailImage(newimgw, newimgh, Nothing, IntPtr.Zero)

            ' creates the name
            objGraphics.Save(strPath & GetName(strFilePath) & "-tumbnail." & GetExtension(strFilePath))
        Catch Exp As Exception
            Return Exp.ToString
        End Try
    End Function
```

Bilen skapas och läggs i mappen. Om jag dubbelklickar på den i utforskaren så visas den fint i visningsprogramet. Men om jag går in i visual studio (eller tex webbläsare ) för att hämta filen och placera den på en webbsida så visas den inte. En gamla "stora" filen visas dock som vanligt.

Någon med idéer?

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

## #2 — renholm, 2003-03-24T16:02Z

Låter mystiskt, verkar som om att IE inte kan läsa bilden, men bildvisningprogramet kan. I vilket format sparas den?

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

## #3 — NETwork, 2003-03-24T16:04Z

Sparar du den inte som en .bmp nu, eller har jag missförstått din kod? I så fall kan du inte visa den i en webbläsare.

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

## #4 — P, 2003-03-24T16:37Z

hmm jo kanske. Även om jag tar en .bmp fil och försöker tumbnaila den så visas den inte.

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

## #5 — renholm, 2003-03-24T16:45Z

Hum, tror inte NETwork menar källfilen så mycket, det viktiga är att du inte sparar tumbnail i BMP format, välj gif, jpeg eller png.

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

## #6 — P, 2003-03-24T17:01Z

Oki, testat det också utan resultat!

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

## #7 — P, 2003-03-24T20:17Z

Ahh såg något annat inlägg... får konvertera lite kod...
tog lite kod av **xrobx** blev så här om någon vill ha  :P 

```
        Dim file As String = "ökensand"
        Dim fileext As String = "bmp"

        Dim TIA As System.Drawing.Image.GetThumbnailImageAbort
        Dim imgFormat As Imaging.ImageFormat
        Dim mImage As System.Drawing.Image
        Select Case fileext
            Case "jpg"
                imgFormat = Imaging.ImageFormat.Jpeg
            Case "gif"
                imgFormat = Imaging.ImageFormat.Gif
            Case "bmp"
                imgFormat = Imaging.ImageFormat.Bmp
        End Select

        mImage = mImage.FromFile(Server.MapPath(file & "." & fileext))
        Dim btm As New Bitmap(mImage)
        mImage.Dispose()
        mImage = btm
        mImage = mImage.GetThumbnailImage(100, 100, TIA, IntPtr.Zero)
        mImage.Save(Server.MapPath(file & "tumb." & fileext), imgFormat)
```

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

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/72029-bildproblem