晕,这句sql语句哪里有错吗?
dim conn as new adodb.connection
dim rs as new adodb.recordset
dim txtsql as string
Private Sub Form_Load()
txtsql="select * from table"
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source='" + App.Path + "\txt.mdb" + "'"
rs.Open txtsql & "where 1=0 ",conn,3,3
end sub
怎么运行时系统就会提示FROM语法错误呀，不知道怎么回事，请指点。
" where 1=0 " 'where前加个空格。
rs.Open txtsql & " where 1=0 ",conn,3,3
txtsql="select * from table"
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source='" + App.Path + "\txt.mdb" + "'"
rs.Open txtsql & "where 1=0 ",conn,3,3
上面第一句里面的错误 肥猫 老兄已经指出 table是sql的关键字，所以不能作为数据库里面的表名 如果你认死理要用的话 呵呵 你可以这样用：txtsql="select * from [table]"
第二个语句的错误数据库不用引号引就可以了
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + App.Path + "\txt.mdb"
第三个语句就是上面老兄说的那样 注意字符串在连接后生成的字符串格式是否符合sql的语法，你的缺少一个空格。
VB问题解答 主持人：韩誉
4月22号、24、26、28、30号晚上在线
自己开发数据库引擎SW2ioo [i代表一个输入端口，oo代表2个输出端口]
自己设计的数据宝宝
MSN:swpcsoft@hotmail.com
上面都指出来了,table不能作为表名来使用.还有我吃过亏的是用name 作字段时,在access里.
还有就是where 前面空格没打,在用&符号连接时,要特别注意,不过像这种调试SQL语句的事,你做好用一个第三方软件,我用数据转换器很不错的.你可以去网上下一个,设个断点,取得SQL语句.在软件里调好后才放到代码里去.呵呵.
