SELECT CASE Demo (Simple demo to use this)

SEARCH ASP FREE

This demo seems a is for the beginner but always a good refresher for the experienced programmer as I recently experienced. Was working on a project that involved IF THEN and SELECT CASE Statements and need a basic how-to to refresh my mind how they work!! One thing I forgot was Values are case sensative, for example--when selecting Green it wasn't appearing. After some review the value was green. The letter "g" wasn't capitialized! Geez! So we want to share this demo on ASPFree.com if it help our users! Using a SELECT CASE is a very efficient way of nesting several instances based on user input. Instead of using IF THEN ELSEIF statements this offers you must more flexiability.

Heres the code Page One

<P> </P>
<form method="post" action="selectcase.asp" name="form1">
<TABLE border=1 cellPadding=1 cellSpacing=1 width="75%">

<TR>
<TD><STRONG><FONT color=green>Green</FONT></STRONG></TD>
<TD><INPUT name=radio1 type=radio value=Green checked></TD></TR>
<TR>
<TD><FONT color=blue>Blue</FONT></TD>
<TD><INPUT name=radio1 type=radio value=Blue></TD></TR>
<TR>
<TD><FONT color=red>Red</FONT></TD>
<TD><INPUT value=Red name=radio1 style="LEFT: 30px; TOP: 15px"
type=radio></TD></TR>
<TR>
<TD><STRONG>Black</STRONG></TD>
<TD><INPUT value=Black name=radio1 type=radio></TD></TR></TABLE>
<P><INPUT id=submit1 name=submit1 type=submit value="SELECT CASE DEMO"></P>
</form>
<P> </P>

</body></html>

Page 2

<%@ Language=VBScript %>
<%

dim myRadioColor

myRadioColor = request("radio1")

Select Case myRadioColor

Case "Green"
strColor = "Green"

Case "Blue"
strColor ="Blue"

Case "Red"
strColor = "Red"

Case "Black"
strColor = "Black"

Case Else
strColor = "Purple"

End Select
%>
<HTML>
<HEAD>
</HEAD>
<BODY>

<h1>You chose the color: <% = strColor %></h1>

</BODY>
</HTML>