'==========================================================================
' NAME: SelectCase.vbs 
' AUTHOR: Neal Walters
' DATE  : 2/13/2005
' http://VBScript-Training.com 
'
'==========================================================================

state = "fl"

WScript.Echo " The name of the state code=" & state & " name=" & StateLookup(state)



Function StateLookup(statecode) 

Select Case UCase(statecode)
   Case "NY"
       'WScript.Echo "State = New York"
       statename = "New York" 
   Case "CA" 
       'WScript.Echo "State = California"
       statename = "California" 
   Case "TX" 
       'WScript.Echo "State = Texas"
       statename = "Texas" 
   Case "FL" 
       'WScript.Echo "State = Florida"
       statename = "Florida" 
   Case Else 
       'WScript.Echo "State = not one of the big four " 
       statename = "Not a valid state" 
End Select 
StateLookup = statename 
End Function