web 2.0

ASP.NET(vb.net) & Upload and Write Text to Picture

ASP.NET(vb.net) & Upload and Write Text to Picture - The in this tutorial, you’ll learn and example scripts how to Upload and write text to picture using by ASP.NET scripts.

ShotDev Focus:
- ASP.NET(vb.net) & Upload and Write Text to Picture

Example

AspNetUploadWriteTextPicture.aspx

<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<%@ Page Language="VB" %>
<script runat="server">

Sub btnUpload_OnClick(sender As Object, e As EventArgs)

Dim UlFileName,NewFileName As String

If Me.fiUpload.HasFile Then

UlFileName = "MyImages/" & fiUpload.FileName

Me.fiUpload.SaveAs(Server.MapPath(UlFileName))

NewFileName = "MyImages/New_" & fiUpload.FileName

Dim objBitmap As Bitmap = New System.Drawing.Bitmap(Server.MapPath(UlFileName))
Dim objGraphic As Graphics = Graphics.FromImage(objBitmap)

'*** Write Text ***'
Dim strText As String = "CopyRight 2009 (www.ShotDev.Com)" '*** String ***'
Dim objFont As New Font("Tahoma", 10) '*** Font Style ***'
Dim objBrushWrite As New SolidBrush(Color.Red) '*** Font Color ***'

'*** Text Align ***'
Dim strFormat As New StringFormat
strFormat.Alignment = StringAlignment.Far  '*** .Near (Left) , .Far (Right) ***'
strFormat.LineAlignment = StringAlignment.Far '*** .Near (Top) , .Far (Down) ***'

'*** DrawString ***'
objGraphic.DrawString(strText, objFont, objBrushWrite, New Rectangle(0, 0, objBitmap.Width, objBitmap.Height),strFormat)

'*** Save As ***'
objBitmap.Save(Server.MapPath(NewFileName), ImageFormat.Jpeg)

'*** Close ***'
objGraphic.Dispose()

'*** Nothing ***'
objBitmap = Nothing
objGraphic = Nothing

'*** View Images ***'
Me.imgPicture1.Visible = True
Me.imgPicture1.ImageURL = NewFileName

End IF

End Sub

</script>
<html>
<head>
<title>ShotDev.Com Tutorial</title>
</head>
<body>
<form id="form1" runat="server">
<asp:FileUpload id="fiUpload" runat="server"></asp:FileUpload>
<input id="btnUpload" type="button" OnServerClick="btnUpload_OnClick"  value="Upload" runat="server" />
<hr />
<asp:Image id="imgPicture1" Visible="false" runat="server" /><br />
</form>
</body>
</html>

Screenshot

ASP.NET(vb.net) & Upload and Write Text to Picture
.
.
.
Download this script.
Download

1 Star2 Stars3 Stars4 Stars5 Stars6 Stars7 Stars8 Stars9 Stars10 Stars (No Ratings Yet)
Loading ... Loading ...

Leave a Reply

You must be logged in to post a comment.