神马品牌网黑暗之魂3盔甲大全:asp问题,期待高手!
来源：百度文库 编辑：神马品牌网 时间：2024/04/29 08:20:19
上一个问题解决了,可是新的问题又出来了:
<%
if len(request.form("txtsql"))=0 then
response.Write("没有任何作用中的SQL指令！！")
else
dim objcommand,conn
conn = "provider=microsoft.jet.oledb.4.0;data source=c:\inetpub\wwwroot\testsite\db1.mdb"
set objcommand=server.CreateObject("adodb.command")
conn.open connectionstring
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 运行时错误 (0x800A01A8)
缺少对象: 'provider=microsoft.j'
/testsite/ExecuteResult.asp, 第 17 行
不明白,能详细点么?
<%
if len(request.form("txtsql"))=0 then
response.Write("没有任何作用中的SQL指令！！")
else
dim objcommand,conn
conn = "provider=microsoft.jet.oledb.4.0;data source=c:\inetpub\wwwroot\testsite\db1.mdb"
set objcommand=server.CreateObject("adodb.command")
conn.open connectionstring
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 运行时错误 (0x800A01A8)
缺少对象: 'provider=microsoft.j'
/testsite/ExecuteResult.asp, 第 17 行
不明白,能详细点么?
我一般这样写的，基本上不会在数据库连接上出错：
ConnStr = \"Provider = Microsoft.Jet.OLEDB.4.0;Data Source = c:\\inetpub\\wwwroot\\testsite\\db1.mdb\"
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.open ConnStr
conn.Execute(request.form(\"txtsql\"))
conn.Close
定义了conn