谢谢

解决方案 »

  1.   

    ado是最新的,DAO灵活.建议用ado.
    ado控件是系统集成的控件,可以让用户不用一名代码实现部分数据库操作.直接用ado编程是引用ado数据模型,自己建立数据对象,这样很灵活,可以完成很多ado控件不能完成的操作,议用ado对象来操作数据库.
    '//先引用ado2.5Dim cnn1 As New ADODB.Connection
    Dim myrs As New ADODB.Recordset
    dim sql as string'/////////保存
    cnn1.open
    myrs2.Open "select * from 操作员档案", cnn1, adOpenStatic, adLockPessimistic
        With myrs2
         .AddNew
         .Fields("姓名") = Trim(Text1.Text)
         .Fields("密码") = Trim(Text2.Text)
         .Fields("权限") = Trim(Text4.Text)
         .Update
        End With
       cnn1.Close
    '//////////查询
    sql="select * from 操作员档案 where 姓名="+"'"+text1.text+"'"
    cnn1.open
    set myrs=cnn1.exectue(sql)
    if myrs.eof then
      msgbox"没有一条符合条件的记录",vbokonly,"消息"
      cnn1.close
      exit sub
    end if
      text1.text=myrs.fields("姓名")
      ....
      ....
      cnn1.close