数据更新问题！急，请求解答
我在更新数据时出现错误信息：
错误类型：
ADODB.Command (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/web/fs/update.asp, 第 24 行
其中第24行是：set Command1 = Server.CreateObject("ADODB.Command")
请问错在哪里啊？急……
<!--#include file="inc/conn.asp" -->
<%
if(Request("name") <> "") then Command1__varname = Request("name")
if(Request("mobilphone") <> "") then Command1__varguestsex = Request("mobilphone")
if(Request("phone") <> "") then Command1__varguestage = Request("phone")
if(Request("fax") <> "") then Command1__varguestadress = Request("fax")
if(Request("email") <> "") then Command1__varpersonid = Request("email")
if(Request("qq") <> "") then Command1__varback = Request("qq")
if(Request("address") <> "") then Command1__varguestfather = Request("address")
if(Request("id") <> "") then Command1__varid = Request("id")
%>
<%
set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_conn_STRING
Command1.CommandText = "UPDATE show SET name='" + Replace(Command1__varname, "'", "''") + "', mobilphone='" + Replace(Command1__varmobilphone, "'", "''") + "', phone='" + Replace(Command1__varphone, "'", "''") + "', fax='" + Replace(Command1__varfax, "'", "''") + "', email='" + Replace(Command1__varemail, "'", "''") + "', qq='" + Replace(Command1__varqq, "'", "''") + "', address='" + Replace(Command1__varaddress, "'", "''") + "' WHERE Id = " + Replace(Command1__varid, "'", "''") + " "
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()
Response.Redirect("Admin_pu_index.asp")
%>
问题点数：0、回复次数：1Top
1 楼lzt7（(分头诗人)http://www.lzt7.com）回复于 2004-05-02 11:19:16 得分 0
哦！错了，第24行是：Command1.ActiveConnection = MM_conn_STRING
conn.asp文件是：
<%
dim conn
dim connstr
dim db
db="database/adsfkldfogowerjnokfdslwejhdfsjhk.mdb" '数据库文件的位置
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
sub CloseConn()
conn.close
set conn=nothing
end sub
%>
Top
