如何把VB的listbox中的相应内容存入access数据库?
3个回答
展开全部
【数据库连接】
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\数据库.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select 资料表 from 字段"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
End Sub
【将Listbox内容存入数据库】
Private Sub Command1_Click()
For i = 0 To List1.ListCount - 1
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("name") = List1.List(i)
Adodc1.Recordset.Update
DataGrid1.Refresh
Next
End Sub
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\数据库.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select 资料表 from 字段"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
End Sub
【将Listbox内容存入数据库】
Private Sub Command1_Click()
For i = 0 To List1.ListCount - 1
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("name") = List1.List(i)
Adodc1.Recordset.Update
DataGrid1.Refresh
Next
End Sub
展开全部
简单点的话用data控件
绑定对应的ACCESS文件和表
然后用个addnew就可以了
绑定对应的ACCESS文件和表
然后用个addnew就可以了
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
for (int i = 0; i < ListBox1.Items.Count;i++ )
{
string name = this.ListBox1.Items[i].ToString();
//插入数据库这里写Insert方法
}
{
string name = this.ListBox1.Items[i].ToString();
//插入数据库这里写Insert方法
}
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询