如何用VB.net访问ACESS数据库并对表进行读取，插入，修改，删除。
小弟对.net了解很少，以前用过jsp，ASP.今天就要完成一个小的B/S程序，感觉.net对数据库的操作实在太繁复。而我的要求又是那么简单~所以求各位大佬帮忙！最好有从数据库连接开始的完整例子！求最简单的方法！刚注册，分不多！SORRY了。在线等！ 问题点数：30、回复次数：11Top
1 楼hackate（兰花开香入梦境,独思佳人亦飘然!!）回复于 2005-06-04 20:04:48 得分 0
论坛搜索一下吧．很简单．．
http://community.csdn.net/Expert/TopicView.asp?id=4016964Top
2 楼viyo（唯远）回复于 2005-06-04 20:20:29 得分 15
1.OleDbDataReader访问数据库
string connstring = "Provider=Microsoft.jet.OLEDB.4.0;Data Source="+Server.MapPath("xxx.mdb");
string sql = "select * from vote where id=1";
OleDbConnection conn = new OleDbConnection(connstring);
conn.Open();
OleDbCommand cmd = new OleDbCommand(sql,conn);
OleDbDataReader reader = cmd.ExecuteReader();
try
{
if(reader.Read())
{
this.TextBox1.Text = reader.GetValue(0).ToString();
this.Label1.Text = reader.GetValue(1).ToString();
this.Label2.Text = reader.GetValue(2).ToString();
}
}
catch(Exception e)
{
throw e;
}
finally
{
reader.Close();
conn.Close();
}
2数据库更新
//连接字符串
string connstring = "Provider=Microsoft.jet.OLEDB.4.0;Data Source="+Server.MapPath("xxx.mdb");
string sql = "update set name='viyo' where id=1";
//定义连接conn
OleDbConnection conn = new OleDbConnection(connstring);
conn.Open();
//定义OleCommand
OleDbCommand cmd = new OleDbCommand(sql,conn);
try
{
cmd.ExecuteNonQuery();//执行更新
}
catch(Exception e)
{
throw e;
}
finally
{
reader.Close();
conn.Close();
}
3.DataSet操作
string connstring = "Provider=Microsoft.jet.OLEDB.4.0;Data Source="+Server.MapPath("xxx.mdb");
string sql = "select * from vote where";
OleDbDataAdapter objcmd=new OleDbDataAdapter(sql,connstring);
//创建DataSet对象并将表vote赋给它
DataSet ds=new DataSet();
objcmd.Fill(ds,"vote");
Top
3 楼redmoonmoon（阿卓）回复于 2005-06-04 20:24:47 得分 0
呵，这样的教程示例很多的噢Top
4 楼dotnetstudy（）回复于 2005-06-04 20:40:06 得分 0
大哥，我想要VB.net的。论坛搜索过了，全的，清楚的，简单的没找到啊~Top
5 楼renyu732（Sysinfo）回复于 2005-06-04 20:40:34 得分 15
如何用VB.net访问ACESS数据库并对表进行读取，插入，修改，删除
---------
Imports System.Data
Imports system.Data.oledb'倒入命名空间
1.读取
Dim conn as New OledbConnection("Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath("Your DataBaseName"))
Dim comm as New OledbDataAdapter("Select...Sql",conn)'Select语句
Dim ds as New DataSet()
comm.Fill(ds,"dsTableName")
'然后你就可以对DataSet表做任意操作
2.插入，修改，删除
Dim conn as New OledbConnection("Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath("Your DataBaseName"))
Dim comm as New OledbCommand("Insert Into,UpDate,Delete *",conn)
'插入，修改，删除操作只是Sql的写法不一样，你既然用过asp应该知道，就不写了
'在这里要注意的是Sql的写法（因为操作的是Access数据库。）
Try
Conn.Open()
Comm.ExecuteNonQuery()
Catch ex as Exception
Response.Write("错误信息:" & ex.Message)
Finally
conn.Close()
End Try
'基本上就是这么简单的代码。Top
6 楼renyu732（Sysinfo）回复于 2005-06-04 20:41:16 得分 0
以上代码，没有测试，所以如果楼主还有什么问题的话可以发信息给我。Top
7 楼dotnetstudy（）回复于 2005-06-04 21:01:09 得分 0
谢谢viyo(唯远)，我改了改，能用的！Top
8 楼viyo（唯远）回复于 2005-06-04 21:03:12 得分 0
读取数据量不大建议用DataReader,这时比DataSet效率好.Top
9 楼dotnetstudy（）回复于 2005-06-04 21:32:05 得分 0
to viyo(唯远) DataReader 如果得到一个数据集，如何一条条取？Top
10 楼dotnetstudy（）回复于 2005-06-04 21:46:27 得分 0
找到了~呵呵~
If myReader.HasRows Then
Do While myReader.Read()
Console.WriteLine(vbTab & "{0}" & vbTab & "{1}", myReader.GetInt32(0), myReader.GetString(1))
Loop
Else
Console.WriteLine("No rows returned.")
End If
Top
11 楼viyo（唯远）回复于 2005-06-04 21:50:01 得分 0
reader.Reader();//这样执行一次,reader的下标向下移动一行,然后再读取;
你也可以直接将reader作为数据源:
this.datagrid1.DataSource=reader;
this.datagird1.DataBind();Top
