⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 domodviewbook.asp

📁 asp图书馆管理系统的一个源代码
💻 ASP
字号:
<!--#include file="globe/DataConnect.asp"-->

<%
Dim ID,Num,SubName,SubNum,UserName,UserEmail,BookName,Introduce,FileUrl,DTime,rs,sql
ID=trim(request.form("ID"))
Num=trim(request.form("Num"))
SubName=trim(request.form("SubName"))
SubNum=trim(request.form("SubNum")) 
UserName=trim(request.form("UserName")) 
UserEmail=trim(request.form("UserEmail")) 
BookName=trim(request.form("BookName")) 
Introduce=trim(request.form("Introduce")) 
FileUrl=trim(request.form("FileUrl")) 
DTime=now

sql = "UPDATE Book SET UserName='"&UserName&"' WHERE ID="&ID&" "
Cnn.Execute sql

sql = "UPDATE Book SET UserEmail='"&UserEmail&"' WHERE ID="&ID&" "
Cnn.Execute sql

sql = "UPDATE Book SET BookName='"&BookName&"' WHERE ID="&ID&" "
Cnn.Execute sql

sql = "UPDATE Book SET Introduce='"&Introduce&"' WHERE ID="&ID&" "
Cnn.Execute sql

sql = "UPDATE Book SET FileUrl='"&FileUrl&"' WHERE ID="&ID&" "
Cnn.Execute sql

sql = "UPDATE Book SET DTime='"&DTime&"' WHERE ID="&ID&" "
Cnn.Execute sql 

 
 Set sql = Nothing: Set rs = Nothing    
%>

<html>
<head>
<title>DoModViewBook</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK REL="stylesheet" TYPE="text/css" HREF="globe/style.css">


</head>
<body bgcolor="#ccddff">


<div id="Layer1" style="position:absolute; left:31px; top:40px; width:536px; height:250px; z-index:1"> 
  <table width="100%" border="1" height="250" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellspacing="0">
   <tr> 
      <td height="40" colspan="4"><font color=#3366CC>类属:【<%=SubName%>】</font>&nbsp;&nbsp;&nbsp;<font color=#336699>修改推荐完成,同学会感谢你的推荐的!</font>&nbsp;&nbsp;&nbsp;<a href="list.asp?Num=<%=Num%>&SubName=<%=SubName%>&SubNum=<%=SubNum%>"><返回></a></td>
    </tr>
   <tr> 
      <td width="14%" height="30"><font color="#339933">推荐人</font></td>
      <td width="34%" height="30"> 
        <%=UserName%> 
      </td>
      <td width="15%" height="30"><font color="#339999"><font color="#339933">E-Mail</font></font></td>
      <td width="37%" height="30"> 
       <%=UserEmail%> 
      </td>
    </tr>
    <tr> 
      <td width="14%" height="34"><font color="#339933">书名</font></td>
      <td height="34" colspan="3"> 
      <%=BookName%> 
      </td>
    </tr>
    <tr> 
      <td width="14%" height="10"> 
        <p> <font color="#339933">  介</font></p>
        <p>&nbsp;</p>
        <p><font color="#339933">  绍</font></p>
      </td>
      <td height="10" colspan="3"> 
        <textarea name="Introduce" rows="6" cols="62"><%=Introduce%></textarea>
      </td>
    </tr>
    <tr> 
      <td width="14%" height="34"><font color="#339933">相关地址</font></td>
      <td height="34" colspan="3"> 
      Http://<%=FileUrl%> 
      </td>
    </tr>
  </table>
</div>


<!--#include file="globe/DataClose.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -