EXCEL导入小工具

自己做了一个excel导入小工具，放上来晒晒。中途遇到不少困难和异常哦，不过都被偶一一解决了。

 

基本界面：

 

如图布局你的界面，并且加上OpenFileDailog控件。

 

1）在form的load时间中设置相关属性，启用Ad Hoc Distributed Queries。如果未启用会提示错误

private void Form1_Load(object sender, EventArgs e) { panel2.Visible = false; this.Size = new Size(710, 200); string cmd = "exec sp_configure 'show advanced options',1 reconfigure exec sp_configure 'Ad Hoc Distributed Queries',1 reconfigure "; ExecuteNonQuery(cmd); }

 

2）在form的closing事件中关闭Ad Hoc Distributed Queries，做人要有始有终啦

// 关闭Ad Hoc Distributed Queries private void Form1_FormClosing(object sender, FormClosingEventArgs e) { string cmd = "exec sp_configure 'Ad Hoc Distributed Queries',0 reconfigure exec sp_configure 'show advanced options',0 reconfigure "; ExecuteNonQuery(cmd); }

 

3）浏览文件的代码，在浏览按钮的click事件中打开文件对话框，然后选择相应的excel文件 //浏览选择excel文件 private void button1_Click(object sender, EventArgs e) { openFileDialog1.Filter = "xls格式（*.xls）|*.xls"; openFileDialog1.Title = "打开excel文件"; if (openFileDialog1.ShowDialog() == DialogResult.OK) textBox1.Text = openFileDialog1.FileName; }

4）导入为新表的代码

//把excel文件以新表形式导入到数据库中 private void button2_Click(object sender, EventArgs e) { string XLS_Path = textBox1.Text; string table_name=textBox2 .Text ; string cmd = "SELECT * into "+table_name + " FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0','Data Source= "+XLS_Path +" ;Extended Properties=EXCEL 5.0')...[Sheet1$] ;"; if (ExecuteNonQuery (cmd )!=null ) MessageBox.Show("导入成功"); }

 5）导入到现有表中的代码

//把excel文件导入到现有表中 private void button4_Click(object sender, EventArgs e) { string XLS_Path = textBox1.Text; string table_name = textBox3.Text; string cmd = "insert into " + table_name + " select * FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0','Data Source= " + XLS_Path + " ;Extended Properties=EXCEL 5.0')...[Sheet1$] ;"; if (ExecuteNonQuery(cmd)!=null ) MessageBox.Show("导入成功"); }

6）预览的功能是在页面上加了一个axWebBrowser控件。这个在工具栏中试没有的，要自己在com组件中添加一个web browser 之类的组件，然后在引用 Microsoft office excel 组件，不然是无法预览的

//指定打开的是excel文件 private void axWebBrowser1_NavigateComplete2(object sender, AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event e) { Object o = e.pDisp; Object oDocument = o.GetType().InvokeMember("Document ", BindingFlags.GetProperty, null, o, null); Object oApplication = o.GetType().InvokeMember("Application ", BindingFlags.GetProperty, null, oDocument, null); //由于打开的是excel文件，所以这里的oApplication 其实就是Excel.Application Microsoft.Office.Interop.Excel.Application eApp = (Microsoft.Office.Interop.Excel.Application)oApplication;//这样就可以象上文中所述来操作Excel了。 } //打开excel文件 private void button3_Click(object sender, EventArgs e) { panel2.Visible = true; this.Size = new Size(710,750); string strFileName = textBox1.Text; Object refmissing = System.Reflection.Missing.Value; axWebBrowser1.Navigate(strFileName, ref refmissing , ref refmissing , ref refmissing , ref refmissing); }

 

7）最后为了方便起见，我把读取数据库的代码封装成了ExecuteNonQuery函数，供所有执行语句调用

private object ExecuteNonQuery(string command) { string ConStr = @"Data Source=WANGXIN/SQLEXPRESS;Initial Catalog=test;Integrated Security=True"; SqlConnection Conn = new SqlConnection(ConStr); string cmd = command; SqlCommand com = new SqlCommand(cmd, Conn); Conn.Open(); object i= com.ExecuteNonQuery(); Conn.Close(); return i; }

 

至此一个小的带预览功能的导入工具就生成了，界面有些简陋。看起来简单，但是做起来错误就百出了，在运行之前希望大家确保

 

1）导入的excel文件时关闭的

2）excel文件中字段名和数据库中表的字段名匹配

3）检查数据库和access 版本，以保证配置完善

4）启用OPENDATASOURCE