首页 › 资源下载 › 其他书籍 › 用VB实现 › 源码查看

msgadd.aspx

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

ASPX

77 行

<%@ Page Language="VB" ContentType="text/html" %>
<%@ Register TagPrefix="MM" Namespace="DreamweaverCtrls" Assembly="DreamweaverCtrls,version=1.0.0.0,publicKeyToken=836f606ede05d46a,culture=neutral" %>
<%
If  len(Session("AdminID")) = 0   Then 
  Response.Redirect("login.aspx")
end if 

%>
<MM:Insert
runat="server"
CommandText='<%# "INSERT INTO PMessage (msg_Title, msg_Content , msg_PName) VALUES (?, ?,?)" %>'
ConnectionString='<%# System.Configuration.ConfigurationSettings.AppSettings("MM_CONNECTION_STRING_cnn") %>'
DatabaseType='<%# System.Configuration.ConfigurationSettings.AppSettings("MM_CONNECTION_DATABASETYPE_cnn") %>'
Expression='<%# Request.Form("MM_insert") = "form1" %>'
CreateDataSet="false"
SuccessURL='<%# "theMessage.aspx" %>'
Debug="true"
>
  <Parameters>
    <Parameter Name="@msg_Title" Value='<%# IIf((Request.Form("msg_Title") <> Nothing), Request.Form("msg_Title"), "") %>' Type="WChar" />
    <Parameter Name="@msg_Content" Value='<%# IIf((Request.Form("msg_Content") <> Nothing), Request.Form("msg_Content"), "") %>' Type="WChar" />
	<Parameter Name="@msg_PName" Value='<%# Session("AdminID") %>' Type="WChar" />
  </Parameters>
</MM:Insert>
<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" %>'
Debug="true"
></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">
<!--
.style1 {
	font-size: x-large;
	font-weight: bold;
}
-->
</style>
</head>
<body>
<form method="post" name="form1" runat="server">
  <table align="center">
    <tr valign="baseline">
      <td colspan="2" align="right" nowrap><div align="center" class="style1">添加新闻信息公告          
          <hr>
      </div></td>
    </tr>
    <tr valign="baseline">
      <td height="28" align="right" valign="middle" nowrap><strong>信息标题：</strong></td>
      <td width="359" valign="middle"  ><asp:textbox id="msg_Title" TextMode="SingleLine" Columns="65" runat="server" Rows="60" />
      </td>
    </tr>
    <tr valign="baseline">
      <td align="right" valign="top" nowrap><strong>信息内容：</strong></td>
      <td><asp:textbox id="msg_Content" TextMode="MultiLine" Columns="60" runat="server" Rows="10" />
      </td>
    </tr>
    <tr valign="baseline">
      <td nowrap align="right">&nbsp;</td>
      <td><input type="submit" value="添加信息"></td>
    </tr>
  </table>
  <input type="hidden" name="MM_insert" value="form1">
</form>
<p>&nbsp;</p>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?

msgadd.aspx

msgadd.aspx - 源码说明

⌨️ 快捷键说明