连接数据库和vb的ADO的通常使用

    通过敲那5个例子，就发现那五个例子全是关于数据库和vb的连接——通过ado实现的，所以就总结了一下ado的通常使用：

首先是ado'包括的常用知识：

下面是对常用的三个对象的举例说明：

Connection：连接,打开数据库

例:打开连接数据库

Dim  objCn  as new  connection

Dim  strCn  as string

strCn=”provider=Microsoft.jet.oledb.4.0;”_

     “data source=” &app.path &”\数据库.mdb”

 strCn.connectionstring=strCn

 objCn.open

 

recordset：执行结果的记录集

 dim  objRs as  new  recordset

 objRs.open(strCn)

  然后在结果集里进行一系列操作(增加，删除。。。)

 

Command：将数据源执行的指定命令查询数据

  例:查询数据

Dimobjcmd as new command

Set objCmd.ActiveConnection = objCn

 With objCmd

   .CommandText = "select * from 系统登陆 where 用户名 like?" & _

         "and 身份 like?"

          End With

          Dim parm As NewParameter

         Set parm = objCmd.CreateParameter("用户名",adVarChar, adParamInput, 10)

         objCmd.Parameters.Append parm