﻿
Partial Class ProcessFormExample
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Response.ContentType = "text/plain"
        Response.ContentEncoding = Encoding.UTF8
        Response.Write("<p>Hello</p>")
        Response.Write("The name entered was " & Request.Form("nametextbox"))
        Response.Write("<br/>The age entered was " & Request.Form("agetextbox"))

        If Not Request.Form("nametextbox") Is Nothing Then
            If Request.Form("nametextbox") = "" Then
                Response.Write("<br/>No text entered for name")
            End If
        End If

        If Not Request.Form("agetextbox") Is Nothing Then
            If Request.Form("agetextbox") = "" Then
                Response.Write("<br/>No text entered for age")
            ElseIf IsNumeric(Request.Form("agetextbox")) = False Then
                Response.Write("<br/>Age must be a number")
            End If
        End If
    End Sub
End Class
