在VS.net中怎样连接一个数据库，并将他的内容显示出来

来源：百度知道 编辑：UC知道 时间：2024/06/05 10:56:37
建立了connectionSQL对象，也建立了Command和adapter、dataset、datagrid对象，我想利用数据库中的表把数据库显示出来……高手指点……
我用代码能连接SQL数据库，而且也能显示数据库，只是用VS对象就一直不能显示数据了……

你有数据库吗？
连接你的数据库的位置，加他的 连接条件就可以拉下面是一个连接数据库的模块，大家可以使用它来连接SQL数据库，使用起来比ADO控件还简单：
代码如下：
Public rsNew As ADODB.Recordset
Public CnNew As ADODB.Connection
Public addFlag As Boolean
'连接数据库
Public Function OpenCn() As Boolean
Dim Mag As String
On Error GoTo strErrMag
Set CnNew = New ADODB.Connection
CnNew.ConnectionTimeout = 25
CnNew.Provider = "sqloledb"
CnNew.Properties("data source").value = "" 'SQL服务器的名
CnNew.Properties("initial catalog").value = "pubs"'库名
CnNew.Properties("integrated security").value = "SSPI"'登陆类型
'con.Properties("user id").value = "sa"
'con.Properties("password").value = "wwww"

CnNew.Open
OpenCn = True
addFlag = True
Exit Function
strErrMag:
Mag = "数据库末连接"
Call MsgBox(Mag, vbOKCancel, "错误:数据库连接"