怎样动态的生成sql语句

Question

怎样动态的生成sql语句我想把sql语句的条件部分由用户输入
可是这么写好象不行
ID = Text1.Text
rs.Open "select * from pas where id=" & Trim(ID), cn, adOpenDynamic, adLockBatchOptimistic
这个select 应该怎么写
谢谢

Answer 1

.....
dim strSQL AS String
strSQL = "select * from pas where id = '" & Trim(ID) & "'"
rs.open strSQL,cn,adopendynamic
.......
...

Answer 2

id 的字段类型是什么？若是文本则
rs.Open "select * from pas where id='" & Trim(ID) & "'", cn, adOpenDynamic, adLockBatchOptimistic

Answer 3

strSQL = "select * from pas where id = '" & Trim(ID) & "'"

Answer 4

rs.open "select * form pas where id=" & "'" & text1.text & "'",cn,adopendynamic,adlockbatchoptimistic

Answer 5

你的id 变量如果为数字，则 select * from pas where id=" & cint(Trim(ID)), 
如果为字符串，则 select * from pas where id='" & Trim(ID) & "'",