要OleDbDataAdapter与OleDbConnection一起使用Dim mDA As New OleDb.OleDbDataAdapter()
Dim mDS As DataSet = New DataSet()
Dim mCN As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StartupPath + "\Setting.mdb")
mDA = New OleDb.OleDbDataAdapter(mstrSQL, mCN)
mDS = New DataSet
mDA.Fill(mDS)
Dim mDS As DataSet = New DataSet()
Dim mCN As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StartupPath + "\Setting.mdb")
mDA = New OleDb.OleDbDataAdapter(mstrSQL, mCN)
mDS = New DataSet
mDA.Fill(mDS)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货