access2000的数据库,VBSP6,
数据库中有一个用户表,有三个字段:用户名、用户密码、用户类型偶在登录界面上放了一个adodc1和datacombo控件,用来列出表中已有的用户名,一个adodc2用来从表中查出相对应的用户名的密码。下面有一个密码框。我的问题是,当我选择了用户名后,如何用adodc2来查出用户所对应的密码及类型分别保存到两个string类型的变量中?
我的代码,可是不行。。
Dim password As String
Dim strQuery As String
Adodc2.RecordSource = ("select * from 用户表 where 用户名称=" + Trim(DataCombo1.Text))
Adodc2.Refresh
password = Adodc2.Recordset.Fields(2)我是用DSN链接数据库,其它属性已经属性页里设好
什么参数不足,期等是1,然后就是adodc2.refresh失败。。不知道是什么原因

解决方案 »

  1.   

    If Not Trim(DataCombo1.Text) = "" Then
        Adodc2.RecordSource = ("select * from 用户表 where 用户名称='" & Trim(DataCombo1.Text) & "'")
        Adodc2.Refresh
        password = Adodc2.Recordset.Fields(2)
        '……
    Else
        msgbox "用户名为空"
    End if
      

  2.   

    Adodc2.RecordSource = ("select * from 用户表 where 用户名称='" & Trim(DataCombo1.Text) & "'")
      

  3.   

    Adodc2.RecordSource = ("select * from 用户表 where 用户名称=" + Trim(DataCombo1.Text))
    这句话有问题.....
    楼上正解.
      

  4.   

    3处错误:1少了'号,2"="应该是因为的=而不是中文的=,3应该用 & 而不是 + 来连接。应该是: Adodc2.RecordSource = ("select * from 用户表 where 用户名称 ='" & Trim(DataCombo1.Text) & "'")