📄 publish.asp
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css2.css" rel="stylesheet" type="text/css">
</head>
<body>
<%'//变量及数据的处理(删、修、添)
dim action,pubkey,pubid,page,i,i_mun,i_color
pubid=request.QueryString("sid")
action =request.QueryString("action")
set rs=server.CreateObject("adodb.recordset")
select case action
'/////删除出版社
case "pubdel"
conn.execute "delete from shop_publish where pubid="&pubid
response.redirect "publish.asp?action=publish"
'/////修改出版社
case "pubsave"
rs.open "select * from shop_publish where pubid="&pubid,conn,1,3
if request("pubjian")="" or request("bookchuban")="" then
response.write "<script language=javascript>alert('简称或全称不能为空！');window.location.reload('publish.asp?action=publish')</script>"
else
rs("pubjian")=request("pubjian")
rs("bookchuban") =request("bookchuban")
rs.update
rs.close
response.write "<script language=javascript>alert('成功修改了出版社资料！');window.location.reload('publish.asp?action=publish')</script>"
response.End
end if
'/////添加出版社
case "pubadd"
rs.open "select * from shop_publish",conn,1,3
if request("pubjian")="" or request("bookchuban")="" then
response.write "<script language=javascript>alert('输入的信息不完整！');window.location.reload('publish.asp?action=publish')</script>"
else
rs.addnew
rs("pubjian")=request("pubjian")
rs("bookchuban") =request("bookchuban")
rs.update
rs.close
response.write "<script language=javascript>window.location.reload('publish.asp?action=publish')</script>"
response.End
end if
end select
set rs=nothing
%>
<table width="90%" border="0" height=450 cellpadding="0" cellspacing="0">
<tr><td bgcolor="#ece9d8"><br>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td>
<table width=154 border="0" cellpadding="0" cellspacing="0">
<tr valign=bottom><% select case action
case "publish"%>
<td background=images/get_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><font color=#ffffff>出版社管理</font></div></td>
<td background=images/lose_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><font color=#ffffff>查询结果</font></div></td>
<%case else%>
<td background=images/lose_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><a href="publish.asp?action=publish"><font color=#000000>出版社管理</font></a></div></td>
<td background=images/get_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><font color=#ffffff>查询结果</font></div></td><%
end select%>
</tr>
</table>
<%'//界面的设计(查、显、添)
select case action
case "publish" '//出版社界面的设计(查、显、添)%>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0" bordercolordark="#ffffff" bordercolorlight="#666666">
<form name="form1" method="post" action="publish.asp?action=chekpubkey">
<tr>
<td colspan=2 bgcolor="#cccccc" height=28><div align="center">输入查询出版社名称 <input name="pubkey" type="text" id="pubkey" class="tx" size="28"> <input type="submit" name="Submit32" class="bt5" value="查 询"></div></td>
</tr>
</form>
<tr>
<td width="60%" valign=top>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0">
<tr><td>
<table width="100%" border="0" align=center cellspacing="0" cellpadding="0" bgcolor="#ffffff">
<tr>
<td width="20%" bgcolor="#ece9d8"><div align="center">简称</div></td>
<td width="45%" bgcolor="#ece9d8"><div align="center">出版社名</div></td>
<td width="20%" bgcolor="#ece9d8"><div align="center">编辑</div></td>
<td width="20%" bgcolor="#ece9d8"><div align="center">删除</div></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_publish order by pubjian",conn,1,1
page=1:i=0:i_mun=1
Page = rs.AbsolutePage
rs.PageSize = 10
if Not IsEmpty(Request("Page")) then
Page = CInt(Request("Page"))
if Page > rs.PageCount then
rs.AbsolutePage = rs.PageCount
elseif Page <= 0 then
Page = 1
else
rs.AbsolutePage = Page
end if
else
Page = 1
End if
For i = 1 to rs.PageSize
if rs.EOF then
Exit For
end if
if i_mun mod 2=1 then
i_color="#ffffff"
else
i_color="#eeeeee"
end if%>
<tr>
<form name="form1" method="post" action="publish.asp?action=pubsave&sid=<%=rs("pubid")%>">
<td bgcolor=<%=i_color%>><div align="center"><input name="pubjian" type="text" id="pubjian" size="6" value=<%=rs("pubjian")%>></div></td>
<td bgcolor=<%=i_color%>><div align="center"><input name="bookchuban" type="text" id="bookchuban" size="25" value=<%=trim(rs("bookchuban"))%>></div></td>
<td bgcolor=<%=i_color%>><div align="center"><input name="Submit2" type="submit" class="bt" value="确认">
<td bgcolor=<%=i_color%>><div align="center"><a href="publish.asp?action=pubdel&sid=<%=rs("pubid")%>" onClick="return confirm('您确定进行删除操作吗？')"><font color="#FF0000">删除</font></a></div></td>
</form>
</tr>
<%i_mun=i_mun+1
rs.movenext
next
%>
<tr>
<td colspan=4 bgcolor="#ece9d8" height=40><div align="center">出版社共<%=rs.recordcount%>条<%=rs.pagecount%>页
<%if request("page")>1 then%>
<a Href="publish.asp?action=publish&Page=<%=1%>">首页</a> <a Href="publish.asp?action=publish&Page=<%=page-1%>">上一页</a>
<%end if %>
<%if request("page")<>rs.pagecount and page<rs.pagecount then %>
<a Href="publish.asp?action=publish&Page=<% =page + 1%>">下一页</a> <a Href="publish.asp?action=publish&Page=<%=rs.PageCount%>">尾页</a>
<%end if
if rs.pagecount>0 then %>
当前第<font color="#FF3300"><%=page%></font>页
<%end if%></font></div></td>
</tr>
</table>
</tr>
</table>
<td valign=top>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0" bgcolor="#cccccc">
<form name="form1" method="post" action="publish.asp?action=pubadd">
<tr>
<td colspan=2 bgcolor="#ece9d8"><div align="center"><b>增加出版社</b></div></td>
</tr>
<tr>
<td><div align="right">简称
<td><input name="pubjian" type="text" class="tx" id="pubjian" size="6" >
</tr>
<tr>
<td><div align="right">出版社名
<td><input name="bookchuban" type="text" class="tx" id="bookchuban" size="25">
</tr>
<tr>
<td colspan=2><div align="center"><input type="submit" name="Submit32" class="bt5" value="添 加"></div></td>
</tr>
</form>
</tr>
</table>
<%rs.close
set rs=nothing
'//查询出版社功能部分
case "chekpubkey"
pubkey =request("pubkey")
set rs=server.createobject("adodb.recordset")
if pubkey="" then pubkey=request.QueryString("pubkey")
rs.open "select * from shop_publish where bookchuban='"&pubkey&"' ",conn,1,1
if rs.bof and rs.eof then
response.write "<script language=javascript>alert('没有找到您查询的出版社！');window.location.reload('publish.asp?action=publish')</script>"
else%>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0" bordercolordark="#ffffff" bordercolorlight="#666666">
<form name="form1" method="post" action="publish.asp?action=chekpubkey">
<tr>
<td colspan=2 bgcolor="#cccccc" height=28><div align="center">输入查询出版社名称 <input name="pubkey" type="text" class="tx" id="pubkey" size="28"> <input type="submit" name="Submit32" class="bt5" value="查 询"></div></td>
</tr>
</form>
<tr>
<td width="60%" valign=top>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0">
<tr><td>
<table width="100%" border="0" align=center cellspacing="0" cellpadding="0" bgcolor="#ffffff">
<tr>
<td width="20%" bgcolor="#ece9d8"><div align="center">简称</div></td>
<td width="45%" bgcolor="#ece9d8"><div align="center">出版社名</div></td>
<td width="20%" bgcolor="#ece9d8"><div align="center">编辑</div></td>
<td width="20%" bgcolor="#ece9d8"><div align="center">删除</div></td>
</tr>
<tr>
<form name="form1" method="post" action="publish.asp?action=pubsave&sid=<%=rs("pubid")%>">
<td bgcolor=<%=i_color%>><div align="center"><input name="pubjian" type="text" id="pubjian" size="6" value=<%=rs("pubjian")%>></div></td>
<td bgcolor=<%=i_color%>><div align="center"><input name="bookchuban" type="text" id="bookchuban" size="25" value=<%=trim(rs("bookchuban"))%>></div></td>
<td bgcolor=<%=i_color%>><div align="center"><input name="Submit2" type="submit" class="bt" value="确认">
<td bgcolor=<%=i_color%>><div align="center"><a href="publish.asp?action=pubdel&sid=<%=rs("pubid")%>" onClick="return confirm('您确定进行删除操作吗？')"><font color="#FF0000">删除</font></a></div></td>
</form>
</tr>
</tr>
</table>
</tr>
</table>
</tr>
</table>
<%end if
end select
set rs=nothing%>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -