%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim hlArr,clsid hlArr=rqInfo(rq("id"),30,"siteNews") clsid=Trim(Request.QueryString("clsid")) %>