使用参数型Command出现下列错误。红色处
ADODB.Command 错误 '800a0bb9'
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/asp/Test.asp，行 37
VB code:
set conn=server.CreateObject("ADODB.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("db.mdb")
set cmd=server.CreateObject("ADODB.command")
cmdText_INSERT="insert into ComputeInfo(ComputeName,IP,MAC,CPU,DNSName) values(?,?,?,?,?)"
set cmd.ActiveConnection=conn
cmd.CommandType=adCmdText
cmd.CommandText=cmdText_INSERT
set PrmName=cmd.CreateParameter("ComputeName",adVarChar,adParamInput,30)
set PrmIP=cmd.CreateParameter("IP",adVarChar,adParamInput,15)
set PrmMAC=cmd.CreateParameter("MAC",adVarChar,adParamInput,17)
set PrmCPU=cmd.CreateParameter("CPU",adVarChar,adParamInput,45)
set PrmDNSName=cmd.CreateParameter("DNSName",adVarChar,adParamInput,50)
cmd.Parameters.Append PrmName
cmd.Parameters.Append PrmIP
cmd.Parameters.Append PrmMAC
cmd.Parameters.Append PrmCPU
cmd.Parameters.Append PrmDNSName
PrmName.Value=Request.Form("txtComputeNam
