locked
עזרה עם טעינה של תמונה ושינוי ההגדרות שלה RRS feed

  • שאלה

  • שלום,

    יש לי קוד שלוקח תמונת 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 יש להשתמש בפרמטר המתאים ולא סתם לשנות את הסיומת של הקובץ.

    http://www.aspjpeg.com/manual_10.html

    בהצלחה :)

    יום שלישי 12 יוני 2012 06:56
  • תודה רבה לשתי התשובות, שניהם היו מועילות ברגע שאבדוק ואצליח אסמן מה הייתה התשובה שנעזרתי בה. תודה
    יום שלישי 12 יוני 2012 06:59