asp.net连接access数据库并显示数据

< %@Import Namespace = System.Data.OleDb% >

< %@Import Namespace = System.Data% >

< %@PageLanguage = " VB " ContentType = " text/html " ResponseEncoding = " gb2312 " % >

< !DOCTYPEhtml PUBLIC " -//W3C//DTDXHTML1.0Transitional//EN " " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd " >

< htmlxmlns = " http://www.w3.org/1999/xhtml " >

< head >

< metahttp - equiv = " Content-Type " content = " text/html;charset=gb2312 " />

< title > 无标题文档 </ title >

< scriptlanguage = " vb " runat = " server " >

Dim conn As OleDb.OleDbConnection

Dim comm As OleDbCommand

Dim rs As OleDb.OleDbdatareader

sub page_load(sender as Object ,e as EventArgs)

conn = New OleDb.OleDbConnection( " Provider=Microsoft.Jet.OLEDB.4.0;DataSource=e: etdbcs.mdb " )

' conn=NewOleDb.OleDbConnection("Provider=Microsoft.ACE.oledb.12.0;Datasource=e: etdbcs.accdb")

conn.open()

comm = New OleDbCommand( " select*fromuserlist " ,conn)

rs = comm.Executereader()

dim showcont as string

do while rs.read()

showcont += rs( " username " ) & " ---- " & rs( " tpnum " ) & " <br/> "

loop

show.innerHTML = showcont

rs.close()

rs = nothing

comm = nothing

conn.close()

conn = nothing

endsub

</ script >

</ head >

< body >

< spanid = " show " runat = " server " />

</ body >

</ html >

asp.net连接access数据库并显示数据

更多文章、技术交流、商务合作、联系博主

微信扫码或搜索：z360901061

微信扫一扫加我为好友

QQ号联系： 360901061

您的支持是博主写作最大的动力，如果您喜欢我的文章，感觉我的文章对您有帮助，请用微信扫描下面二维码支持博主2元、5元、10元、20元等您想捐的金额吧，狠狠点击下面给点支持吧，站长非常感激您！手机微信长按不能支付解决办法：请将微信支付二维码保存到相册，切换到微信，然后点击微信右上角扫一扫功能，选择支付二维码完成支付。

【本文对您有帮助就好】元

2元

5元

10元

20元

自定义