<% Set oRS = Server.CreateObject("ADODB.RecordSet") sid=request("id") sql = "select * from kpfilm where id="&sid ors.Open sql, Conn, 0, 2 if not ors.eof or not ors.bof then name=ors("name") nr=ors("nr") id=ors("id") sj=ors("sj") fname=ors("fname") flong=ors("flong") yd=ors("yd") fext=lcase(right(fname,3)) surl=int(instr(fname,"http")) if surl<>0 then ors("yd")=yd+1 ors.update ors.close set ors=nothing conn.close set conn=nothing response.redirect fname end if ' oncontextmenu=self.event.returnValue=false onselectstart="return false" ' if id=5 then ' sfname="vcastr_file=http://www.gdsin.net/gdsinvideo/110311-1.flv&IsAutoPlay=1&LogoText=廣東省地震科普館&Bufferlength=6" ' sfname="vcastr_file=/gdsinvideo/110311-1.flv|http://www.gdsin.net/gdsinvideo/110311-2.flv|http://www.gdsin.net/gdsinvideo/110311-3.flv|http://www.gdsin.net/gdsinvideo/110311-4.flv" ' else sfname="/gdsinvideo/"&fname 'end if 'stretching=uniform\fill\none ors("yd")=yd+1 ors.update ors.close set ors=nothing conn.close set conn=nothing %>
<%=name%>
<% end if%> 北京pk10开奖网址平安 给网上的公众号投稿赚钱吗 手机游戏老虎机平台 在平台玩压龙虎技巧 极速快3开奖号码 河北十一选五开奖走势图 世界杯在哪里投注 幸运飞艇两面盘下载 微信上如何做麻将代理 梦幻西游2吸附赚钱 手机五码中特 十一江苏选五走势图 双色球胆拖投注表图