Hast Du die Komponente ASPImage zur Verf�gung?
Wenn ja - dann kannst auch das machen:
(actualName ist der Name der Bilddatei)
--- cut ---
<% Set MyImage = Server.CreateObject("AspImage.Image")
MyImage.LoadImage "E:\wwwroot\forum\img\" & actualName
MyImage.GetImageFileSize "E:\wwwroot\forum\img\" & actualName, X, Y
MyImage.MaxX = X
MyImage.MaxY = Y
ResizedX = 125
ResizedY = (ResizedX / MyImage.MaxX) * MyImage.MaxY
if resizedY > 125 Then
ResizedY = 125
ResizedX = (ResizedY / MyImage.MaxY) * MyImage.MaxX
end if
MyImage.ResizeR ResizedX, ResizedY
MyImage.JPEGQuality = 50
MyImage.ImageFormat = 1
MyImage.FileName = "E:\wwwroot\forum\img\_" & id & ".jpg"
MyImage.SaveImage
Set MyImage = Server.CreateObject("AspImage.Image")
MyImage.LoadImage "E:\wwwroot\forum\img\" & actualName
MyImage.GetImageFileSize "E:\wwwroot\forum\img\" & actualName, X, Y
MyImage.MaxX = X
MyImage.MaxY = Y
if x > 500 OR y > 500 then re=1
ResizedX = 500
ResizedY = (ResizedX / MyImage.MaxX) * MyImage.MaxY
if resizedY > 500 Then
ResizedY = 500
ResizedX = (ResizedY / MyImage.MaxY) * MyImage.MaxX
end if
if re=1 then MyImage.ResizeR ResizedX, ResizedY
MyImage.JPEGQuality = 50
MyImage.ImageFormat = 1
MyImage.FileName = "E:\wwwroot\forum\img\" & id & ".jpg"
MyImage.SaveImage
%>
--- cut ---
Das Script macht aus einem geuploadeten Bild ein Vorschaubild (max
125x125) und ein "normales" Bild mit max. 500x500 - alles, was Du �ndern
m�sstest, w�re "if x > 200 OR y > 200 then" und dann Deine Max-Werte
einsetzen.
Ach ja - das bild wird PROPORTIONAL verkleinert!
An einem online-Bild-Zuschnitt arbeite ich gerade
Stefan.
-----Urspr�ngliche Nachricht-----
Von: Alex Fostic [mailto:[EMAIL PROTECTED]]
Gesendet: Mittwoch, 10. April 2002 12:29
An: ActiveServerPages German
Betreff: [aspgerman] Bildgr��e/Dimensoinen vor einf�gen feststellen
Hallo
hab mal wieder ein kleines Problemchen.
Gibt es die M�glichkeit die Gr��e einer Bilddatei und die Dimensionen
derselben
anhand eines Linkes der vom User angegeben wird zu pr�fen bevor das Bild
zugelassen wird.
Also sozusagen ich lege fest, die Datei die der User angibt darf nur max
20kb und nur 200x100 pixel sein.
Die Art der pr�fung w�re mir egal muss nur mit ASP machbar sein.
Gru�
| [aspgerman] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp