msgdetail.aspx

来自「用VB实现」· ASPX 代码 · 共 84 行

ASPX
84 行
字号 
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %>
<%@ Register TagPrefix="MM" Namespace="DreamweaverCtrls" Assembly="DreamweaverCtrls,version=1.0.0.0,publicKeyToken=836f606ede05d46a,culture=neutral" %>
<MM:DataSet 
id="dsMessage"
runat="Server"
IsStoredProcedure="false"
ConnectionString='<%# System.Configuration.ConfigurationSettings.AppSettings("MM_CONNECTION_STRING_cnn") %>'
DatabaseType='<%# System.Configuration.ConfigurationSettings.AppSettings("MM_CONNECTION_DATABASETYPE_cnn") %>'
CommandText='<%# "SELECT * FROM PMessage WHERE msg_ID = ?" %>'
Debug="true" PageSize="10" CurrentPage='<%# IIf((Request.QueryString("dsMessage_CurrentPage") <> Nothing), Request.QueryString("dsMessage_CurrentPage"), 0)  %>'
>
  <Parameters>
    <Parameter  Name="@msg_ID"  Value='<%# IIf((Request.QueryString("msg_ID") <> Nothing), Request.QueryString("msg_ID"), "") %>'  Type="WChar"   />
  </Parameters>
</MM:DataSet>
<MM:PageBind runat="server" PostBackBind="true" />
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>信息内容</title>
<style type="text/css">
<!--
.style6 {
	color: #000000;
	font-size: x-large;
	font-weight: bold;
}
.style34 {font-size: large}
.style35 {color: #FFFFFF; font-size: large; }
.style36 {font-size: large; font-weight: bold; }
.style37 {font-weight: bold}
.style38 {color: #FFFFFF; font-size: large; font-weight: bold; }
-->
</style>
</head>
<body>
<form runat="server">
  <div align="center">
    <table width="614" height="1" border="1" cellpadding="0" cellspacing="0" bordercolor="#333333">
      <tr bordercolor="#FFFFFF" bgcolor="#FFFFFF">
        <td colspan="2"><div align="center" class="style6">信息公告内容
            <hr>
        </div></td>
      </tr>
      <tr bordercolor="#FFFFFF" bgcolor="#CCCCCC">
        <td width="102"  valign="middle" bgcolor="#99CC99" ><div align="right" class="style35 style34 style37">
          <div align="right">信息编号：</div>
        </div></td>
        <td width="506" valign="middle" bgcolor="#EBEBEB"><div align="left" class="style34"><%# dsMessage.FieldValue("msg_ID", Container) %></div></td>
      </tr>
      <tr bordercolor="#FFFFFF" bgcolor="#CCCCCC">
        <td height="33" valign="middle" bgcolor="#99CC99"><div align="right" class="style38">
          <div align="right">标题：</div>
        </div></td>
        <td valign="middle" bgcolor="#EBEBEB"><div align="left" class="style34"><%# dsMessage.FieldValue("msg_Title", Container) %></div></td>
      </tr>
      <tr bordercolor="#FFFFFF" bgcolor="#CCCCCC">
        <td height="31" valign="middle" bgcolor="#99CC99"><div align="right" class="style38">
          <div align="right">内容：</div>
        </div></td>
        <td valign="middle" bgcolor="#EBEBEB"><div align="left" class="style34">
          <asp:TextBox ID="txtContent" Text='<%# dsMessage.FieldValue("msg_Content", Container) %>' runat="server" ReadOnly="true" Rows="5" TextMode="MultiLine" Columns="50" />          
</div></td>
      </tr>
      <tr bordercolor="#FFFFFF" bgcolor="#CCCCCC">
        <td height="20" valign="middle" bgcolor="#99CC99"><div align="right" class="style38">
          <div align="right">发布人员：</div>
        </div></td>
        <td valign="middle" bgcolor="#EBEBEB"><div align="left" class="style34"><%# dsMessage.FieldValue("msg_PName", Container) %></div></td>
      </tr>
      <tr bordercolor="#FFFFFF" bgcolor="#CCCCCC">
        <td height="27" valign="middle" bgcolor="#99CC99"><div align="right" class="style38">发布时间：</div></td>
        <td valign="middle" bgcolor="#EBEBEB"><div align="left" class="style34"><%# dsMessage.FieldValue("msg_PDate", Container) %></div></td>
      </tr>
      <tr bordercolor="#FFFFFF">
        <td colspan="2"><div align="center"><a href="theMessage.aspx" class="style36">返回信息页</a></div></td>
      </tr>
      </table>
  </div>
</form>
</body>
</html>

msgdetail.aspx - 源码说明

本页面展示了「用VB实现」中的 msgdetail.aspx 源码文件，采用 ASPX 编程语言编写，共 84 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

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