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

📄 domodviewwebsite.asp

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

<%
Dim ID,Num,SubName,SubNum,UserName,UserEmail,WebsiteName,Introduce,WebsiteUrl,DTime,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")) 
WebsiteName=trim(request.form("WebsiteName")) 
Introduce=trim(request.form("Introduce")) 
WebsiteUrl=trim(request.form("WebsiteUrl")) 
DTime=now

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

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

sql = "UPDATE Website SET WebsiteName='"&WebsiteName&"' WHERE  ID="&ID&" "
Cnn.Execute sql

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

sql = "UPDATE Website SET WebsiteUrl='"&WebsiteUrl&"' WHERE  ID="&ID&" "
Cnn.Execute sql

sql = "UPDATE Website SET DTime='"&DTime&"' WHERE  ID="&ID&" "
Cnn.Execute sql 
 
Set sql = Nothing   
%>
<!--#include file="globe/DataClose.asp"-->


<html>
<head>
<title>DoModViewWebsite</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="30" 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"> 
      <%=WebsiteName%> 
      </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://<%=WebsiteUrl%> 
      </td>
    </tr>
  </table>
</div>


</body>
</html>

⌨️ 快捷键说明

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