有一个程序,是记录公司域用户打印记录,它使用的是MS Access database(A服务器 32bit)。想以这些记录做一些Summary报表,报表实现是另外一台服务器Intranet web 服务(B服务器 64bit)。如查在非一台服务器读取远端的Access数据,也许需要数据库文件共享。网管说不能在服务器安装32 bit的Ole 驱动,不也能共享A服务器的Access数据库文件。
Insus.NET需要怎样做?
只有想法是把这些记录每天定时转存一次至公司的数据库(MS SQL Server 2008 R2)(C服务器)。写一个控制台应用程序,放在Access数据库同一目录,然后让A服务器的任务定时执行这控制台应用程序。在数据库设计一张表,表结构与Access需要转存记录的表结构一样。 只有第一次转存时,数据量大的话,时间需要长久一些,以后每次只转存SQL 数据库内没有的数据。
![](https://images.cnblogs.com/OutliningIndicators/ContractedBlock.gif)
![](https://images.cnblogs.com/OutliningIndicators/ExpandedBlockStart.gif)
CREATE TABLE [dbo].[PrintLog]( [ID] INT PRIMARY KEY NOT NULL, --other field list)GO
因此在SQL server创建一个表数据类型:
![](https://images.cnblogs.com/OutliningIndicators/ContractedBlock.gif)
![](https://images.cnblogs.com/OutliningIndicators/ExpandedBlockStart.gif)
CREATE TYPE [dbo].[udt_PrintLog] AS TABLE ( [ID] INT NOT NULL, --other field list here )GO
![](https://images.cnblogs.com/OutliningIndicators/ContractedBlock.gif)
![](https://images.cnblogs.com/OutliningIndicators/ExpandedBlockStart.gif)
CREATE PROCEDURE [dbo].[usp_PrintLog_Import]( @PrintLogCollection [dbo].[udt_PrintLog] READONLY)ASINSERT INTO [dbo].[PrintLog] ([ID],...) SELECT pc.[ID],... FROM @PrintLogCollection AS pc;GO
然后,再写一个存储过程,是返回SQL数据库表的最大记录ID,如果是空的话,它返回是0。这个值是为读取access的最新记录。
下面是控制台应用程序,写一个类别,是处理SQL的存储过程的:
![](https://images.cnblogs.com/OutliningIndicators/ContractedBlock.gif)
![](https://images.cnblogs.com/OutliningIndicators/ExpandedBlockStart.gif)
using System;using System.Collections.Generic;using System.Data;using System.Text;namespace Insus.NET{ class PrintLog { public DataTable _PrintLogCollection; public DataTable PrintLogCollection { get { return _PrintLogCollection; } set { _PrintLogCollection = value; } } BusinessBase objBusinessBase = new BusinessBase(); public int GetMaxID() { return Convert.ToInt32(objBusinessBase.ExecuteProcedureScalar("usp_PrintLog_GetMaxID")); } public void ImportData() { Parameter[] parameter = { new Parameter ("@PrintLogCollection",SqlDbType.Structured,-1,_PrintLogCollection), }; objBusinessBase.ExecuteProcedure("usp_PrintLog_Import", parameter); } }}
BusinessBase objBusinessBase = new BusinessBase();
![](https://images.cnblogs.com/OutliningIndicators/ContractedBlock.gif)
![](https://images.cnblogs.com/OutliningIndicators/ExpandedBlockStart.gif)
using System;using System.Collections.Generic;using System.Data;using System.Data.OleDb;using System.Text;namespace Insus.NET{ class Program { static void Main(string[] args) { PrintLog objPrintLog = new PrintLog(); int maxID = objPrintLog.GetMaxID(); string strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + System.Environment.CurrentDirectory + "\\printmgt.mdb"; string sql = "SELECT [porder],... FROM [printlog] WHERE [porder] > " + maxID + ""; DataSet objDs = new DataSet(); using (OleDbConnection oleDbConn = new OleDbConnection(strConn)) using (OleDbCommand objCmd = new OleDbCommand(sql, oleDbConn)) using (OleDbDataAdapter objDa = new OleDbDataAdapter(objCmd)) { objDa.Fill(objDs); } objPrintLog.PrintLogCollection = objDs.Tables[0]; objPrintLog.ImportData(); } }}
System.Environment.CurrentDirectory这个主要是为了获取控制如应用程序所在目录位置,这样不管数据在那一个位置,只要把这个控制台应用程序可执行文件放在同Access的数据库同一目录即可。