ASP — Procedures

Sub

<%
Sub Greet(name)
    Response.Write("Hello, " & name & "!")
End Sub

Greet("John")
Greet("Jane")
%>

Function

<%
Function Add(a, b)
    Add = a + b
End Function

Dim result
result = Add(5, 3)
Response.Write(result)
%>

Return Value

<%
Function IsEven(num)
    If num Mod 2 = 0 Then
        IsEven = True
    Else
        IsEven = False
    End If
End Function

If IsEven(4) Then
    Response.Write("Even")
End If
%>

Scope

<%
' Global variable
Dim globalVar
globalVar = 10

Sub MySub()
    ' Local variable
    Dim localVar
    localVar = 5
    Response.Write(globalVar)  ' Can access global
End Sub
%>

Mini Practice

1. Create a Sub
2. Create a Function
3. Return values
4. Use variable scope

Up Next

Continue with Forms — working with forms.