%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%><%option Explicit Dim ThisID ThisID=7 response.charset="utf-8"%> <%Function Func_Title() response.write("