tvcheck.asp

千年免费电影系统 V3.0版 在程序上借鉴了很多优秀电影系统的功能

<!--#include file="../inc/function.asp"-->
<!--#include file="../security.asp"-->
<!--#include file="tvconn.asp"-->
<%
f_name=request("f_name")
f_position=request("f_position")
tvtype=request("tvtype")
f_url=request("f_url")
f_maker=request("f_maker")
f_img=request("f_img")
f_keyword=request("f_keyword")
f_alt=request("f_alt")
if f_name="" then
	response.write"<script language='javascript'>alert('名字不能为空')</script>"
	response.write"<script>history.go(-1)</script>"
	response.end
	end if
if f_position="" then
	response.write"<script language='javascript'>alert('请选择文件所在目录')</script>"
	response.write"<script>history.go(-1)</script>"
	response.end
end if
if tvtype="" then
	response.write"<script language='javascript'>alert('播放格式不能为空')</script>"
	response.write"<script>history.go(-1)</script>"
	response.end
end if
if f_alt="" then
	response.write"<script language='javascript'>alert('播放地址不能为空')</script>"
	response.write"<script>history.go(-1)</script>"
	response.end
end if
sql="select * from jsfiles"
rs.open sql,conn,1,3
rs.addnew
rs("f_name")=f_name
rs("f_position")=f_position
rs("tvtype")=tvtype
rs("f_url")=f_url
rs("f_maker")=f_maker
rs("f_img")=f_img
rs("f_keyword")=f_keyword
rs("f_alt")=f_alt
rs("f_adate")=now
rs("f_edate")=now
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "<script language='javascript'>" & chr(13)
response.write "alert('播放地址添加成功！');" & Chr(13)
response.write "window.document.location.href='tvadd.asp';"&Chr(13)
response.write "</script>" & Chr(13)
response.end
%>