excel 表格存储到数据库

这里以SQL SERVE2008为例。SQLSERVER2008有一个“数据导入导出功能”，当然我们也可以打开数据库之后，在数据库上点击右键，然后选择“任务”，选择“导入数据”，我们就看到d出淡入数据的对话框：

这里我们主要导入数据的源格式是EXCEL的，在excel文件中，我们通常需要整理成数据表格的形式，excel中的数据不要出现合并的单元格等，必须是和数据库表对应的一条条记录的形式。在上图中我们先选择数据源为excel，然后再选择excel文件的路径，在最下面有一个“首行包含列名称”的复选项，默认是选中的，也就是说在导入数据的时候会把excel的第一行当做数据库表的列名称，根据需要进行选择。然后选择下一步：

上图中我们主要完成选择目的数据库，按照需要选择即可。然后我们直接点击下一步，指导出现下面的画面：

这就会打开excel文件的工作薄，我们选择一个工作簿（sheet）,如果我们的excel中的数据列和数据库表中的列不是对应，则需要进行调整，上图中先选中一个“源”，然后再选择这个源对应的“目标”，此时按钮“编辑映射”处于可用状态，我们点击这个按钮，出现下图：

可以在数据选项卡里找到“datagridview”，拖到工程里，配置属性允许增加，然后点一下拖进来看控件，点右上角的“三角形”，点一下出来的菜单里的那个文件框的下三角，选新建数据源。按照向导一步步来就可以了。选点数据库，下一步，选择验证方式，添入必要的信息，比如数据库的连接密码，选择好数据库是哪个库，就在下面。然后下一步，选择想要的数据表，下一步选字段，下一步配置选择行的条件。在这里就完成了，运行的时候用户可以直接在表格里面添加，然后自动反应到数据库里面。不用自己写代码。

Call

OpenConn

Adodc2.RecordSource

=

"select

*

from

usertt

where

卡号='"

&

Text9.Text

&

"'"

Adodc2.Refresh

If

Adodc2.Recordset.RecordCount

>

0

Then

MAGBOX"已有此记录",32,"提示"

Else

'下面的这个就是把数据保存到数据库中的

Adodc2.Recordset.AddNew

Adodc2.Recordset.Fields("卡号")

=

Text9.Text

Adodc2.Recordset.Fields("分类")

=

Combo5.Text

Adodc2.Recordset.Fields("姓名")

=

Text3.Text

Adodc2.Recordset.Fields("领卡日期")

=

Format(Now,

"yyyy-mm-dd

hh:mm:ss")

Adodc2.Recordset.Update

End

If

End

If

要是表格中就先定位在表格的那个地方,在保存,等号后面换掉就行了.

---