משיב מוביל
עזרה עם טעינה של תמונה ושינוי ההגדרות שלה

שאלה
-
שלום,
יש לי קוד שלוקח תמונת JPG ומשנה לה את הגודל ושומר אותה בשני מצבים, אחד תמונה קטנה ואחת תמונה גדולה.
ניסתי לשנות איפה שרשום JPG או JEPG ל PNG כי אני רוצה שהקוד יקח תמונת PNG וישמור אותה בשני גדלים, אך זה לא מצליח. האם יש למישהו רעיון?
if not pUPFile Is Nothing then id = Upload.Form("id") pPath = "../pictures/products/" pPath2 = Server.MapPath(pPath) FileName = instrrev(pUPFile.path,"\") FileName = right(pUPFile.path,len(pUPFile.path)-FileName) extension = Mid(FileName, InstrRev(FileName, ".")) FileName = replace(id & "-big" & ".jpg", " " ,"") pUPFile.SaveAs pPath2 & "\" & FileName Set Jpeg = Server.CreateObject("Persits.Jpeg") pmaxImageWidth = 400 Jpeg.Open pPath2 & "\" & FileName if Jpeg.OriginalWidth > pmaxImageWidth then Jpeg.Width = pmaxImageWidth Jpeg.Height = Jpeg.OriginalHeight * pmaxImageWidth / Jpeg.OriginalWidth end if Jpeg.Save pPath2 & "\" & id & "-big.jpg" Jpeg.Close Jpeg.Open pPath2 & "\" & FileName pmaxImageWidth = 136 If Jpeg.OriginalWidth > pmaxImageWidth then Jpeg.Width = pmaxImageWidth Jpeg.Height = Jpeg.OriginalHeight * pmaxImageWidth / Jpeg.OriginalWidth End If Jpeg.Save pPath2 & "\" & replace(id & "-min" & ".jpg", " " ,"") End If
יום חמישי 07 יוני 2012 20:22
תשובות
-
ראשית, תקן אותי אם אני טועה, אבל הקוד שלך נראה כמו קוד ASP קלאסי (מחזיר אותי אחורה 14 שנה, זה היה מזמן...).
אני לא מכיר את הקומפוננטה של Persits אבל בגדול אי אפשר סתם לשנות שם של מחלקה ולקוות שיש כזו מחלקה.
תצטרך לחפש רכיבי COM באינטרנט שמאפשרים עבודה עם png-ים. חיפשתי דקה בגוגל ומצאתי משהו כזה ב-code project:
http://www.codeproject.com/Articles/3323/An-ASP-Thumbnail-Solution
מקווה שזה יעזור.
Please mark posts as answers/helpful if it answers your question.
Senior Consultant on WCF, ASP.NET, Siverlight, and Entity Framework. Author of Microsoft's Official WCF 4 Course. Co-author of the Microsoft HPC/Azure burst whitepaper.
Visit my blog: http://blogs.microsoft.co.il/blogs/idof- הוצע כתשובה על-ידי Ori CalvoModerator שבת 09 יוני 2012 23:02
- סומן כתשובה על-ידי Eran Sharvit יום שלישי 12 יוני 2012 15:44
יום שישי 08 יוני 2012 20:44מנחה דיון
כל התגובות
-
ראשית, תקן אותי אם אני טועה, אבל הקוד שלך נראה כמו קוד ASP קלאסי (מחזיר אותי אחורה 14 שנה, זה היה מזמן...).
אני לא מכיר את הקומפוננטה של Persits אבל בגדול אי אפשר סתם לשנות שם של מחלקה ולקוות שיש כזו מחלקה.
תצטרך לחפש רכיבי COM באינטרנט שמאפשרים עבודה עם png-ים. חיפשתי דקה בגוגל ומצאתי משהו כזה ב-code project:
http://www.codeproject.com/Articles/3323/An-ASP-Thumbnail-Solution
מקווה שזה יעזור.
Please mark posts as answers/helpful if it answers your question.
Senior Consultant on WCF, ASP.NET, Siverlight, and Entity Framework. Author of Microsoft's Official WCF 4 Course. Co-author of the Microsoft HPC/Azure burst whitepaper.
Visit my blog: http://blogs.microsoft.co.il/blogs/idof- הוצע כתשובה על-ידי Ori CalvoModerator שבת 09 יוני 2012 23:02
- סומן כתשובה על-ידי Eran Sharvit יום שלישי 12 יוני 2012 15:44
יום שישי 08 יוני 2012 20:44מנחה דיון -
תתחיל מלהפוך את אלה
"\"
לכאלה
"\""
ותראה שוב את הקוד כי לפי הצבעים (וכמובן הקוד!) שלך לא שברת את הסטרינג ולכן לא עובד לך כלום
יום ראשון 10 יוני 2012 06:48 -
במידה ואתה רוצה לשמור בתור PNG יש להשתמש בפרמטר המתאים ולא סתם לשנות את הסיומת של הקובץ.
יום שלישי 12 יוני 2012 06:56 -
תודה רבה לשתי התשובות, שניהם היו מועילות ברגע שאבדוק ואצליח אסמן מה הייתה התשובה שנעזרתי בה. תודהיום שלישי 12 יוני 2012 06:59