VB连接数据库的方法
2006-11-22 16:45:19| 分类： 默认分类 | 标签： |字号大中小 订阅 一、ASP的对象存取数据库方法
在ASP中，用来存取数据库的对象统称ADO（Active Data Objects），主要含有三种对象：Connection、Recordset 、Command Connection：负责打开或连接数据 Recordset：负责存取数据表
Command：负责对数据库执行行动查询命令
二、连接各数据库的驱动程序
连接各数据库可以使用驱动程序，也可以使用数据源，不过我建议大家使用驱动程序，因为使用驱动程序非常方便、简单，而使用数据源比较麻烦。
ODBC链接
适合数据库类型 链接方式 access
\
dBase
\
Oracle
\
MSSQL server
\
MS text
\text driver(*.txt; *.csv)};dbq=-----;extensions=asc,csv,tab,txt;Persist SecurityInfo=false;\
Visual Foxpro
\
MySQL
\
OLEDB链接
适合的数据库类型 链接方式 access
\
Oracle
\
MS SQL Server
\source=machinename;initial catalog=dbname;userid=sa;password=pass;\
MS text
\source=your_path;Extended Properties'text;FMT=Delimited'\
而我们在一般情况下使用Access的数据库比较多，在这里建议连接Access数据库使用下面的方法： dim conn set conn = server.createobject(\conn.open = \
其中../db/bbs.mdb是你的数据库存放的相对路径！如果你的数据库和ASP文件在同一目录下，你只要这样写就可以了：
dim conn set conn = server.createobject(\conn.open = \
有许多初学者在遇到数据库连接时总是会出问题，然而使用上面的驱动程序只要你的数据库路径选对了就不会出问题了。
sqlserver的连接可以如下： Set conn=Server.CreateObject(\on error resume next connstr=\Source=localhost;Connect Timeout=15\ conn.Open connstr
经常会在连接DB的时候用到，就是不知道代表什么意思。。。
RS.OPEN SQL,CONN,A,B A:
ADOPENFORWARDONLY(=0) 只读,且当前数据记录只能向下移动
ADOPENKEYSET(=1)
只读,当前数据记录可自由移动
ADOPENDYNAMIC(=2)
可读写,当前数据记录可自由移动
ADOPENSTATIC(=3)
可读写,当前数据记录可自由移动,可看到新增记录 B:
ADLOCKREADONLY(=1)
缺省锁定类型，记录集是只读的，不能修改记录
ADLOCKPESSIMISTIC(=2)
悲观锁定，当修改记录时，数据提供者将尝试锁定记录以确保成功地编辑记录。只要编辑一开始，则立即锁住记录。
ADLOCKOPTIMISTIC(=3)
乐观锁定 ，直到用Update方法提交更新记录时才锁定记录。
ADLOCKBATCHOPTIMISTIC(=4)
批量乐观锁定，允许修改多个记录，只有调用UpdateBatch方法后才锁定记录。
当不需要改动任何记录时，应该使用只读的记录集，这样提供者不用做任何检测。
对于一般的使用，乐观的锁定可能是最好的选择，因为记录只被锁定一小段时间，数据在这段时间被更新。这减少了资源的使用。
VB几种连接数据库的方法
(2008-04-03 12:47:58) 转载 标签：
杂谈
－、用DAO控件连接数据库 1.与Access2000数据库连接 Private Sub Command1_Click()
'也可直接在控件属性中设置以下各项但在控件属性中不能写入密码 '只有在数据数没有密码的情况下可以省略 Data1.Refresh
Data1.Connect = \
Data1.DatabaseName = App. Path + \'数据库没有密码此句可省 Data1.Connect = \
'Data1.RecordSource = \耕地资源管理单元属性数据表2004\
Data1.RecordSource = \耕地资源管理单元属性数据表2004\Data1.Refresh
’move后才能正确显示记录个数 End Sub
2.与没有密码的DBF文件数据库连接 Private Sub Command2_Click() Data1.Connect = \Data1.DatabaseName = App. Path
相关推荐：
loading