連接數據庫和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