function getcenter(str,a,b)'str是字符串
getcenter=split(split(str,a)(1),b)(0)
end function
response.Write getcenter("要截取的字符串","要","字")