留言板asp.net +access

直接使用！不骗人，由于急用才把下载资源分数设置的高了一点，不好意思！爷们们！

using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Data.OleDb;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;
using System.IO;

public partial class Add : System.Web.UI.Page
{
    protected void Page_Load（object sender EventArgs e）
    {
        if （!Page.IsPostBack）
        {
            InitlstPic（）;
        }
    }
    public void InitlstPic（）
    {
        string currentDir fileName imgDir;
        FileInfo fi;
        if （lstSex.SelectedItem.Text == “帅哥“）
        {
            currentDir = Server.MapPath（“.“） + “\\img\\gg“;
            imgDir = “img\\gg“;
        }
        else
        {
            currentDir = Server.MapPath（“.“） + “\\img\\mm“;
            imgDir = “img\\mm“;
        }

        DirectoryInfo dir = new DirectoryInfo（currentDir）;
        foreach （FileSystemInfo fsi in dir.GetFileSystemInfos（））
        {
            if （fsi is FileInfo）
            {
                fi = （FileInfo）fsi;
                fileName = fi.Name;
                if （（fi.Extension == “.gif“） || （fi.Extension == “.jpg“））
                    lstPic.Items.Add（new ListItem（fileName imgDir + “\\“ + fileName））;
            }
        }
        lstPic.SelectedIndex = 0;
        face.Src = lstPic.Value;
    }
    protected void  butOk_Click（object sender EventArgs e）
  {
    string conStr = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“ + Server.MapPath（“.“） + （“/Data/miracle.mdb“）;
    string insertStr = “insert into message （NameSexEmailHomePageOicqContentPhotoIP） Values （‘“ + txtName.Text + “‘‘“ + lstSex.SelectedItem.Text + “‘‘“ + txtEmail.Text + “‘‘“ + txtHomePage.Text + “‘‘“ + txtOicq.Text + “‘‘“ + txtContent.Text + “‘‘“ + lstPic.Value + “‘‘“ + Request.ServerVariables[“REMOTE_HOST“] + “‘）“;
    OleDbConnection conn = new OleDbConnection（conStr）;
    conn.Open（）;
    OleDbCommand comm = new OleDbCommand（insertStr conn）;
    comm.ExecuteNonQuery（）;
    conn.Close（）;
    Response.Redirect（“Default.aspx“）;
  }
    public void lstSex_Changed（object sender System.EventArgs e）
    {
        lstPic.Items.Clear（）;
        InitlstPic（）;
    }
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       4783  2007-09-07 07:26  Miracle留言板\Add.aspx

     文件       2320  2007-08-20 20:15  Miracle留言板\Add.aspx.cs

     文件       3891  2007-08-21 09:44  Miracle留言板\Default.aspx

     文件       4593  2007-08-21 09:35  Miracle留言板\Default.aspx.cs

     文件       1601  2007-08-17 21:59  Miracle留言板\Default.html

     文件       1678  2007-08-19 16:36  Miracle留言板\Login.aspx

     文件       1379  2007-08-19 16:31  Miracle留言板\Login.aspx.cs

     文件       1421  2007-08-21 09:09  Miracle留言板\Reply.aspx

     文件       1624  2007-08-21 09:46  Miracle留言板\Reply.aspx.cs

     文件       1139  2007-08-19 15:32  Miracle留言板\Reply.html

     文件       1582  2007-08-16 08:54  Miracle留言板\img\body_bg.gif

     文件        239  2003-02-25 14:12  Miracle留言板\img\email.gif

     文件      14420  2007-08-17 17:15  Miracle留言板\img\foot.jpg

     文件        173  2003-02-25 14:12  Miracle留言板\img\home.gif

     文件       4863  2007-08-17 19:47  Miracle留言板\img\logo.png

     文件     374022  2007-08-17 17:13  Miracle留言板\img\logo.psd

     文件        615  2003-02-25 14:24  Miracle留言板\img\oicq.gif

     文件        990  2003-02-25 14:12  Miracle留言板\img\recycle.gif

     文件        641  2003-02-25 14:12  Miracle留言板\img\reply.gif

    ..A.SH.     16896  2008-01-18 12:25  Miracle留言板\img\Thumbs.db

     文件       8683  2007-01-28 13:58  Miracle留言板\img\mm\01.gif

     文件       7908  2007-01-28 13:55  Miracle留言板\img\mm\02.gif

     文件       9234  2007-01-28 13:55  Miracle留言板\img\mm\03.gif

     文件       9163  2007-01-28 13:55  Miracle留言板\img\mm\04.gif

     文件       9507  2007-01-28 13:55  Miracle留言板\img\mm\05.gif

     文件       8571  2007-01-28 13:55  Miracle留言板\img\mm\06.gif

     文件       9606  2007-01-28 13:55  Miracle留言板\img\mm\07.gif

     文件       9260  2007-01-28 13:55  Miracle留言板\img\mm\08.gif

     文件       9457  2007-01-28 13:55  Miracle留言板\img\mm\09.gif

     文件       8033  2007-01-28 13:55  Miracle留言板\img\mm\10.gif

............此处省略87个文件信息