作者robbin0919 (robbin0919)
看板Visual_Basic
标题[.NET] DataSet 存到 Excel (不使用COM)
时间Sat Jun 28 19:57:52 2008
请问如何将DataSet存到Excel,而不使用COM的方式呢?
Dim conn As OleDb.OleDbConnection
Dim cmd As OleDb.OleDbCommand
Dim MyReader As OleDb.OleDbDataReader
Dim MyData_Set As DataSet = New DataSet("资料来源")
Dim MyTable As New DataTable("人员基本资料")
Dim ConnDbstr As String
Dim selectcmd As String = "select * from [Sheet1$]"
ConnDbstr = "provider=Microsoft.Jet.OLEDB.4.0;" & "data source=" & File_Pitch
& "\" & File_Name & ".XLS;" & "Extended Properties=Excel 8.0;"
conn = New OleDb.OleDbConnection(ConnDbstr)
conn.Open()
cmd = New OleDb.OleDbCommand(selectcmd, conn)
我已将资料建入DataSet中了
要如何将MyData_Set.Tables("人员基本资料") 存到Excel呢?
请指导,谢谢..
--
--
Robbin Lee
http://0rz.tw/e04jM
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.73.247.64