?? m_addsave.asp
字號:
<!-- #include file="cookies.asp" -->
<!-- #include file="conn/conn.asp" -->
<%
edit=trim(request.querystring("edit")) '動作 save保存修改記錄,add增加記錄
table=trim(request.querystring("act")) '表名稱,profession為專業表,curricula為課程表
nowdate=date()
sign=0
set rs=server.createobject("adodb.recordset")
if edit="save" then
'檢查修改的名字是否存在
sql="select * from "&trim(table)&" where name='"&trim(request.form("name"))&"'"
rs.open sql,conn,1,1
if not rs.eof then
sign=0
%>
<script language=javascript>
window.alert("該名稱已存在")
window.location.href='m_edit.asp?id=<%=trim(request.form("id"))%>&act=<%=trim(table)%>';
</script>
<%
else
sign=1 '檢查通過,sign置為1
end if
rs.close
set rs=nothing
elseif edit="add" then '增加時需判斷編號是否存在
'判斷編號是否存在
sql="select * from "&trim(table)&" where id='"&trim(request.form("id"))&"'"
rs.open sql,conn,1,1
if not rs.eof then
sign=0
%>
<script language=javascript>
window.alert("該編號已存在")
</script>
<%
else
sign=1 '檢查通過,sign置為1
end if
rs.close
set spl=nothing
'判斷名稱是否存在
sql="select * from "&trim(table)&" where name='"&trim(request.form("name"))&"'"
rs.open sql,conn,1,1
if not rs.eof then
sign=0
%>
<script language=javascript>
window.alert("該名稱已存在")
</script>
<%
else
sign=1 '檢查通過,sign置為1
end if
rs.close
set rs=nothing
end if
if edit="save" and sign=1 then '保存
'取記錄修改
set rs=server.createobject("adodb.recordset")
sql="select * from "&trim(table)&" where id='"&trim(request.form("id"))&"'"
rs.open sql,conn,1,3
rs("name")=trim(request.form("name"))
if table="curricula" then '如果是維護課程表需加入專業字段
rs("pname")=trim(request.form("pro"))
end if
rs("addtime")=trim(nowdate)
rs.update
rs.close
set rs=nothing
elseif edit="add" and sign=1 then '增加
'增加記錄
set rs=server.createobject("adodb.recordset")
sql="select * from "&trim(table)&""
rs.open sql,conn,1,3
rs.addnew
rs("id")=trim(request.form("id"))
rs("name")=trim(request.form("name"))
if table="curricula" then
rs("pname")=trim(request.form("pro"))
end if
rs("addtime")=trim(nowdate)
rs.update
rs.close
set rs=nothing
end if
conn.close
set conn=nothing
if edit="save" then
%>
<script language=javascript>
window.alert("修改成功!")
self.opener.location.reload();
window.close();
</script>
<%
else
if trim(table)="profession" then
%>
<script language=javascript>
window.location.href='m_pro_add.asp';
</script>
<%
else
%>
<script language=javascript>
window.location.href='m_cur_add.asp';
</script>
<%
end if
end if %>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -