ASP 大文字と小文字の置換を実現する Web ページ変換ツールを ASP でテストできます。
<html xmlns=http://www.w3.org/1999/xhtml>
<頭>
<meta http-equiv=Content-Type content=text/html;
<title>ASP VBS コードケース仕様 - Wulin.com</title>
</head>
<本文>
<p align=center>
<textarea Name=aspvbscols=100 rows=10 ></textarea>
</p>
<p align=center>
<input Type=button Name=Submit2 Value=∧トップに投稿 style=color:#FF0000 onclick=document.getElementById('aspvbs').value=window.clipboardData.getData('text') />
<input Type=submit Name=Submit Value=Convert onclick=aspvbs() />
<スクリプト言語=javascript>
関数aspvbs()
{
var ss=document.getElementById(aspvbs).value;
var vbs0=関数キーワード|関数|サブ|;
変数vbs1=予約されたキーワード|And|As|ByRef|Call|Case|Class|Const|Dim|Do|Each|Else|ElseIf|Empty|End|Eqv|Erase|Execute|ExecuteGlobal|Exit|Explicit|False|For| |後藤|もし|インプ| In|Is|Let|Loop|Mod|Next|Not|Nothing|Null|On|Option|Or|Private|Public|Randomize|ReDim|Rem|Resume|Select|Set|Stop|Then|To|True|Until| Wend|while|With|Xor|;
変数vbs2=ネイティブ キーワード|放棄|Abs|AbsolutePage|AbsolutePosition|ActiveConnection|ActualSize|AddHeader|AddNew|AppendChunk|AppendToLog|Application|Applicationo n_OnEnd|Application_OnStart|Array|Asc|Atn|Attributes|BeginTrans|BinaryRead|BinaryWrite|BOF|Bookmark|Boolean|Buffer|CacheControl|CacheSize|Cancel| CancelBatch|CancelUpdate|CBool|CByte|CCur|CDate|CDbl|Charset|Chr|CInt|Clear|ClientCertificate|CLng|Clone|Close|CodePage|Command|CommandText|Comma ndTimeout|CommandType|CompareBookmarks|Connection|ConnectionString|ConnectionTimeout|Contents|ContentType|Cookies|Cos|Count|CreateParameter|Create eObject|CSng|CStr|CursorLocation|CursorType|Date|DateAdd|DateDiff|DatePart|DateSerial|DateValue|Day|DefaultDatabase|DefinedSize|Delete|Descriptio n|Dictionary|Direction|EditMode|EOF|Err|Error|Errors|Eval|Execute|Exp|Expires|ExpiresAbsolute|Fields|Fields|File|FileSystem|Filter|Find|Fix|Flush| Form|FormatCurrency|FormatDateTime|FormatNumber|FormatPercent|GetChunk|GetLocale|GetObject|GetRef|GetRows|GetString|HelpContext|HelpFile|Hex|Hour |HTMLEncode|Index|InputBox|InStr|InStrRev|Int|Integer|IsArray|IsClientConnected|IsDate|IsEmpty|IsNull|IsNumeric|IsObject|IsolationLevel|Item|Join |LBound|LCase|LCID|Left|Len|LoadPicture|Lock|LockType|Log|LTrim|MapPath|MarshalOptions|Match|Mid|Minute|Mode|Month|MonthName|Move|MoveFirst|Move Last|MoveNext|MovePrevious|MsgBox|Name|NativeError|NextRecordset|Now|Number|NumericScale|NumericScale|ObjectContext|Oct|OnTransactionAbort|OnTran sactionCommit|Open|OpenSchema|OriginalValue|PageCount|PageSize|Parameters|Parameters|Pics|Precision|Prepared|Properties|Property|PropertyGet|Prope rtyLet|PropertySet|Provider|QueryString|Raise|RecordCount|Recordset|Redirect|RegExp|Replace|Requery|Request|Response|Resync|RGB|Right|Rnd|Rollbac kTrans|Round|RTrim|Save|ScriptEngine|ScriptEngineBuildVersion|ScriptEngineMajorVersion|ScriptEngineMinorVersion|ScriptTimeout|Second|Seek|Server| ServerVariables|Session|Session_OnEnd|Session_OnStart|SessionID|SetAbort|SetAllRowStatus|SetComplete|SetLocale|Sgn|Sin|Size|Sort|Source|Space|Spl it|SQLState|Sqr|State|StaticObjects|Status|StrComp|String|StrReverse|Supports|Tan|Test|Time|Timeout|Timer|TimeSerial|TimeValue|TotalBytes|Trim|Ty pe|TypeName|UBound|UCase|UnderlyingValue|Unlock|Update|UpdateBatch|URLEncode|URLPathEncode|Value|VarType|Version|Weekday|WeekdayName|Write| Year|;
変数vbs3=定数|vb配列|vbBinaryCompare|vbBlack|vbBoolean|vbBlue|vbByte|vbCr|vbCrLf|vbCurrency|vbCyan|vbDataObject|vbDate|vbDecimal|vbEmpty|vbError|vbFa lse|vbFirstJan1|vbFirstFourDays|vbFirstFullWeek|vbフォームフィード|vbFriday|vbGeneralDate|vbGreen|vbInteger|vbLf|vbLong|vbLongDate|vbLongTime|vbMagenta| vbMonday|vbNewLine|vbNull|vbNullChar|vbNullString|vbObject|vbObjectError|vbRed|vbSaturday|vbShortDate|vbShortTime|vbSingle|vbString|vbSunday|vbT ab|vbTextCompare|vb木曜日|vbTrue|vb火曜日|vbUseDefault|vbUseSystem|vbUseSystemDayOfWeek|vbVariant|vbVerticalTab|vb水曜|vb白|vb黄|;
//原則として、s は |str1|str2| である必要があります。
s=vbs0+vbs1+vbs2+vbs3;
関数 re_aspvbs(a, b)
{
var re = new RegExp(//|(+ b +)//|, ig);
if(re.test(s)) は RegExp.$1 を返します。
それ以外の場合は b を返します。
}
var re = //b(/w+)/b/g;
ss = ss.replace(re, re_aspvbs);
document.getElementById(show).value=ss;
}
</script>
<input Type=button Name=Submit3 Value=次の∨ style=color をコピーします: #FF00FF onclick=window.clipboardData.setData('text',document.getElementById('show').value) />
</p>
<p align=center>
<textarea Name=showcols=100 rows=10 ></textarea>
</p>
</body>
</html>