adddata_list.asp

来自「网上招聘与求职系统是通过INTERNET」· ASP 代码 · 共 28 行

<!--#include file="conn.asp"-->
<%
if session("login")<>"yes" then
response.write "<script language=JavaScript>" & chr(13) & "alert('您未登录或账号密码错误,请重登录！');" & "history.back()" & "</script>" 
response.end
end if
if trim(request("what"))="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('项目不能为空！');" & "history.back()" & "</script>" 
Response.End
end if
sql="select id from "&request("how")&"list where "&request("how")&"class='"&request("what")&"'"
rs.open sql,conn,1,1
if rs.recordcount<>0 then
rs.close
set rs=nothing
set conn=nothing
response.write "<script language=JavaScript>" & chr(13) & "alert('此项目已经存在！');" & "history.back()" & "</script>" 
Response.End
else
rs.close
sql="insert into "&request("how")&"list("&request("how")&"class) values('"&request("what")&"')"
rs.open sql,conn,1,1
set rs=nothing
set conn=nothing
response.write "<script language=JavaScript>" & chr(13) & "alert('项目添加成功！');"&"window.location.href = 'admin_list.asp'"&" </script>"
end if
%>