downurl.asp

视频点播系统

<!--#include file="oklu.asp"-->
<%
if application(""&request("uset")&"")="" then response.end%>
<!--#include file="articleconn.asp"-->
<% application(""&request("uset")&"")=""
   dim rst,sql 
   set rsb=server.createobject("adodb.recordset")
   sql1="select * from movie where id="&request("serverip")
   rsb.open sql1,conn,1,1
   movie=""&trim(rsb("movie"))&""
   rsb.close                                                           
   conn.close                               
   set conn=nothing
   if request("oker")="" then
   response.redirect movie&request("real")
   else
   response.write movie&request("real")
   end if
%>