bill bailey video:ASP.net·VB.net语言访问数据库的问题。

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/28 04:37:40
之前只有一个DataGrid1控件。要访问数据库“Xiaoxi”中的Xixi表。您看看是哪儿写错了,导致不成功:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim myconn = New System.Data.OleDb.OleDbConnection
myconn.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Registry Path=;Jet OLEDB:Database L" & _
"ocking Mode=1;Jet OLEDB:Database Password=;Data Source=""F:\MY\IIS\biao\xiaoxi.md" & _
"b"";Password=;Jet OLEDB:Engine Type=5;Jet OLEDB:Global Bulk Transactions=1;Provid" & _
"er=""Microsoft.Jet.OLEDB.4.0"";Jet OLEDB:System database=;Jet OLEDB:SFP=False;Exte" & _
"nded Properties=;Mode=ReadWrite;Jet OLEDB:New Database Password=;Jet OLEDB:Creat" & _
"e System Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:C" & _
"ompact Without Replica Repair=False;User ID=Admin;Jet OLEDB:Encrypt Database=Fal" & _
"se"

myconn.Open()
Dim conn As System.Data.OleDb.OleDbCommand = New System.Data.OleDb.OleDbCommand("SELECT * FROM xixi", myconn)
Dim Reader As System.Data.oledb.OleDbDataReader
Reader = conn.ExecuteReader
While Reader.Read
DataGrid1.DataSource = Reader
DataGrid1.DataBind()
End While
myconn.Close()
End Sub