/L20"VBScript Active Server Pages" Nocase HTML_LANG Line Comment = REM Block Comment On = String Chars = "' File Extensions = ASP INC ASA SCT CLS BAS /Delimiters = ~!@%^&*()_-+=|\{}[]:;"'<> , .? /Function String = "%[PF]*)$" /Indent Strings = "Then" "Select Case" "Case" "Do While" "Do" /Unindent Strings = "End" "Next" "End If" "End Select" "Loop" "End Select" "Loop While" /C1 TAGS