Access数据库损坏怎样用c#程序来修复
发布网友
发布时间：2022-04-11 19:09
共2个回答
懂视网
时间：2022-04-11 23:30
由于单位业务需要，搭建一台服务器专门用来做数据存储。因为数据流很小，遂采用access库作为DB。开始还好，但是后来发现access数据库有一问题，就是表空间会随着使用越来越大，哪怕表里没有数据。因为表中单次存放的内容是很小的，每隔几分钟会全删除然后再
由于单位业务需要，搭建一台服务器专门用来做数据存储。因为数据流很小，遂采用access库作为DB。开始还好，但是后来发现access数据库有一问题，就是表空间会随着使用越来越大，哪怕表里没有数据。因为表中单次存放的内容是很小的，每隔几分钟会全删除然后再写入，所以表也会越来越大啊！
开始是用VB写的一个压缩软件，因为是M$自家的语言嘛，自然对Office系列支持很好，后来发现ruby中也可以通过Win32ole访问Jet引擎，为何不用ruby来写呢？因为是以前写的代码神马都用class来搞，稍显夸大，但效果还好。
#hb table write by hopy 2012
require 'win32ole'
require 'oci8'
class Hb
def initialize
@oci = OCI8.new("xxx","***","xxx")
end
def open
unless @acs
conn_str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=#{Dir.pwd}/hb.mdb"
#conn_str = "driver={SQL Server};database=xxx;server=localhost,1433;uid=sa;pwd=sa"
@acs = WIN32OLE.new('ADODB.Connection')
@acs.Open(conn_str)
end
end
def close
(@acs.Close;@acs=nil) if @acs
end
def cls
self.open
sql = "DELETE * from InTable";@acs.Execute(sql)
sql = "DELETE * from OutTable";@acs.Execute(sql)
end
def zip
start = Time.now
self.close
jet = WIN32OLE.new('JRO.JetEngine')
path = Dir.pwd+"/hb.mdb"
new_path=Dir.pwd+"/hb_ziped.mdb"
File.delete(new_path) if File.exist?(new_path)
sp = "Provider=Microsoft.Jet.OLEDB.4.0"
ss = sp+";Data Source="+path
sd = sp+";Data Source="+new_path
jet.CompactDatabase(ss,sd)
File.delete(path)
File.rename(new_path,path)
puts "access ziped , take #{Time.now - start} s"
end
def sync
self.cls
self.open
zb = [64981,57520]
i = 0;start = Time.now
ret = @oci.exec('select * from DBO.DPXS_ARRIVAL') do |r|
next if r[7].unpack("v*") != zb
zt = if r[24] == "Arrived"
r[23]
elsif r[25]
r[25]
else
r[23]
end
tm = if r[12]
r[12]
elsif r[11]
r[11]
else
r[10]
end
@acs.Execute("INSERT INTO InTable VALUES('#{r[0]}','#{tm}','#{r[13]}','#{zt}')");i+=1
end
puts "sync #{i} arrival flights , take #{Time.now - start} s"
i = 0;start = Time.now
ret = @oci.exec('select * from DBO.DPXS_DEPARTURE') do |r|
next if r[7].unpack("v*") != zb
tm = if r[13]
r[13]
elsif r[12]
r[12]
else
r[11]
end
@acs.Execute("INSERT INTO OutTable VALUES('#{r[0]}','#{tm}','#{r[14]}','#{r[27]}')");i+=1
end
puts "sync #{i} departure flights , take #{Time.now - start} s"
end
end
INTERVAL_sec = 10
hb = Hb.new
t = 0
loop do
sleep(INTERVAL_sec);t+=INTERVAL_sec
hb.sync
(hb.zip;t=0) if t >= 60
#t=0 if t >= 60
end
热心网友
时间：2022-04-11 20:38
介绍
下面这段C# 代码可以用来压缩和修复Access数据库,不管它是一个简单的".mdb"ACCESS数据库还是一个".mdw"网络共享数据库,这个过程和你在用MS Access应用程序中使用的"工具-数据库实用工具-压缩和修复"时执行的操作完全一样.实例代码使用了"迟绑定"(运行中在内存中建立COM对象),这样就不需要在工程中加入COM引用了,也不需要在PC上安装MS Access应用程序.只需要一个Jet引擎(Jet引擎包含在MDAC安装包中,在Windows NT4以后的版本中,系统已经自带了这个引擎).
C#操作ACCESS数据库的背景
不知你是否也厌烦了在工程中加入复杂的COM库引用,但我相信这个纯.NET代码将省去额外的交互操作, RCWs和COM引用.基本上,由于系统中安装的Microsoft类库的不同(例如:MS Office Object Library 9,10,11等等),我们也不知道用户PC中安装的Office版本,所以我们要通过ProgID来访问COM对象,而不能用CLSID.例如,当调用"Excel.Application",时,得到的是Excel,而不管系统中安装MS Office的版本,当在代码中加入"MS Excel 10 Object library"引用时,其实只是给应用程序加入了一个非常受*的功能.所以我们使用System.Reflection和迟绑定.
1. 实例代码
只需调用CompactAccessDB函数即可压缩和修复目标数据库.
2. 参数:
connectionString – 用来连接到Access数据库.
mdwfilename –要压缩的MDB文件的全名(路径+文件名).
由于Jet引擎的*,执行此方法压缩Access数据库会把结果生成为一个新文件,所以我们要还需要把这个新的Access文件拷贝到目的位置覆盖原来未压缩文件.
当调用此方法时请确认被压缩数据库无打开的连接.
/**//// MBD compact method (c) 2004 Alexander Youmashev
/// !!IMPORTANT!!
/// !make sure there's no open connections
/// to your db before calling this method!
/// !!IMPORTANT!!
///
///
connection string to your db
/**////
FULL name
/**//// of an MDB file you want to compress.
public static void CompactAccessDB(string connectionString, string mdwfilename)
{
object[] oParams;
//create an inctance of a Jet Replication Object
object objJRO =
Activator.CreateInstance(Type.GetTypeFromProgID("JRO.JetEngine"));
//filling Parameters array
//cnahge "Jet OLEDB:Engine Type=5" to an appropriate value
// or leave it as is if you db is JET4X format (access 2000,2002)
//(yes, jetengine5 is for JET4X, no misprint here)
oParams = new object[] {
connectionString,
"Provider=Microsoft.Jet.OLEDB.4.0;Data" +
" Source=C:\\tempdb.mdb;Jet OLEDB:Engine Type=5"};
//invoke a CompactDatabase method of a JRO object
//pass Parameters array
objJRO.GetType().InvokeMember("CompactDatabase",
System.Reflection.BindingFlags.InvokeMethod,
null,
objJRO,
oParams);
//database is compacted now
//to a new file C:\\tempdb.mdw
//let's copy it over an old one and delete it
System.IO.File.Delete(mdwfilename);
System.IO.File.Move("C:\\tempdb.mdb", mdwfilename);
//clean up (just in case)
System.Runtime.InteropServices.Marshal.ReleaseComObject(objJRO);
objJRO=null;
}
参考资料：http://www.cnblogs.com/maxianghui/archive/2006/08/20/481886.html
