以标志性字符截取字符串

function Mid2(Content,StartStr,EndStr)
    dim StartIndex,EndIndex
    ObjStr=Content
    StartIndex=instr(ObjStr,StartStr)+len(StartStr)
    ObjStr=mid(ObjStr,StartIndex)
    EndIndex=instr(ObjStr,EndStr)-1
    ObjStr=left(ObjStr,EndIndex)
    
    Mid2=ObjStr
end function

 

实例说明：

 

dim Str

Str="112233"

response.write Mid2(Str,"11","33")　'输出结果：22



枫叶随风网

http://www.fengyekun.com