免费视频淫片aa毛片_日韩高清在线亚洲专区vr_日韩大片免费观看视频播放_亚洲欧美国产精品完整版

打開APP
userphoto
未登錄

開通VIP,暢享免費電子書等14項超值服

開通VIP
vb.net 實現(xiàn)操作excel的代碼

為大家介紹vb.net操作excel的實現(xiàn)代碼,有需要的朋友可以參考下。

一、運行環(huán)境
(1).Windows 2000 Professional
(2)..Net Framework SDK Beta 2
(3).Microsoft Access Data Component 2.6(MADC2.6)

二、設(shè)計思路
(1).獲得要訪問的Excel文件名稱
(2).讀出Excel文件的內(nèi)容
(3).用DataGrid格式顯示出來

三、關(guān)鍵步驟
(1).為了方便,我們就把Excel文件假定在C盤的根目錄,名稱為test.xls。
(2).為了讀取Excel文件,我們必須了解一個名稱空間(NameSpace)--System.Data.Oledb。System.Data.Oledb中有三個對象分別是OleDbConnection,OleDbCommand,OledbDataAdapter。我們就是通過他們來訪問Excel文件的。
i> OleDbConnection對象主要是提供連接方式。
ii> OleDbCommand對象提供對目標(biāo)的具體操作方法。
iii>OledbDataAdapter對象是對對象進行不同操作后的返回數(shù)據(jù)集。

讀取C盤的test.xls:
 

復(fù)制代碼 代碼示例:
Dim myOleDbConnection As OleDbConnection = New
 OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
 "Data Source=c:test.xls;" & _
 "Extended Properties=""Excel 8.0;""")
Dim myOleDbCommand As OleDbCommand = New OleDbCommand("SELECT *
 FROM [Sheet1$]",myOleDbConnection) '如果你想讀出Sheet2的內(nèi)容
 ,把Sheet1$改成Sheet2$即可
Dim myData As OledbDataAdapter= New
 OledbDataAdapter(myOleDbCommand)

(3).讀出Excel文件內(nèi)容后,就要把他用DataGrid顯示出來。
為了顯示,還要用另外一個名稱空間--System.Data,有個對象DataSet,可以和DataGrid進行數(shù)據(jù)幫定,從而以DataGrid形式顯示數(shù)據(jù)。而此時讀出的數(shù)據(jù)集并不是以對象DataSet來表現(xiàn)的,這就需要進行轉(zhuǎn)換,好在OledbDataAdapter對象提供了一個方法--Fill,可以完成轉(zhuǎn)換。
具體程序:
 

復(fù)制代碼 代碼示例:
Dim myDataset As New DataSet()
myData.Fill(myDataset)
'完成從OledbDataAdapter對象到DataSet的轉(zhuǎn)換
DataGrid1.DataSource = myDataset.Tables(0).DefaultView
DataGrid1.DataBind() '完成數(shù)據(jù)幫定,顯示數(shù)據(jù)

四、完整代碼
 

復(fù)制代碼 代碼示例:

<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.Oledb" %>
<script language="VB" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim myDataset As New DataSet()
Dim myOleDbConnection As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:.xls;" & _
"Extended Properties=""Excel 8.0;""")
Dim myOleDbCommand As OleDbCommand = New OleDbCommand("SELECT * FROM [Sheet1$]",myOleDbConnection)
Dim myData As OledbDataAdapter= New OledbDataAdapter(myOleDbCommand)

myData.Fill(myDataset)

DataGrid1.DataSource = myDataset.Tables(0).DefaultView
DataGrid1.DataBind()
End Sub
</script>

<html>
<head></head>
<body>
<asp:Label id="L1" runat="server">讀取C盤根目錄下的test.xls文件,并以DataGrid的形式顯示出來</asp:label>
<asp:DataGrid id=DataGrid1 runat="server"/>
</body>
</html>


本站僅提供存儲服務(wù),所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請點擊舉報。
打開APP,閱讀全文并永久保存 查看更多類似文章
猜你喜歡
類似文章
C# 操作ACCESS數(shù)據(jù)庫
Excel導(dǎo)入DataSet - 生 - 博客園
(C#)excel數(shù)據(jù)導(dǎo)入SqlServer中 - ziping99的日志 - 網(wǎng)易博客
C#中操作Excel(6)
ASP.NET快速學(xué)習(xí)
Excel催化劑開源第48波-Excel與PowerBIDeskTop互通互聯(lián)之第二篇
更多類似文章 >>
生活服務(wù)
分享 收藏 導(dǎo)長圖 關(guān)注 下載文章
綁定賬號成功
后續(xù)可登錄賬號暢享VIP特權(quán)!
如果VIP功能使用有故障,
可點擊這里聯(lián)系客服!

聯(lián)系客服