To/From Code

	Languages
BROWSEBYLANGUAGE Access VBA ASP Classic C# C++ C++/CLI Corel Paradox Delphi Delphi Prism Java JavaScript Perl PHP VB Classic VB.Net

	Categories
BROWSEBYCATEGORY +Tool Basics +Language Basics +Language Details +Data Structures -Statements ◄╣ Exception Trapping If Statement +Operators +Commands +Database +OOP Basics +OOP Details

	ASP Classic Guides
ASP Classic To/From Conversion Guides ASP Classic and Access VBA ASP Classic and C# ASP Classic and C++ ASP Classic and C++/CLI ASP Classic and Corel Paradox ASP Classic and Delphi ASP Classic and Java ASP Classic and JavaScript ASP Classic and Perl ASP Classic and PHP ASP Classic and VB Classic ASP Classic and VB.Net

Cross Ref Guide

ASP CLASSICLANGUAGE

ASP Classic

ASP CLASSICANDDELPHI PRISMTOC

Overview

+Tool Basics

Report Tools Overview

+Language Basics

+Language Details

+Data Structures

Array

-Statements◄╣

+Operators

+Commands

+Database

+OOP Basics

+OOP Details

	Members-Only
Sign in to see member-only pages.

► KB ► To/From Guides ► ASP Classic ► Statements

Print This

Cross Ref > Statements

By Mike Prestwood

ASP Classic versus Delphi Prism: A side by side comparison between ASP Classic and Delphi Prism.

Statements

Common statements such as if statements, loops, etc.

Exception Trapping

[Other Languages]

Languages Focus

A common usage of exception handling is to obtain and use resources in a "try-it" block, deal with any exceptions in an "exceptions" block, and release the resources in some kind of "final" block which executes whether or not any exceptions are trapped.

ASP Classic: On Error

Syntax Example:

On Error Resume Next
  Response.Write FormatDateTime(f_CurrentActualDate, vbShortDate)

  If ErrNumber <> 0 Then
    Break(f_CurrentActualDate)
  End If
On Error Goto 0

Using On Error Resume Next

Delphi Prism: try..except, try..finally

Use a try..except..end block to trap and process errors.

Delphi also offers a try...finally where code will execute in the finally section no matter what. It's common to put a try..except inside a try..finally.

Syntax Example:

try
  var y: Integer;
  y := 0;
  y := 1/y;
except
  MessageBox.Show("You cannot divide by zero.");
end;

If Statement

[Other Languages]

ASP Classic: If..ElseIf..Else..End If

The End If is optional if you put your code on a single line.

Syntax Example:

//Single line example.

If X = True Then Response.Write "hello"

//Complete example.

If X = True Then
  '>>>do something.

ElseIf Y = "ABC" Then
  '>>>do something.
Else
  '>>>do something.

End If

ASP Classic If Statement (If..ElseIf..Else..End If)

Delphi Prism: if..else if..else

Notice in the more complete example that the semicolon for the begin..end block after end is not included. That tells the compiler something else is coming (the statement is not finished). Also note the semicolon is missing right before the final "else" statement.

Syntax Example:

//Complete example:
if x = true then begin

  ShowMessage('x is true');

end

Else If y = 'Mike' Then

  ShowMessage('hello mike')

Else

  ShowMessage('last option');