在VB代码中怎么用SQL语句

Question

Adodc1.RecordSource = "select * from Sale_House where Address_House like '" & Text1.Text & " '" 
有错嘛

Answer 1

:) 类型不符
dim rs as new adodb.recordset
dim strSql as stringstrSql="select * from Sale_House where Address_House like '" & Text1.Text & " '" 
set rs=cn.execute(rs)       'cn为一个已经打开的数据库联接set adodc1.recordsource=rs

Answer 2

Set cn = OpenDatabase(App.Path + "\database\Fdc_DB.mdb")这样也不行的set rs=cn.execute(rs)       是不是错了，要改为set rs=cn.execute(strSql)       对吧

Answer 3

对，当然要改啦，EXECUTE的参数当然不能是记录集的，而是查询语句

Answer 4

Set cn = OpenDatabase(App.Path + "\database\Fdc_DB.mdb")  没错吧是Set rs = db.Connection.Execute(strSql) 还是Set rs = db.Connection.Execute(strSql) 都会提示却少函数或变量请大侠指点

Answer 5

Adodc1.RecordSource = "select * from Sale_House where Address_House like '" & Text1.Text & " %'" 嗨，这样应该得了吧？？？
就是说，在SQLServer中，模糊查询like  要用到“ % ”
而在Access中用" * "来做通配符。