news.asp

来自「创建和运行动态、交互的Web服务器应用程序」· ASP 代码 · 共 53 行

ASP
53 行
字号 
<!--#include file="conn.asp"-->
<html>
<head>
<title><%=webname%>--新闻查看</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css">
</head>
<body>

<%dim newsid
      newsid=request.QueryString("id")

set rs=server.CreateObject("adodb.recordset")
    rs.open "select * from shop_news where newsid="&newsid,conn,1,3
    rs("viewcount")=rs("viewcount")+1
    rs.update
%>

 <table width="98%" border="1" align="center" cellspacing="0" cellpadding="2" bordercolordark="#FFFFFF" bordercolorlight="#666666">
    <tr><br>
       <td width="15%" bgcolor="#cccccc" align="right">主题&nbsp;</td><td bgcolor="#E8e8e8" align="center"><%=trim(rs("newsname"))%></td>
    </tr>
    <tr> 
       <td width="15%" bgcolor="#cccccc" align="right">类型&nbsp;</td><td bgcolor="#E8e8e8"><%
                                     select case trim(rs("addname"))
                                            case "1"
                                            Response.Write "论坛热点"
                                            case "2"
                                            Response.Write "工具下载"
                                            case "3"
                                            Response.Write "资料下载"
                                     end select%></td>
           
    </tr>
    <tr>
    <tr> 
       <td width="15%" bgcolor="#cccccc" align="right">内容&nbsp;</td><td bgcolor="#E8e8e8"><%=trim(rs("newscontent"))%></td> 
    </tr>
    <tr> 
       <td colspan=2 bgcolor="#E8e8e8" align="center">发布时间：<%=year(rs("adddate"))&"年"&month(rs("adddate"))&"月"&day(rs("adddate"))&"日"%><br></td>   
    
   </tr>
    <tr> 
       <td colspan=2 bgcolor="#cccccc" align="center"><input type=button name=bt1 value="修 改"></td>   
    
   </tr>
</table>

<%rs.close
set rs=nothing%>
</body>
</html>

news.asp - 源码说明

本页面展示了「创建和运行动态、交互的Web服务器应用程序」中的 news.asp 源码文件，采用 ASP 编程语言编写，共 53 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Web服务器相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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