数据库应用与开发实验报告_第1页
数据库应用与开发实验报告_第2页
数据库应用与开发实验报告_第3页
数据库应用与开发实验报告_第4页
数据库应用与开发实验报告_第5页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

四、实验过程、步骤及内容

在之前连接好学生数据库的窗体中加入“Excel导入”按钮

写入代码实现Excel导入数据库

usingSystem;

usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;

usingSystem.Drawing;usingSystem.Linq;usingSystem.Text;

usingSystem.Windows.Forms;usingSystem.Data.OleDb;

namespaceMDI窗体

{

publicpartialclassForm4:Form

{

publicForm4()

{

InitializeComponent();

}

OleDbConnectionmycnn=newOleDbConnection();OleDbCommandCMD=newOleDbCommand();OleDbDataReaderReader;

DataSetdt=newDataSet();

OleDbDataAdapteradapter=newOleDbDataAdapter();

privatevoidbutton5_Click(objectsender,EventArgse)

{

OpenFileDialogopenfileDialog=newOpenFileDialog();openfileDialog.DefaultExt="xlsx";

openfileDialog.Filter="xlsx文件(*.xlsx)|*.xlsx|xls文件(*.xls)|*.xls|所有文件(*.*)|*.*";

if(openfileDialog.ShowDialog()!=DialogResult.OK)

{

return;

}

try

{

stringFilePath="",File_Name="";

intpos=openfileDialog.FileName.LastIndexOf("\\");FilePath=openfileDialog.FileName.Substring(0,pos);File_Name=openfileDialog.FileName.Substring(pos+1);

OleDbConnectioncon=newOleDbConnection(@"Provider=Microsoft.ACE.OLEDB.12.0;DataSource="+openfileDialog.FileName+@";ExtendedProperties='Excel12.0;HDR=YES'");

con.Open();

DataTabledtSheetName=con.GetOleDbSchemaTable(OleDbSchemaGuid.Tables,newobject[]{null,null,null,"Table"});

stringstrTableNames=dtSheetName.Rows[0]["TABLE_NAME"].ToString();stringdatainput="select*from["+strTableNames+"]";OleDbDataAdapteradapter=newOleDbDataAdapter(datainput,con);DataTabledt=newDataTable();

dt.Clear();adapter.Fill(dt);con.Close();con.Dispose();

dataGridView1.DataSource=dt;dataGridView1.DataSource=dt;

}

catch

{

stringsuffix="";

intpos=openfileDialog.FileName.LastIndexOf(".");suffix=openfileDialog.FileName.Substring(pos+1);suffix=suffix.ToUpper();

if(openfileDialog.FileName.IndexOf("")>=0)MessageBox.Show("文件名中不能出现空格,请修改");

elseif(suffix!="xlsx"&&suffix!="xls")MessageBox.Show("请确定是xls或xlsx文件,请重试");

else

MessageBox.Show("请关闭当前文件:"+openfileDialog.FileName+",

再试");

}

}

}

}

(2)运行结果

可以导入Excel文件,运行成功

注:报告内页的项目或内容设置,根据实际情况可加以调整和补充,写不下可附一页。

五、实验结论:

六、指导教师批阅意见:

成绩评定:

指导教师签

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论