• وبلاگ : پاي سيب
  • يادداشت : بازي هاي موبايل با فرمت جاوا
  • نظرات : 0 خصوصي ، 78 عمومي

    • نام:
    ايميل:
    سايت:
       
    متن پيام :
    حداکثر 2000 حرف
    كد امنيتي:
      
      
     
    + اميرحسين 
    بخش نهايي تابع که شبيه سازي تگ Img بود بصورت زير تغير داده ميشه :
    Dim html As String
    If imgHeight <> currentImage.Height Or imgWidth <> currentImage.Width Then
    html = "<a href=""" & IMAGE_DIRECTORY & Path.GetFileName(s) & """>" & _
    "<img src=""ShowThumbnail.aspx?img=" & Path.GetFileName(s) & "&w=" & _
    imgWidth & "&h=" & imgHeight & """ " & _
    "height=""" & imgHeight & """ width=""" & imgWidth & """ border=1>" & _
    "</a>"
    Else
    html = "<a href=""" & IMAGE_DIRECTORY & Path.GetFileName(s) & """>" & _
    "<img src=""ShowThumbnail.aspx?img=" & Path.GetFileName(s) & """ " & _
    "height=""" & imgHeight & """ width=""" & imgWidth & """ border=1>" & _
    "</a>"
    End If
    Return html
    توسط Thumbnail شما عکسي با حجم کمتر و به نسبت سايز تصوير جديد خواهيد داشت
    تابع جديد عکس رو بر ميگردونه که علاوه بر کوچک نمايي به نسبت يکسان ، کاهش حجم به نسبت سايز تصوير داشته .
    البته نا گفته نمونه که کيفيت در اين روش دوم افت خواهد داشت.
    از اين تابع هرجايي ميتونيد استفاده کنيد : داخل کدهاي html ، داخل يک ديتاگريد ، ديتاليست و خيلي جاهاي ديگه