asp下实现截取字符串特定部分内容函数

截取字符串特定部分内容函数<%
"******************************
"函数：GetKey(HTML,Start,Last)
"参数：HTML,待截取的原字符串；tart,截取开始标记；last,截取结束标记
"作者：阿里西西
"日期：2007/7/12
"描述：截取字符串函数，从Start开始截取，到Last为结束
"示例：<%=GetKey("阿里西西，国内最大的WEB开发资源","最大的","资源")%>
"******************************
Function GetKey(HTML,Start,Last)
filearray=split(HTML,Start)
filearray2=split(filearray(1),Last)
GetKey=filearray2(0)
End Function
%>