📄 index_b.asp
字号:
<%@language=JScript%>
<!== Roger Jang, 20041120 -->
<%
function getMFileUsage(fileName){
var i;
var fso = new ActiveXObject("Scripting.FileSystemObject");
var fid=fso.OpenTextFile(fileName, 1);
var contents=fid.ReadAll();
fid.Close();
var lines=contents.split("\n");
var output=new Object();
// ====== Check if a function
pattern=/^\s*function\s/i;
line=lines[0];
output.isFunction=false;
if (line.match(pattern) != null)
output.isFunction=true;
// ====== Get H1 help
pattern=/^%\s*.*: (.*)/i;
pattern=/^%\s*(.*)/i;
output.h1="";
for (i=0; i<lines.length; i++)
if (lines[i].match(pattern) != null){
output.h1=RegExp.$1;
break;
}
// ====== Usage line
pattern=/^%\s*Usage:\s*(.*)/i;
output.usage="";
startLine=-1;
for (i=0; i<lines.length; i++)
if (lines[i].match(pattern) != null){
output.usage=RegExp.$1;
startLine=i;
break;
}
// ====== Argument documentation
pattern=/^%\s*(.*)/i;
output.argumentDoc="";
if (startLine>=0)
for (i=startLine+1; i<lines.length; i++)
if ((lines[i].match(pattern) != null) && (RegExp.$1 != ""))
output.argumentDoc = output.argumentDoc + "\\n" + RegExp.$1;
else
break;
// ====== Return the final output
return(output);
}
%>
<%title="Melody Recognition Toolbox"%>
<html>
<head>
<title><%=title%></title>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=big5">
<meta HTTP-EQUIV="Expires" CONTENT="0">
</head>
<body>
<h2 align=center><%=title%></h2>
<h3 align=center><a target=_blank href="/jang">Roger Jang</a></h3>
<hr>
<!== 虏璶弧⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -