vb如何把文本或标签内容保存到*.mdb?

来源:百度知道 编辑:UC知道 时间:2024/05/21 17:57:09
vb如何把文本或标签内容保存到*.mdb?
我用ado连接数据库怎么把label1.caption保存到01.mdb表pat列app里边?
按你的代码还是没弄好哎!我比较笨才初学几天能详细点吗?

Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim pstr As String
pstr = "Provider=Microsoft.Jet.OLEDB.3.51;"
pstr = pstr & "Persist Security Info=False;"
pstr = pstr & "Data Source=" & str & "01.mdb"
conn.Open pstr
rs.Open "select * from pat", conn, adOpenKeyset, adLockPessimistic
rs.add
rs("app") = label1.caption
rs.update
rs.close
conn.close