<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <%if request("leixing")<>"" then biaoti=request.QueryString("leixing") else biaoti="Video" end if%> <%=biaoti%> - Liming Video <% lulu=request("leixing") if request("id")<>"" then set rs=server.createobject("adodb.recordset") sql="select cs from video where id=" & request("id") rs.open sql,conn,1,3 rs("cs")=rs("cs")+1 rs.update end if %>
Latest Uploads
<% set rs=server.createobject("adodb.recordset") if request("leixing")<>"" then sql="select * from video where lei='" & request("leixing") & "' order by uptime desc" else sql="select * from video order by uptime desc" end if rs.open sql,conn,1,3 i=1 do while not rs.eof %>
"> ">">
"><%=left(rs("title"),22)%>
<%i=i+1 rs.movenext loop rs.close %>
Tel:   0086-371-67992899        Fax:   0086-371-67992699
Email:  info@limingco.com