Generera thumbnails för en hel katalogstruktur

paxiMedlem sedan okt. 20064 inlägg

Frågan4 nov. 2006 15:10#1

Hejsan, har suttit och funderat länge på detta men kan inte riktigt komma på hur jag ska bära mig åt. Jag har följande katalogstuktur:

Bilder
-generatethumbs.asp
  -Katalog1
     -Bild1.jpg
     -Bild2.jpg
  -Katalog2
     -Bild3.jpg
     -Bild4.jpg

Finns det någon smart kod jag kan köra från generatethumbs.asp som gör att det skapas thumbnails i varje katalog till varje bild. Som detta.

Bilder
-generatethumbs.asp
  -Katalog1
     -Bild1.jpg
     -thumb_Bild1.jpg
     -Bild2.jpg
     -thumb_Bild2.jpg
  -Katalog2
     -Bild3.jpg
     -thumb_Bild3.jpg
     -Bild4.jpg
     -thumb_Bild4.jpg

Observera också att användarna skapar kataloger själva och laddar därefter upp bilder. scripet måste alltså skapa thumbnails för alla bilder i alla kataloger som ligger i katalogen "bilder" dvs inte bara katalog1 och katalog2.
Tacksam för hjälp. AspJpeg finns installerat på servern.

timediaMedlem sedan maj 2001420 inlägg

7 nov. 2006 14:43#2

mappa = file.FileName

' New width
L = 100

' Resize, preserve aspect ratio
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth

Jpeg.Save Server.MapPath(mySmartUpload.Form("map")) & "/th_" & mappa

Path = Server.MapPath(mySmartUpload.Form("map")) & "/" & mappa
Jpeg.Open Path

' New width
L = 350

' Resize, preserve aspect ratio
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth

Jpeg.Save Server.MapPath(mySmartUpload.Form("map")) & "/big_" & mappa