请教各位,以下是我用open打开一个SQL
Dim Cnn As ADODB.Connection
Dim Rst As ADODB.Recordset
Set Cnn = New ADODB.Connection
Cnn.ConnectionString = "DSN=BASS;UID=sa;PWD="
Cnn.Open
Set Rst = New ADODB.Recordset
Rst.Open "select * from userinf where wid=" & Trim(Text1.Text), Cnn, 1, 1
Set DataGrid1.DataSource = Rst
DataGrid1.Refresh为什么"Rst.Open "select * from userinf where wid=" & Trim(Text1.Text), Cnn, 1, 1"不行呢,运行不了呢!如果不加这个条件的话,就可以了!“Rst.Open "select * from userinf"Cnn, 1, 1”这样就可以运行,这是为什么呢?如果我要加这个条件该怎么办呢!

解决方案 »

  1.   

    可以把sql语句写成字符串,然后放到数据库里运行看看~
      

  2.   

    Rst.Open "select * from userinf where wid=" & Trim(Text1.Text), Cnn, 1, 1 
    Rst.Open "select * from userinf where wid='"& Trim(Test1.text) &"'",Cnn,1,1
      

  3.   

    http://download.csdn.net/source/1498324
      

  4.   

    if rst.state<>adstateclosed then rst.close
    Rst.Open "select * from userinf where wid='"& Trim(Test1.text) &"'",Cnn,1,1