حامد جان در مورد HttpHandler ها و HttpModule ها در سایت خیلی بحث شده و همین الان یک اعلان داخل سایت هست !
من این برنامه که می خواستی رو برات نوشتم :
1- ابتدا یک فایل Generic Handler (از طریق منوی Add New Item)به پروژه اضافه کن و اسم انونو HPicturer.ashx بگذار
کد های زیر را داخل این فایل کپی کن :
<%@ WebHandler Language="VB" Class="HPicturer" %>
Imports System
Imports System.Web
Imports System.Drawing
Imports System.Drawing.Imaging
Imports System.Drawing.Drawing2D
Imports System.IO
Imports System.Text
'CopyRight By Ali Delshad Http://faradade.com
Public Class HPicturer : Implements IHttpHandler
Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest
Dim Response As HttpResponse = context.Response
Dim Request As HttpRequest = context.Request
Dim imgHeight, imgWidth As Integer
Dim maxwidth As String = Request.QueryString("w")
Dim maxheight As String = Request.QueryString("h")
'Get information about the image
Dim imageUrl As String = Request.QueryString("path") + "/" + Path.GetFileName(Request.QueryString("img"))
Dim fullSizeImg As System.Drawing.Image
fullSizeImg = System.Drawing.Image.FromFile(context.Server.MapPa th(imageUrl))
imgHeight = fullSizeImg.Height
imgWidth = fullSizeImg.Width
If imgWidth > maxwidth Or imgHeight > maxheight Then
'Determine what dimension is off by more
Dim deltaWidth As Integer = imgWidth - maxwidth
Dim deltaHeight As Integer = imgHeight - maxheight
Dim scaleFactor As Double
If deltaHeight > deltaWidth Then
'Scale by the height
scaleFactor = maxheight / imgHeight
Else
'Scale by the Width
scaleFactor = maxwidth / imgWidth
End If
imgWidth *= scaleFactor
imgHeight *= scaleFactor
End If
Dim bmPhoto As New Bitmap(imgWidth, imgHeight, PixelFormat.Format24bppRgb)
bmPhoto.SetResolution(72, 72)
Dim grPhoto As Graphics = Graphics.FromImage(bmPhoto)
grPhoto.SmoothingMode = SmoothingMode.HighQuality
grPhoto.InterpolationMode = InterpolationMode.HighQualityBicubic
grPhoto.PixelOffsetMode = PixelOffsetMode.HighQuality
grPhoto.DrawImage(fullSizeImg, New Rectangle(0, 0, imgWidth, imgHeight), 0, 0, fullSizeImg.Width, fullSizeImg.Height, GraphicsUnit.Pixel)
Dim mm As New MemoryStream()
bmPhoto.Save(mm, System.Drawing.Imaging.ImageFormat.Jpeg)
Response.ContentType = "image/jpeg"
Response.Cache.SetCacheability(HttpCacheability.Pu blic)
Response.BufferOutput = False
Response.OutputStream.Write(mm.GetBuffer(), 0, mm.GetBuffer().Length)
End Sub
Function ThumbnailCallback() As Boolean
Return False
End Function
Public ReadOnly Property IsReusable() As Boolean Implements IHttpHandler.IsReusable
Get
Return False
End Get
End Property
End Class
2- داخل صفحه Default.aspx کد های زیر را کپی کن :
<%@ Page Language="C#" AutoEventWireup="true" CodeFile="Default.aspx.cs" Inherits="_Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>CopyRight By Ali Delshad Http://faradade.com</title>
<script>
function EnlargegMe(ID)
{
document.getElementById('big').src='HPicturer.ashx ?img='+ID+'&w=800&h=800&path=~/Images/';
}
</script>
</head>
<body>
<form id="form1" runat="server">
<table border="0">
<tr>
<td>
<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<img onclick="EnlargegMe('<%# Container.DataItem %>')" src='HPicturer.ashx?img=<%# Container.DataItem %>&w=100&h=100&path=~\Images\' />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</td>
<td style="width: 582px">
<img id="big" src="" /></td>
</tr>
</table>
</form>
</body>
</html>
داخل صفحه Default.aspx.cs هم کد های زیر را قرار بده :
using System;
using System.Data;
using System.Configuration;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.IO;
using System.Collections;
public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
string[] Images = Directory.GetFiles(Server.MapPath("Images"));
ArrayList ImgArray = new ArrayList();
for (int i = 0; i < Images.Length; i++)
{
ImgArray.Add(Path.GetFileNameWithoutExtension(Imag es[i]) + Path.GetExtension(Images[i]));
}
GridView1.DataSource = ImgArray;
GridView1.DataBind();
}
}
خوب حالا یه پوشه به نام Images بساز .
این کد هر عکسی که داخل این پوشه باشه رو میاد داخل گرید ویوو نشون میده .
فایل ضمیمه رو هم میتونید دانلود کنید
موفق باشی