Access转换为DBF代码,CSharp代码库,德仔网

代码语言

代码分类

【CSharp】 Access转换为DBF

作者:许华 / 发布于2015/3/24/ 853


	using System;
	using System.Collections.Generic;
	using System.ComponentModel;
	using System.Data;
	using System.Drawing;
	using System.Text;
	using System.Windows.Forms;
	using System.Data.OleDb;
	using System.Data.SqlClient;
	using System.IO;

	
	namespace TransDBF
	{
	public partial class Form1 : Form
	{
	public Form1()
	{
	InitializeComponent();
	}
	OleDbConnection conn = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\project\TransDBF\db.mdb;");
	OleDbDataAdapter da;
	DataSet ds;

	private void Form1_Load(object sender, EventArgs e)
	{
	String sqlstr="select * from db";
	da = new OleDbDataAdapter(sqlstr,conn);
	ds = new DataSet();
	da.Fill(ds, "db");

	}
	/// <summary>
	/// 显示查询数据
	/// </summary>
	/// <param name="sender"></param>
	/// <param name="e"></param>
	private void button1_Click(object sender, EventArgs e)
	{
	this.dataGridView1.DataSource = ds.Tables["db"];
	}
	/// <summary>
	/// 转换Access为dbf格式数据
	/// </summary>
	/// <param name="sender"></param>
	/// <param name="e"></param>

	private void 转换_Click(object sender, EventArgs e)
	{

	

	String sql="SELECT * INTO [dBASE 5.0; Database=C:\\;].a.dbf FROM db";

	OleDbCommand cmd = new OleDbCommand(sql, conn);
	try
	{
	conn.Open();
	DataTable dt = conn.GetSchema("Tables");//获取ACCESS数据库中所有的表\查询\宏\窗体\模块
	File.Create(@"C:\1.txt");
	for (int i = 0; i < dt.Rows.Count; i++)
	{
	if (dt.Rows[i].ItemArray[3].ToString() == "TABLE")//判断是否是用户表
	File.AppendAllText(@"c:\1.txt", dt.Rows[i].ItemArray[2].ToString());

	}

	cmd.ExecuteNonQuery();
	MessageBox.Show("成功转换！");
	}
	catch (Exception ex)
	{
	MessageBox.Show(ex.Message);
	}
	finally

	{

	conn.Close();
	}

	}

	}
	}

试试其它关键字

同语言下

可能有用的

许华贡献的其它代码(7)