vb如何连接远程Access数据库

Microsoft.Jet.OLEDB.4.0的Oledb的连接方式是比较老的连接方式,而07以后的Oledb连接方式将改成Microsoft.ACE.OLEDB.12.0。 改后的连接变成了Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\*.accdb;Persist Security Info=False;我已经验证过了

vb连接access数据库

VB向Access数据库中插入数据

以下代码能使用的前提是库引用、和数据库连接代码正确:

两种办法,一种是 用SQL,另一种是ADO

1、用SQL添加数据:

insert into 表名(字段1,字段2,字段3)

values(值01,值02,值03)

例如:

docmd.runsql"insert into EmpTable(Name,age,Duty,Salary) values('王明',35,'外贸总监',12500)"

2、用ADO的办法:

ADO比较复杂,给你一个完整的例子吧:

Dim strSqlfitjc As String

strSqlfitjc = "select * from *表"

Set RSfitjc = New ADODB.Recordset ‘定义一个ADO连接,连进数据库

RSfitjc.Open strSqlfitjc, cn, adOpenKeyset, adLockOptimistic ’打开连接

RSfitjc.addnew '添加一个纪录

RSfitjc.Fields("配件编号") = “style” ‘给每个字段赋值

.Update ’储存赋值的新纪录

.Close 关闭连接

End With

vb连接access数据库

vb中如何把access数据库的内容赋值给二维数组

说说思路:

这个显然要用ADO

1、连接数据库,得到连接对象conn

2、用下面的select语句打开表,将数据读入RecordSet

set rs=conn.execute("select * from 表名")

3、用循环将数据读入二维数组arr

row=0

while not

rs.eof

arr[row,0]=rs["id"]

arr[row,1]=rs["year"]

arr[row,2]=rs["mon"]

arr[row,3]=rs["1"]

arr[row,4]=rs["2"]

...

...

...

row=row+1

wend

VB+如何将richtextbox控件内的图文信息放入Access数据库

用RichTextBox1.TextRTF属性可以获取控件中全部富文本格式(RTF-RichTextFormat)内容,或给其赋值,用RichTextBox1.selRTF可以获取选中区域的RTF内容或给其赋值

vb连接access数据库

在vb中,access数据库属于什么数据库

这个问题有些难回答! 这么说吧,access数据库 属于 中小型数据库!这是从使用上来说。

SQL 大型数据库!!还有其他数据库。。。。。。。。。。。。

vb连接access数据库

猜你喜欢

联系我们

联系我们

888-888

邮件:admin@lcrz.cn

工作时间:周一至周五,9:30-18:30,节假日休息

关注微信
关注微信
分享本页
返回顶部