Programmingsite : source code

Display an image

Image display

<script  runat=server> Sub Page_Load(Sender As Object

Bookmark It

Bookmark It

Send an email

Email example

<%@Page Explicit="False" Language="VB" Debug="True" %> <%@Import Namespace="System.Web.Mail" %> <%

Dim EmailTo As String = "test@test.com" Dim EmailFrom As String = "myemail@myemail.com" Dim EmailSubject As String = "Sample Email" Dim EmailBody As String = "Test email" System.Web.Mail.SmtpMail.Send(EmailFrom

Bookmark It

Bookmark It

Display various file properties of files in a folder

File properties

<%@Page Language="VB" %> <%@ Import Namespace="System.IO" %> <script language="VB" runat="server"> Sub Page_Load(sender as Object

Bookmark It

Bookmark It

Random numbers

Random number

<script language="VB" runat="server"> Sub Page_Load(sender as Object

Bookmark It

Bookmark It

A drawing example

Drawing example

<%@ Page Language="VB" ContentType="image/gif" %> <%@ Import Namespace="System.Drawing" %> <%@ Import Namespace="System.Drawing.Imaging" %> <Script Runat = "Server"> Sub Page_Load Dim objBitmap As Bitmap Dim objGraphics As Graphics objBitmap = New Bitmap(480

Bookmark It

Bookmark It