第三次问!!还没有人答吗?
我在我的机器的WIN2000上调试的好好的程序,放到一个完全干净的WIN2000系统下(除了IIS等组件,什么程序都没装过)就运行不了,解决的办法到有一个,只要装上VB就好了,但是到客户那里我总不能让人装VB吧,到底是缺少什么?还是有什么其他的解决问题的办法?我的ASP就是在数据库里查数据并返回结果,报错句就是查询执行语句,我用了两种都不行,大家帮想想办法。
用这个set rs=cn.execute(sql)报错是
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
用rs.open sql,cn也一样报错!!
代码如下:
dim sql
dim sql1
dim rs
dim cn
set cn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
sql1="Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & server.mappath("/db3.mdb")
cn.Open sql1
username= Request.Form("username")
email= Request.Form("email")
if username="" then
sql="select * from table1 where EMAIL like '%" & email & "%'"
elseif email="" then
sql="select * from table1 where 用户名 like '%" & username & "%'"
else
sql="select * from table1 where 用户名 like '%" & username & "%' and EMAIL like '%" & email & "%'"
end if
If rs.State =1 Then rs.Close
rs.open sql,cn