摘要： '得到当前页面路径 Dim total_name As String total_name = Request.ServerVariables("script_name") '裁切虚拟路径字符串->得到当前页面的名称 Dim phisical_pos As Integer phisical_pos = total_name.IndexOf("/", 1) '最终得到当前页面虚拟路径 Dim pag... 阅读全文