2
/*************************************************************************************
5
* Author: Amit Gupta (http://blog.igeek.info/)
6
* Copyright: (c) 2004 Amit Gupta (http://blog.igeek.info/), Nigel McNie (http://qbnz.com/highlighter)
7
* Release Version: 1.0.8.11
8
* Date Started: 2004/08/13
10
* ASP language file for GeSHi.
15
* - Strings only delimited by ", comments by '
17
* - Added support for multiple object splitters
19
* - Added support for URLs
23
* TODO (updated 2004/11/27)
24
* -------------------------
25
* * Include all the functions, keywords etc that I have missed
27
*************************************************************************************
29
* This file is part of GeSHi.
31
* GeSHi is free software; you can redistribute it and/or modify
32
* it under the terms of the GNU General Public License as published by
33
* the Free Software Foundation; either version 2 of the License, or
34
* (at your option) any later version.
36
* GeSHi is distributed in the hope that it will be useful,
37
* but WITHOUT ANY WARRANTY; without even the implied warranty of
38
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
39
* GNU General Public License for more details.
41
* You should have received a copy of the GNU General Public License
42
* along with GeSHi; if not, write to the Free Software
43
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
45
************************************************************************************/
47
$language_data = array (
49
'COMMENT_SINGLE' => array(1 => "'", 2 => '//'),
50
'COMMENT_MULTI' => array('/*' => '*/'),
51
'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
52
'QUOTEMARKS' => array('"'),
56
'include', 'file', 'Const', 'Dim', 'Option', 'Explicit', 'Implicit', 'Set', 'Select', 'ReDim', 'Preserve',
57
'ByVal', 'ByRef', 'End', 'Private', 'Public', 'If', 'Then', 'Else', 'ElseIf', 'Case', 'With', 'NOT',
58
'While', 'Wend', 'For', 'Loop', 'Do', 'Request', 'Response', 'Server', 'ADODB', 'Session', 'Application',
59
'Each', 'In', 'Get', 'Next', 'INT', 'CINT', 'CBOOL', 'CDATE', 'CBYTE', 'CCUR', 'CDBL', 'CLNG', 'CSNG',
60
'CSTR', 'Fix', 'Is', 'Sgn', 'String', 'Boolean', 'Currency', 'Me', 'Single', 'Long', 'Integer', 'Byte',
61
'Variant', 'Double', 'To', 'Let', 'Xor', 'Resume', 'On', 'Error', 'Imp', 'GoTo', 'Call', 'Global'
64
'Null', 'Nothing', 'And',
66
'True', 'var', 'Or', 'BOF', 'EOF', 'xor',
67
'Function', 'Class', 'New', 'Sub'
70
'CreateObject', 'Write', 'Redirect', 'Cookies', 'BinaryRead', 'ClientCertificate', 'Form', 'QueryString',
71
'ServerVariables', 'TotalBytes', 'AddHeader', 'AppendToLog', 'BinaryWrite', 'Buffer', 'CacheControl',
72
'Charset', 'Clear', 'ContentType', 'End()', 'Expires', 'ExpiresAbsolute', 'Flush()', 'IsClientConnected',
73
'PICS', 'Status', 'Connection', 'Recordset', 'Execute', 'Abandon', 'Lock', 'UnLock', 'Command', 'Fields',
74
'Properties', 'Property', 'Send', 'Replace', 'InStr', 'TRIM', 'NOW', 'Day', 'Month', 'Hour', 'Minute', 'Second',
75
'Year', 'MonthName', 'LCase', 'UCase', 'Abs', 'Array', 'As', 'LEN', 'MoveFirst', 'MoveLast', 'MovePrevious',
76
'MoveNext', 'LBound', 'UBound', 'Transfer', 'Open', 'Close', 'MapPath', 'FileExists', 'OpenTextFile', 'ReadAll'
84
'(', ')', '[', ']', '!', '@', '%', '&', '*', '|', '/', '<', '>',
87
'CASE_SENSITIVE' => array(
88
GESHI_COMMENTS => false,
95
1 => 'color: #990099; font-weight: bold;',
96
2 => 'color: #0000ff; font-weight: bold;',
97
3 => 'color: #330066;'
100
1 => 'color: #008000;',
101
2 => 'color: #ff6600;',
102
'MULTI' => 'color: #008000;'
104
'ESCAPE_CHAR' => array(
105
0 => 'color: #000099; font-weight: bold;'
108
0 => 'color: #006600; font-weight:bold;'
111
0 => 'color: #cc0000;'
114
0 => 'color: #800000;'
117
1 => 'color: #9900cc;'
120
0 => 'color: #006600; font-weight: bold;',
121
1 => 'color: #000000; font-weight: bold;'
138
'OBJECT_SPLITTERS' => array(
143
'STRICT_MODE_APPLIES' => GESHI_MAYBE,
144
'SCRIPT_DELIMITERS' => array(
149
'<script language="vbscript" runat="server">' => '</script>'
152
'<script language="javascript" runat="server">' => '</script>'
154
3 => "/(?P<start><%=?)(?:\"[^\"]*?\"|\/\*(?!\*\/).*?\*\/|.)*?(?P<end>%>|\Z)/sm"
156
'HIGHLIGHT_STRICT_BLOCK' => array(
b'\\ No newline at end of file'