C
chengulv
Unregistered / Unconfirmed
GUEST, unregistred user!
现在有一文件test.asp 我要完成这样的替换操作 用VBScript 要怎么样写?
替换要求: 用空格将 test.asp 中的VBScript 和 JavaScript 的注释部分。
也就是 VBScript 中单引号("'")后面的内容 和JavaScript 中的 "/* */ "之间,还有"//" 这后的内容。
减低要求:只要能删除文件中所有的注释就行。
文件test.asp内容如下:
'-------------------test.asp (Start) ----------------------
<%
'这里是 VBScript 的注释
Function ReplaceTest(patrn, replStr)
Dim regEx, str1 ' 建立变量。
str1 = "The quick brown lazydo
g."
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分大小写。
ReplaceTest = regEx.Replace(str1, replStr) ' 作替换。
End Function
%>
<script language="javascript">
/* 正则表达
式的应用 */
function resp()
{
//用空格 替换掉文件中的注释部分
}
</script>
'-------------------test.asp (End) ----------------------
替换要求: 用空格将 test.asp 中的VBScript 和 JavaScript 的注释部分。
也就是 VBScript 中单引号("'")后面的内容 和JavaScript 中的 "/* */ "之间,还有"//" 这后的内容。
减低要求:只要能删除文件中所有的注释就行。
文件test.asp内容如下:
'-------------------test.asp (Start) ----------------------
<%
'这里是 VBScript 的注释
Function ReplaceTest(patrn, replStr)
Dim regEx, str1 ' 建立变量。
str1 = "The quick brown lazydo
g."
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分大小写。
ReplaceTest = regEx.Replace(str1, replStr) ' 作替换。
End Function
%>
<script language="javascript">
/* 正则表达
式的应用 */
function resp()
{
//用空格 替换掉文件中的注释部分
}
</script>
'-------------------test.asp (End) ----------------------