ManagementBase.aspx.cs

这里只显示每个文件的开头 60 行。登录后可以解锁完整代码。

微信扫码关注公众号，代码整理好后第一时间通知你。

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.IO;

public partial class ManagementBase : Sper.baseuser
{
    protected string dbname = System.Web.HttpContext.Current.Server.MapPath("DB_51aspx/long.mdb");

    protected override void Page_Load(object sender, EventArgs e)
    {
        if (!IsPostBack)
        {
            this.DataBind();

            FileInfo f = new FileInfo(dbname);

            lblength.Text = "当前数据库大小为：" + f.Length / 1024 + "（kb）";
        }
    }
    protected void Button1_Click(object sender, EventArgs e)
    {
        try
        {
            string connectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" + dbname;

            CompactAccessDB(connectionString, dbname);

            FileInfo f = new FileInfo(dbname);

            lblength.Text = "收缩完成！当前数据库大小为：" + f.Length / 1024 + "（kb）";
        }
        catch (Exception ex)
        {
            lblength.Text = "收缩失败！" + ex.Message;
        }
    }

    public static void CompactAccessDB(string connectionString, string mdwfilename)
    {
        object[] oParams;
        object objJRO =

          Activator.CreateInstance(Type.GetTypeFromProgID("JRO.JetEngine"));

        oParams = new object[] { 

        connectionString,

        "Provider=Microsoft.Jet.OLEDB.4.0;Data" + 

        " Source="+mdwfilename.Remove(mdwfilename.LastIndexOf('\\'))+"\\tempdb.mdb;Jet OLEDB:Engine Type=5"};