如何将Excel和xml文件数据保存到数据库
2004-10-25 10:53
921 查看
Inherits System.Windows.Forms.Form
Dim DS1 As New System.Data.DataSet
Dim DS2 As New System.Data.DataSet
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=e:/BOOK1.XLS; " & _
"Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [Sheet1$]", MyConnection)
'或者是DS1.ReadXml("c:/abcd.xml")
MyCommand.Fill(DS1, "handle")
DataGrid1.DataSource = DS1
MyConnection.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
Dim j As Integer
Dim person_id, information_id, handle As String
Dim handle_time As System.DateTime
'If Me.SqlConnection1.Close() Then
Me.SqlConnection1.Open()
'End If
For j = 1 To DS1.Tables("handle").Rows.Count - 1
Me.SqlDataAdapter1.InsertCommand.Parameters("@person_id").Value = DS1.Tables("handle").Rows(j).Item(0)
Me.SqlDataAdapter1.InsertCommand.Parameters("@information_id").Value = DS1.Tables("handle").Rows(j).Item(1)
'Me.SqlDataAdapter1.InsertCommand.Parameters("@handle").Value = DS1.Tables("handle").Rows(j).Item(2)
Me.SqlDataAdapter1.InsertCommand.Parameters("@handle_time").Value = CDate(DS1.Tables("handle").Rows(j).Item(3))
Me.SqlDataAdapter1.InsertCommand.ExecuteNonQuery()
Next
'MessageBox.Show(SqlDataAdapter1.InsertCommand.CommandText)
Me.SqlConnection1.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
一个例子,原理就是先把Excel或xml文件的数据通过DataSet读到Datagrid中,再一个个取出保存到数据库中去。
Dim DS1 As New System.Data.DataSet
Dim DS2 As New System.Data.DataSet
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=e:/BOOK1.XLS; " & _
"Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [Sheet1$]", MyConnection)
'或者是DS1.ReadXml("c:/abcd.xml")
MyCommand.Fill(DS1, "handle")
DataGrid1.DataSource = DS1
MyConnection.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
Dim j As Integer
Dim person_id, information_id, handle As String
Dim handle_time As System.DateTime
'If Me.SqlConnection1.Close() Then
Me.SqlConnection1.Open()
'End If
For j = 1 To DS1.Tables("handle").Rows.Count - 1
Me.SqlDataAdapter1.InsertCommand.Parameters("@person_id").Value = DS1.Tables("handle").Rows(j).Item(0)
Me.SqlDataAdapter1.InsertCommand.Parameters("@information_id").Value = DS1.Tables("handle").Rows(j).Item(1)
'Me.SqlDataAdapter1.InsertCommand.Parameters("@handle").Value = DS1.Tables("handle").Rows(j).Item(2)
Me.SqlDataAdapter1.InsertCommand.Parameters("@handle_time").Value = CDate(DS1.Tables("handle").Rows(j).Item(3))
Me.SqlDataAdapter1.InsertCommand.ExecuteNonQuery()
Next
'MessageBox.Show(SqlDataAdapter1.InsertCommand.CommandText)
Me.SqlConnection1.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
一个例子,原理就是先把Excel或xml文件的数据通过DataSet读到Datagrid中,再一个个取出保存到数据库中去。
相关文章推荐
- 如何将Excel和xml文件数据保存到数据库
- 用C#编程从数据库中读取图片数据导进Excel文件的方法(如何从数据库中读取保存的文件,直接打开,中间不保存到本地)
- 用C#编程从数据库中读取图片数据导进Excel文件的方法(如何从数据库中读取保存的文件,直接打开,中间不保存到本地)
- asp.net学习笔记·将数据库中的数据保存在EXCEL文件中
- 如何将excel文件中的数百万条数据在1分钟内导入数据库?
- 数据库操作_连接SQL Server数据库示例;连接ACCESS数据库;连接到 Oracle 数据库示例;SqlCommand 执行SQL命令示例;SqlDataReader 读取数据示例;使用DataAdapter填充数据到DataSet;使用DataTable存储数据库表;将数据库数据填充到 XML 文件;10 使用带输入参数的存储过程;11 使用带输入、输出参数的存储过程示;12 获得数据库中表的数目和名称;13 保存图片到SQL Server数据库示例;14 获得插入记录标识号;Exce
- 如何保存PDF、Word和Excel文件到数据库中
- 用jsp将xml文件解析到网页显示,并把数据提交保存到数据库
- 如何将任何文件类型数据保存到数据库中
- 将数据库中表的数据保存到XML文件中
- C#源码学习之---将数据库数据以XML文件格式保存
- java使用poi把从数据库中取出的数据写入到excel文件中并保存到指定文件路径
- 如何将XML文件中的数据传送并保存在关系数据库中
- 上传,解析Excel文件并保存数据到数据库
- C#后台制作之数据库(二、如何清除显示以及将数据库数据导出到excel表格文件中)
- 如何批量从Excel文件中导入数据到数据库(二)
- java中如何导入03和07版的Excel文件数据,存入到数据库
- 使用dom4j将数据库中的数据保存到xml文件中
- JDBC保存EXCEL数据到数据库(2.数据表,Excel文件及javaBean准备)
- Web前端 测试数据接口url,如何post一个XML字符串,点击保存就可以保存到数据库