<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%><%option Explicit response.charset="utf-8" dim listnum,t,tlnum,totalPut, CurrentPage, TotalPages,filename,filen,thisn,totalnumber Dim ThisID,lmid,xgid1,xgid2 ThisID=5 id=request("id") If id="" Or Not IsNumeric(id) Then id=1%><% %>