新建Word,Access,Foxpro,Excel文件的方法?

在程序中通常需要使用到新的Access、Word、Excel和FoxPro文件。有两种解决方法。
1. 有项目中放置一个模板文件,需要的时候Copy模板文件。
2. 使用COM+组件创建新的文件。

本章主要介绍第二种情况。
1.创建ACCESS文件
需要引用 Microsoft ADO Ext. 2.8 for DDL and Security
代码:
//实例化一个ADOX对像
ADOX.CatalogClass ObjCatalogClass = new CatalogClass();
//创建文件
ObjCatalogClass.Create( "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + 新文件存放路径 + ";" );
//关闭对像
System.Runtime.InteropServices.Marshal.ReleaseComObject( ObjCatalogClass );
ObjCatalogClass = null;
GC.Collect();

2. 创建Excel文件
需要引用:  Microsoft Excel 11.0 Object Library
代码:
//实例化Missing对像和Excel对象
System.Reflection.Missing ObjMissing = System.Reflection.Missing.Value;
Excel.Application ObjApplication = new Excel.Application();
//创建时是否显示
ObjApplication.Visible = false;
Excel.Workbooks ObjWorkbooks = (Excel.Workbooks)ObjApplication.Workbooks;
Excel.Workbook ObjWorkbook = (Excel.Workbook)ObjWorkbooks.Add(ObjMissing);
//保存文件
ObjWorkbook.SaveAs( FilePath ,ObjMissing,ObjMissing,ObjMissing,ObjMissing,ObjMissing,Excel.XlSaveAsAccessMode.xlNoChange,ObjMissing,ObjMissing,ObjMissing,ObjMissing,ObjMissing );
ObjWorkbook.Close(false,ObjMissing,ObjMissing);
//在office 2000 下可以不能创建文件可以使用使用另一种方法创建文件
ObjWorkbook.SaveAs2000( FilePath, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing, ObjMissing );

//关闭
ObjWorkbook.Close(false,ObjMissing,ObjMissing); 
ObjWorkBooks.Close();
ObjApplication.Quit();
如果不能结束进程
请注意关闭以下两个对像
ObjWorkbook.Close(false,ObjMissing,ObjMissing); 
ObjWorkBooks.Close();

3. 创建Word文件
需要引用 Microsoft Word 11.0 Object Library
代码:
Word.ApplicationClass ObjWord = new Word.ApplicationClass();
object fileName = FilePath;
object readOnly = false;
object isVisible = true;
object missing = System.Reflection.Missing.Value;
Word.Document ObjWordDoc = ObjWord.Documents.Add(ref missing, ref missing,ref missing, ref missing);
ObjWordDoc.Activate();
ObjWordDoc.SaveAs( ref fileName,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing);
//如果不能结束进程,请试用以下方法
ObjWordDoc.SaveAs2000( ref fileName,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing ,ref missing );
    ObjWord.Application.Quit(ref missing, ref missing, ref missing);

ObjWord.Application.Quit(ref missing, ref missing, ref missing);

4.创建FoxPro文件
需要引用 ODBC Driver & Data Source Name Functions
ODBCTool.DsnClass ObjDsn = new ODBCTool.DsnClass();
string DsnName,DsnDriver,SerName,DbName,User,PWD,DsnDesc,ODBCAttr;
bool Silent = true;
DsnName = "DbfDsn";
DsnDriver = "Microsoft dBase Driver (*.dbf)";
SerName = null;
DbName = null;
User = null;
PWD = null;
DsnDesc = null;
ODBCAttr = null;
ObjDsn.CreateDSN( ref DsnName,ref DsnDriver,ref SerName,ref DbName,ref User,ref PWD,ref DsnDesc,ref Silent,ref ODBCAttr  );

实际上是通过创建一个DSN来创建FoxPro 文件的。

以上在Win2000 + VS.net 2003 + office 2000(office2003) 下运行成功,
使用SaveAs2000()的方法可以自动结束进程不需要多的操作。

你可能感兴趣的:(Access)