负荆请罪人物:ASP编程问题,谁能帮我看看呀?

来源:百度文库 编辑:高校问答 时间:2024/04/30 09:54:11
<%
if len(request.form("txtsql"))=0 then
response.Write("没有任何作用中的SQL指令!!")
else
dim objcommand,conn
conn = "provider=microsoft.jet.oledb.4.0;data source=="&Server.MapPath("db/db1.mdb")
set objcommand=server.CreateObject("adodb.command")
conn.open conn,UID=, PWD=
objcommand.activeconnection=conn
objcommand.commandtext=request.form("txtsql")
objcommand.execute
objcommand.activeconnection.close
response.Write("成功执行以下的SQL指令:<br>")
response.Write(request.Form("txtsql")&"<br>")
end if
%>

错误类型:
Microsoft VBScript 编译器错误 (0x800A03EA)
语法错误
/testsite/ExecuteResult.asp, line 17, column 19
conn.open conn,UID=, PWD=

我不知道该怎么样改正!大侠指点!谢谢哈!
不对呀!command是没有open方法的!

倒,哪有这样写法的。

conn = "provider=microsoft.jet.oledb.4.0;data source=="&Server.MapPath("db/db1.mdb")
set objcommand=server.CreateObject("adodb.command")
objcommand.open conn

这样就OK