VB怎么连接访问Access数据库?
方法/步骤:
1、Access,建立数据库,数据库命名为Database1.mdb。
(注意:这里的后缀是mdb,如果Access是2007版本的,保存的时候要另存为2003版本的才行,因为,VB不直接支持07版的accdb后缀格式!)
2、数据库建立后就进入了数据表界面,可以输入数据了,输完以后Ctrl+S保存,输入表名,这里表名为test,OK,准备工作搞定。
2、打开VB,然后新建标准EXE。
3、菜单中找到工程→部件→勾选Microsoft ADO Data Control 6.0及其Microsoft Hierarchical FlexgridControl 6.0,勾选后左侧工具栏里就多了两个控件即ADODC控件和MSHFlexGrid控件。
4、选择ADODC控件和MSHFlexGrid控件,放在窗体的合适位置,如图:
5、设置ADODC控件的属性:右键窗体内ADODC1控件。
(1)ADODC属性页→通用→选择使用连接字符串→点击生成→选择Microsoft Jet 4.0 OLE DB Provider点击下一步→选择之前准备好的数据库→点击测试连接,显示测试成功则OK,确定。
(2)ADODC属性页→记录源→命令类型选择2-adcmdtable,表或存储过程名称选择之前建立的数据表test,点击确定,ADODC属性设置完成。
6、设置MSHFlexGrid控件的属性:VB右侧属性表里,找到datasource,选择adodc1。
7、测试效果:
(1)菜单→运行→启动(F5),发现显示的数据排列不是我们想要的行数和列数。
修改方法:
(1)MSHFlexGrid属性→通用→设置行和列,固定行和固定列,设置见图。
(2)MSHFlexGrid属性→带区→把列标题的√取消掉,设置见图。
8、修改后的测试效果:
VB如何连接SQL Server数据库?
在VB6.0中,数据访问接口有三种:
1、ActiveX数据对象(ADO)
2、远程数据对象(RDO)
3、数据访问对象(DAO)
1.使用ADO(ActiveX Data Objec,ActiveX数据对象)连接SQL Server
1)使用ADO控件连接
使用ADO控件的ConnectionString属性就可以连接SQL Server,该属性包含一个由分号分隔的argument=value语句的字符串,用于指定建立与数据源连接的信息,语法如下:
[vb]
Provider=Drive;Password=UserPassword;PersistSecurity Info=False;User ID=UserName;Initial Catalog=Data Name;DataSource=ServerName
例:使用ADO控件连接名为student的数据库
[vb]
PrivateSub Form_Load()
Adodc1.connectionstring="Provider=SQLOLEDB.1;Password=;PersistSecurity Info=False;User ID=sa;Initial Catalog=student;Data Source=."
End Sub
2)使用ADO对象连接
ADO的数据库访问技术,不仅可以通过VB提供的控件实现,还可以通过ADO相关的对象实现。ADO对象包括了command对象、connection对象、recordset对象、Error对象、field对象、parameter对象、property对象,其中,connection对象是用来管理与数据库的连接的
例:使用connection对象的Open方法连接名为student的数据库
[vb]
Dim cnn as ADODB.Connection
Privatesub Form_Load()
set cnn=New ADODB.Connection
Cnn.open="provider=SQLOLEDB;password=;PersistSecurity Info=true;User ID=sa;Initial Catalog=student;Data Source=."
End Sub
2.使用DAO(Data Access Object,数据访问对象)连接SQL Server
使用DAO连接SQL Server可以使用VB提供的Data控件实现,使用其访问SQL Server时需要掌握connect属性用于定义所要连接数据库的类型,由于Data控件采用的是Access/Jet为数据引擎,所以访问SQL Server时需要用ODBC间接访问
connect属性访问ODBC时的字符串格式设置:
[vb]
ODBC;DataBase=DataName;UID=UserName;PWD-UserPassword;DSN=DataSourceName
例:用Data控件通过ODBC中的studentinfo数据源连接名为student的数据库
[vb]
PrivateSub Form_Load()
Data1.connect="ODBC;DataBase=student;UID=sa;PWD=123;DSN=studentinfo"
End Sub
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-19
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-18
头条 22-10-17
头条 22-10-17
头条 22-10-17
头条 22-10-17
头条 22-10-17
头条 22-10-17
头条 22-10-17