网站首页 手机版
 注册 登录
您现在的位置: 畅无忧设计 >> 网络编程 >> ASP.NET教程 >> 正文
最新文章
· asp生成HTML内容页通用函数
· 雨夜WEB数据库管理V1(IE6+FF)
· JavaScript制作带自动提示的文本框
· Asp.net(C#)对文件操作的方法(读取,删
· 用ASP.Net来编写留言本
· ASP.NET环境配置指南
· asp.net中动态改变页面的CSS样式
· Asp.net连接和操作SQL Server和Acces
热门文章
 Asp.net连接和操作SQL Server和Acc
 ASP.NET环境配置指南
 asp生成HTML内容页通用函数
 JavaScript制作带自动提示的文本框
 Asp.net(C#)对文件操作的方法(读取
 asp.net中动态改变页面的CSS样式
 雨夜WEB数据库管理V1(IE6+FF)
 用ASP.Net来编写留言本
相关文章
没有相关文章
用ASP.Net来编写留言本
来源:网页教学网 更新时间:2010/1/2 1:07:53 阅读次数:
字体:[ ] 我要投稿

  今天给大家讲述一个怎样用ASP.NET来编写一个简单的留言本程序(下面为具体步骤和代码),本例子的目的是让大家掌握ASP.NET编程技术的实现方法,只要把下面的代码看懂,再加上你自己把页面美化或把数据库中的内容再添加详细一些,就会得到一个很好的留言本。你有什么问题请进论坛发表见解。


1、用Access建造一个数据库data.mdb,建立表Guest,结构如下: 

   ID 自动编号
   标题 字符串
   署名 字符串
   正文 备注。

2、guest.aspx
  <%@ Import Namespace="System.Data" %>
  <%@ Import Namespace="System.Data.OleDb" %>
  <html><head>
  <style>
  <!--
  body{font-size:9pt}
  p{font-size:9pt}
  td{font-size:9pt}
  -->
  </style>
  <title>留言本</title></head>
  <body>
  <p align=right><font size=6>留言本</font></p>
  <script language=vb runat=server>
  Sub Page_Load(Source As Object, E As EventArgs)
   Dim myConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0 ;Data Source=" & server.mappath("data.mdb"))
   Dim myAdapter As New OleDbDataAdapter
   Dim myOleDbCommandBuilder As OleDbCommandBuilder = New OleDbCommandBuilder(myAdapter)
   Dim DS As DataSet = New DataSet
   myAdapter.SelectCommand = new OleDbCommand("select ID, 标题, 署名 from Guest order by id desc", myconn)
   myconn.open()
   myAdapter.Fill(ds, "Guest")
   ml.DataSource=ds.Tables("Guest").DefaultView
   ml.DataBind()
  end sub
  </script>
   <ASP:DataGrid id="ml" runat="server"
   Width="100%"
   BorderColor="black"
   ShowFooter="false"
   CellPadding=3
   CellSpacing="0"
   Font-Name="宋体"
   Font-Size="9pt"
   HeaderStyle-BackColor="#ddaacc"
   EnableViewState="false"
   >
  <Columns>
   <asp:HyperLinkColumn
   DataNavigateUrlField="id"
   DataNavigateUrlFormatString="see.asp?id={0}"
   text="See!"
   Target="_new"
   />
  </Columns>
  
  </asp:DataGrid>
  <br><br><font size=5>我要留言</font><br>
  <form method=post action=send.aspx>
  标题:<input type=text name=title><br>
  署名:<input type=text name=name><br>
  内容:<textarea name=body></textarea><br>
  <input type=submit>
  </form>


3、send.aspx
  <%@ Import Namespace="System.Data" %>
  <%@ Import Namespace="System.Data.OleDb" %>
  <script language=vb runat=server>
  Sub Page_Load(Source As Object, E As EventArgs)
   Dim myConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0 ;Data Source=" & server.mappath("data.mdb"))
   Dim myInsertQuery As String = "insert into guest (标题, 署名, 内容) values ('" & request("title") & "', '" & request("name") & "', '" & request("body") & "')"
   Dim myOleDbCommand As New OleDbCommand(myInsertQuery)
   myOleDbCommand.Connection = myConn
   myConn.Open()
   myOleDbCommand.ExecuteNonQuery()
   myOleDbCommand.Connection.Close()
   response.redirect("guest.aspx")
  end sub
  </script>


4、see.asp(显示单个数据不如用ASP)
  <html><head>
  <style>
  <!--
  body{font-size:9pt}
  p{font-size:9pt}
  td{font-size:9pt}
  file://-->
  </style>
  <title>察看留言</title></head>
  <body>
  <p align=right><font size=6>察看留言</font></p>
  <%
  id=request("id")
  set cn=server.createobject("ADODB.CONNECTION")
  cn.open "DBQ=" + server.mappath("data.mdb") + ";DefaultDir=; DRIVER={Microsoft Access Driver (*.mdb)};"
  set rs=server.createobject("adodb.recordset")
  rs.open "select * from guest where id=" & id , cn
  %>
  ID:<% = id %><BR>
  标题:<% = rs("标题") %><br>
  署名:<% = rs("署名") %><br>
  内容:<Br><% = rs("内容") %><br>
  <a href="guest.aspx">返回</a>

  • 上一篇文章:
  • 下一篇文章:
  • 关于我们 - 联系我们 - 广告服务 - 在线投稿 - 友情链接 - 网站地图 - 版权声明
    CopyRight 2008-2010, CWYDESIGN.COM - 畅无忧设计, Inc. All Rights Reserved
    滇ICP备09005765号