vb程序如何与Access数据可建立连接

来源:百度知道 编辑:UC知道 时间:2024/06/28 06:33:16
我已经编好了一个实现两台计算机之间通过串口实现数据传输的程序,现在我想实现当程序收到另一台计算机传来的数据时能同时将数据一一存入到一个数据库中,
请问1、如何建立数据库
2、如何将该数据库与程序连接起来(通过ADO)
请大侠详细说明步骤,及完整的程序,若能实现上述功能将追加高分!!非常感谢!!

给你个实例
Dim Rd As Database
Dim Rc As Recordset
Dim IPath as String
Dim SQL As String
Dim Ta As String
IPath = App.Path & "\Information.mdb"
Ta = "Information"
Set Rd = OpenDatabase(IPath, False, False, ";pwd=SP1D")
Set Rc = Rd.OpenRecordset(Ta)
Rc.Addnew
Rc.Fields("图番") = Form2.Text6
Rc.Fields("品名代码") = Form2.Text1
Rc.Fields("品名") = Form2.Text2
Rc.Fields("客户品番") = Form2.Text3
Rc.Fields("出货地") = Form2.Text4
Rc.Fields("备注") = Form2.Text5
Rc.Fields("单位") = Form2.Text7
Rc.Update
Rc.Close
MsgBox "添加成功!", vbInformation

1.VB的话,你可以用Access建立数据库,其后缀为xxx.mdb
2.建议用Adodb连接,基于1楼给出的例子,我这里也放出一个粗略的连接方法吧,希望对楼主有所帮助。
Option Explicit
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmd As New ADODB.Comma