Dynamic Image

دوست دارین وقتی کاربر سایتتون وارد میشه ٬ اسم کاربری یا هر چیز دیگه اش

رو به شکل عکس در آورده و بهش نشون بدین ( واسه خوش آمدگویی .... البته کلاس گذاشتن!!!)

پس این مقاله رو تا آخر بخونین

لازم به گفتنه که فایل به فرمت aspx و  Visual Studio.Net رو هم لازم دارین

حالا اگه حاضرین این کارها رو با دقت انجام بدین :

 

1.Visual Studio.Net رو اجرا کنین و New Project رو بزنین

2.از قسمت Visual Studio Projects  گزینه ASP.Net Application رو انتخاب واسمشو DynamicImage گذاشته و در آخر هم OK رو بزنین

نکته : IIS رو باید نصب کرده باشین و مطمئن بشین که تو Internet Explorer گزینه Work Offline چک نخورده باشه

3.فرم رو انتخاب کرده و از تو Properties اسم فایل رو به  DynamicImage تغییر بدین

4.رو فرم کلیک راست کرده و Properties رو بزنین

5.تب General رو انتخاب کرده و Page Title رو Dynamic Image Example بذارین و مطمئن بشید اون پایین Client و Server هر دو رو VBScript باشن

6.حالا زحمت بکشین و یه TextBox بندازین رو فرم (البته از طرف چپ حدودا 10 سانتی متر فاصله بذارین)

7.حالا نوبت به کد نویسیه :

+++ 1.رو فرم دابل کلیک کنین تا صفحه مربوط به کدنویسی باز بشه

+++ 2.بالای بالای صفحه بنویسید :  

+++ 3.حالا بین  Private Sub Form_load... و End Sub  این کدها رو بنویسید :

 If Not IsPostBack Then Response.Write(“Page before posting<br>”) Else Response.ContentType = “image/gif” getImage(TextBox1.Text).Save(Response.OutputStream, _ System.Drawing.Imaging.ImageFormat.Gif) Response.End() End If

+++ 4.بالای End Class هم این کدها رو بذارین :

Public Function getImage(ByVal s As String) As Bitmap Dim b As Bitmap = New Bitmap(1, 1) ‘Create a Font object Dim aFont As Font = New Font(“Times New Roman”, 24, _ System.Drawing.GraphicsUnit.Point) ‘Create a Graphics Class to measure the text width Dim aGraphic As Graphics = Graphics.FromImage(b) ‘Resize the bitmap b = New Bitmap( _ CInt(aGraphic.MeasureString(s, aFont).Width), _ CInt(aGraphic.MeasureString(s, aFont).Height)) aGraphic = Graphics.FromImage(b) aGraphic.Clear(Color.White) aGraphic.TextRenderingHint = TextRenderingHint.AntiAlias aGraphic.DrawString(s, aFont, _ New SolidBrush(Color.Blue), 0, 0) aGraphic.Flush() Return b End Function

+++ 5. حالا برنامه رو اجرا کنین (با کلید F5 )

حالا متن مورد نظرتون رو تو جعبه بنویسین و Enter رو بزنین

 

نکته:اگه یه کم زیرک باشین میفهمین که وقتی جعبه خالی باشه و کلید Enter رو بزنین با خطا مواجه میشین

حالا باید یه شرط داخل کد بذارین

خب واسه این کار بین  Private Sub Form_load... و End Sub  این کدها رو بنویسید و کدهای قبلی رو پاک کنید

***میتونین پاک نکنین و کدهای جدید رو اضافه کنین ولی در این مقاله سعی شده آماتورها هم بتونن راحت کار کنن

If TextBox1.Text = "" Then Else If Not IsPostBack Then Response.Write(“Page before posting<br>”) Else Response.ContentType = “image/gif” getImage(TextBox1.Text).Save(Response.OutputStream, _ System.Drawing.Imaging.ImageFormat.Gif) Response.End() End If End if

البته این شرط خیلی ساده و ابتداییه و میتونین با استفاده از Validator فرم رو کنترل کنید

و در آخر هم باید عرض کنم که اگه یه کم حوصله بخرج بدین و بیشتر باهاش کار کنین چیز جالبتری گیرتون میاد