---
title: "GetFiles samt JPEG komprimering"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/67311-getfiles-samt-jpeg-komprimering"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "erka"
published: "2003-02-05T15:41:53.000Z"
updated: "2003-02-06T10:35:33.000Z"
replies: 1
views: 266
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/67311-getfiles-samt-jpeg-komprimering"
---

# GetFiles samt JPEG komprimering

## #1 — erka, 2003-02-05T15:41Z

Hej!

Hur gör man för att få fram alla filer i en katalog som inte börjar med en viss bokstavskombination?

Just nu använder jag

```
for each myFileInfo in myDir.GetFiles("*.*")
```

Men vill bara ha med de som inte börjar på "Thumb\_", finns det något smidigt sätt.

Jag sparar ner en thumbnail jag skapar på följande sätt

```
Dim ThumbNailSource As System.Drawing.Image = System.Drawing.Image.FromFile(ImgFullPath) 
	Dim ThumbNailFileName As String = "Thumb_"& ImgName
	Dim ThumbNailFormat = ThumbNailSource.Rawformat
	Dim NewSize as New Size(CInt(100), CInt(75)) 
	Dim ThumbNailOutPut as New Bitmap(ThumbNailSource, NewSize.width, NewSize.height) 
	Dim FilePath As String = Server.MapPath("Images/"& ImgFolderPath &"/"& ThumbNailFileName)
	Try
		ThumbNailOutPut.Save(FilePath,ThumbNailFormat)
	Catch e As Exception
	Throw e
End Try
```

Vad ska jag kolla på om jag vill höjja kvaliteten på de bilder som skapas, alltså inte komprimera jpeg bilden så kraftigt som den tycks göra här, kikade lite på

<http://www.dotnet247.com/247reference/msgs/22/111280.aspx>

Men vart inte mycket klokare :)

Tacksam för alla svar som alltid :) Glad påsk

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

## #2 — erka, 2003-02-06T10:35Z

Det första löste jag med att göra en koll med left, lite lamt tänkte man kunde skriva något form av mönster i myDir.GetFiles("\*.\*") men inte hittat mer info om det.

Då återstår bara problemet med min jpeg komprimering, det har jag löst genom

```
Public Function SaveThumbNailToDisk(ImgName As String, ImgFolderPath As String, ImgFullPath As String)
	Dim ThumbNailSource As System.Drawing.Image = System.Drawing.Image.FromFile(ImgFullPath) 
	Dim ThumbNailFileName As String = "Thumb_"& ImgName
	Dim ThumbNailFormat = ThumbNailSource.Rawformat
	Dim NewSize as New Size(CInt(100), CInt(75)) 
	Dim ThumbNailOutPut as New Bitmap(ThumbNailSource, NewSize.width, NewSize.height) 
	Dim FilePath As String = Server.MapPath("Images/"& ImgFolderPath &"/"& ThumbNailFileName)
	
	Dim EncParams As EncoderParameters = New EncoderParameters(1)
	Dim EncParameter As EncoderParameter = new EncoderParameter(System.drawing.imaging.Encoder.Quality,60)
	EncParams.Param(0) = EncParameter
	Dim objImageCodecInfo() As ImageCodecInfo = ImageCodecInfo.GetImageEncoders
	
	Try
		ThumbNailOutPut.Save(FilePath,objImageCodecInfo(1), EncParams)
	Catch e As Exception
		Throw e
	End Try
	Return FilePath
	ThumbNailSource.Dispose()
	ThumbNailOutPut.Dispose()
End Function
```

Får lägga in en koll som känner av om det är en gif bild som det ska skapas en thumbnail av, isåfall skippar man komprimeringen. Någon som ser något konstigt i min kod.

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

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/67311-getfiles-samt-jpeg-komprimering