Question

vb 中怎么最简单的连接一个数据库？

如题。

Answer 1

首先要知道你用的什么数据库，不同的数据库需要使用不同的数据库连接字符串。然后使用ADO进行连接MSSQL的连接字符串是 strConn= "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" & Trim(ClientuserID) & ";Password=" & Trim(ClientPWD) & ";Initial Catalog=" & Trim(ClientdataBase) & ";Data Source=" & Trim(ClientserverName)ClientuserID是数据库登录名ClientPWD数据库登录密码ClientdataBase 数据库名ClientserverName 数据库服务器的IP地址或服务器名 ACCESS的连接字符串是 strConn= "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & DBPathDBPath是数据库路径

Answer 2

定义数据库连接
Public cnn_PDMDB As New ADODB.Connection
定义连接字符串
cnn_PDMDB.ConnectionString = "Provider=MSDAORA.1;Password=x;User ID=x;Data Source=p.pdm;Persist Security Info=True"

cnn_PDMDB.CursorLocation = adUseClient
打开连接
cnn_PDMDB.open
以上内容放在在模块里

CursorLocation 属性
设置或返回游标服务的位置。