📄 bookupdate.asp

📁 图书管理功能

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<h4 align="center"><font color="#6699ff">图书信息更新</font> </h4>
<hr/>
<%
dim dbcon,rs,strsql,bookid
set dbcon=server.createobject("adodb.connection")
	 set rs=server.createobject("adodb.recordset")
	 dbcon.open "dsn=ourdb;uid=sa;password=;"
	 rs.locktype=2
	 strsql="select bookid,booktitle from bookinfo"
	   rs.open strsql,dbcon
	   %>	   
<table width="75%" border="1" align="center">
  <tr> 
    <td><div align="center">图书编号</div></td>
    <td><div align="center">图书名称</div></td>
    <td><div align="center">用户操作</div></td>
    <td><div align="center">用户操作</div></td>
  </tr>
  <% do while not rs.eof
  bookid=rs("bookid")
  %>
  <tr>
  <td><%=bookid%></td>
  <td><%=rs("booktitle")%></td>
  <td><a href="bookdel.asp?bookid=<%=bookid%>">删除</a></td>
  <td><a href="bookmod.asp?bookid=<%=bookid%>">修改</a></td>
  </tr>
  <%
  rs.movenext
  loop
  rs.close
  set conn=nothing
  %>
  
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -