mlcheck.asp

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

<!--#include file="../inc/function.asp"-->
<!--#include file="../security.asp"-->
<!--#include file="tvconn.asp"-->
<%
dim js_fname
dim js_falt
dim sql
js_fname=trim(request("js_fname"))
js_falt=trim(request("js_falt"))
if js_fname="" then
	response.write"<script language='javascript'>alert('名字不能为空呀！')</script>"
	response.write"<script>history.go(-1)</script>"
	response.end
end if
sql="select * from jsfolder"
rs.open sql,conn,1,3
rs.addnew
rs("js_fname")=js_fname
rs("js_falt")=js_falt

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='tvmladd.asp';"&Chr(13)
response.write "</script>" & Chr(13)
response.end
%>