ADODB.Command '800a0bb9' 错误[参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。]

最新推荐文章于 2023-08-02 17:14:42 发布
最新推荐文章于 2023-08-02 17:14:42 发布
阅读量1k 收藏
点赞数
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/kaoyi4864/article/details/53954609
版权
ADODB.Command '800a0bb9' 

参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 

\admin\gl_user_oper.asp, line 41


-------------------------------------------

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="../Connections/web_ok.asp" -->
<%
Dim MM_editAction
MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
  MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)
End If

' boolean to abort record edit
Dim MM_abortEdit
MM_abortEdit = false
%>
<%
' IIf implementation
Function MM_IIf(condition, ifTrue, ifFalse)
  If condition = "" Then
    MM_IIf = ifFalse
  Else
    MM_IIf = ifTrue
  End If
End Function
%>
<%
If (CStr(Request("MM_update")) = "form1") Then
  If (Not MM_abortEdit) Then
    ' execute the update
    Dim MM_editCmd

    Set MM_editCmd = Server.CreateObject ("ADODB.Command")
    MM_editCmd.ActiveConnection = MM_web_ok_STRING
    MM_editCmd.CommandText = "UPDATE [User] SET Username = ?, Pass = ?, Zhenshi = ?, Tel = ?, Email = ?, QQ = ?, Dizhi = ? WHERE Username = ?" 
    MM_editCmd.Prepared = true
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 201, 1, -1, Request.Form("textfield")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 201, 1, -1, Request.Form("Pass")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 201, 1, -1, Request.Form("zhenshi")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 201, 1, -1, Request.Form("tel")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 201, 1, -1, Request.Form("email")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 201, 1, -1, Request.Form("QQ")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 201, 1, -1, Request.Form("Dizhi")) ' adLongVarChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", -1, 1, -1, MM_IIF(Request.Form("MM_recordId"), Request.Form("MM_recordId"), null)) ' N/A
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close

    ' append the query string to the redirect URL
    Dim MM_editRedirectUrl
    MM_editRedirectUrl = "gl_user.asp"
    If (Request.QueryString <> "") Then
      If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then
        MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
      Else
        MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
      End If
    End If
    Response.Redirect(MM_editRedirectUrl)
  End If
End If
%>
<%
Dim user__MMColParam
user__MMColParam = "1"
If (Request.QueryString("u") <> "") Then 
  user__MMColParam = Request.QueryString("u")
End If
%>
<%
Dim user
Dim user_cmd
Dim user_numRows

Set user_cmd = Server.CreateObject ("ADODB.Command")
user_cmd.ActiveConnection = MM_web_ok_STRING
user_cmd.CommandText = "SELECT * FROM User WHERE Username = ?" 
user_cmd.Prepared = true
user_cmd.Parameters.Append user_cmd.CreateParameter("param1", 200, 1, 50, user__MMColParam) ' adVarChar

Set user = user_cmd.Execute
user_numRows = 0
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/GL__muban.dwt.asp" codeOutsideHTMLIsLocked="false" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!-- InstanceBeginEditable name="doctitle" -->
<title>用户管理- 后台管理</title>
<!-- InstanceEndEditable -->
<style type="text/css">
body {
background-image: url(../images/piont.gif);
margin-top: 0px;
margin-bottom: 0px;
}
#apDiv1 {
position:absolute;
left:40px;
top:0px;
width:730px;
height:60px;
z-index:1;
}
#apDiv2 {
position:absolute;
left:40px;
top:60px;
width:102px;
height:340px;
z-index:2;
}
#apDiv3 {
position:absolute;
left:142px;
top:60px;
width:628px;
height:340px;
z-index:3;
}
.dh {
color: #FFF;
font-weight: bold;
text-decoration:none;
}
</style>
<!-- InstanceBeginEditable name="head" -->
<style type="text/css">
.biankuang {
border: 1px solid #CCC;
}
</style>
<!-- InstanceEndEditable -->
</head>

<body>
<table border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="730" height="60" colspan="2" valign="bottom" bgcolor="#0099FF">&nbsp;尊敬的：</td>
  </tr>
  <tr>
    <td width="120" height="340" align="center" valign="middle" bgcolor="#00CCFF"><table width="100%" border="0" cellspacing="0" cellpadding="20">
      <tr>
        <td align="center" valign="middle"><a href="gl_user.asp" class="dh">用户管理</a></td>
      </tr>
      <tr>
        <td align="center" valign="middle"><a href="gl_news.asp" class="dh">新闻管理</a></td>
      </tr>
      <tr>
        <td align="center" valign="middle"><a href="gl_board.asp" class="dh">留言管理</a></td>
      </tr>
      <tr>
        <td align="center" valign="middle"><a href="gl_other.asp" class="dh">相关信息</a></td>
      </tr>
      <tr>
        <td>&nbsp;</td>
      </tr>
  </table></td>
    <td width="950" height="340" valign="top" bgcolor="#FFFFFF"><!-- InstanceBeginEditable name="zhuti" -->
      <table width="100%" border="0" cellpadding="0" cellspacing="0" class="biankuang" height="100%">
        <tr>
          <td align="left" valign="top"><form id="form1" name="form1" method="POST" action="<%=MM_editAction%>">
            <table width="50%" border="0" align="center" cellpadding="0" cellspacing="3">
              <tr>
                <td width="27%">&nbsp;</td>
                <td width="73%">&nbsp;</td>
              </tr>
              <tr>
                <td align="right">用户名：</td>
                <td><label for="textfield"></label>
                  <input name="textfield" type="text" id="textfield" value="<%=(user.Fields.Item("Username").Value)%>" /></td>
              </tr>
              <tr>
                <td align="right">密&nbsp;&nbsp;&nbsp; 码：</td>
                <td><label for="Pass"></label>
                  <input name="Pass" type="text" id="Pass" value="<%=(user.Fields.Item("Pass").Value)%>" /></td>
              </tr>
              <tr>
                <td align="right">姓 &nbsp;&nbsp; 名：</td>
                <td><label for="zhenshi"></label>
                  <input name="zhenshi" type="text" id="zhenshi" value="<%=(user.Fields.Item("Zhenshi").Value)%>" /></td>
              </tr>
              <tr>
                <td align="right">电&nbsp;&nbsp;&nbsp; 话：</td>
                <td><label for="tel"></label>
                  <input name="tel" type="text" id="tel" value="<%=(user.Fields.Item("Tel").Value)%>" /></td>
              </tr>
              <tr>
                <td align="right">邮&nbsp; &nbsp; 箱：</td>
                <td><label for="email"></label>
                  <input name="email" type="text" id="email" value="<%=(user.Fields.Item("Email").Value)%>" /></td>
              </tr>
              <tr>
                <td align="right">Q&nbsp;&nbsp;&nbsp;&nbsp; Q：</td>
                <td><label for="QQ"></label>
                  <input name="QQ" type="text" id="QQ" value="<%=(user.Fields.Item("QQ").Value)%>" /></td>
              </tr>
              <tr>
                <td align="right">地&nbsp;&nbsp;&nbsp; 址：</td>
                <td><label for="Dizhi"></label>
                  <textarea name="Dizhi" id="Dizhi" cols="45" rows="5"><%=(user.Fields.Item("Dizhi").Value)%></textarea></td>
              </tr>
              <tr>
                <td align="right">&nbsp;</td>
                <td>&nbsp;</td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td><input type="submit" name="button" id="button" value="提交" /></td>
              </tr>
            </table>
            <input type="hidden" name="MM_update" value="form1" />
            <input type="hidden" name="MM_recordId" value="<%= user.Fields.Item("Username").Value %>" />
          </form></td>
        </tr>
      </table>
    <!-- InstanceEndEditable --></td>
  </tr>
  <tr>
    <td width="102" height="1" valign="top"><img src="../transparent.gif" alt="" width="102" height="1" /></td>
    <td width="628" height="1" valign="top"><img src="../transparent.gif" alt="" width="628" height="1" /></td>
  </tr>
</table>
</body>
<!-- InstanceEnd --></html>
<%
user.Close()
Set user = Nothing
%>


怎么回事
kaoyi4864
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
Microsoft JET Database Engine 错误 &#x27;80040e07&#x27; 标准表达式中数据类型不匹配
shuangjieping0381的博客
12-31 2383
如题，错误语句是rs.Open SQL,conn,1,1 这是代码： number=request("text1") name=request("text2") logo=request("text3") reason=request("text4") measure=request("text5") Set Conn=Server.CreateObject("ADODB.Con
RS.OPEN SQL,CONN,A,B
pamxp的专栏
03-27 905
RS.OPEN SQL,CONN,A,B 参数A为设定游标的类型，其取值为： 0 仅向前游标，只能向前浏览记录，不支持分页、Recordset、BookMark 1 键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark 2 动态游标功能最强，但耗资源也最多。用户对记录说做的修改，增加或删除记录都将反映到记录集
ASP中使用存储过程，遭遇“参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突“错误
最新发布
08-02 314
本来很少用ASP，出现这样的提示让人摸不着头脑，我原本以为adCmdStoredProc是内部定义好的东西，网上其他高手说这个东西需要自己定义，哦，明白了。
ADODB.Stream 错误 &#39;800a0bb9&#39; 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突...
weixin_33994429的博客
10-27 721
最近在调试一个过去的项目，asp写的，提示： ADODB.Stream 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 /UpLoadClass_Dreacom_v3/UpLoadClass.asp，行 635 发生错误的代码行： Stream.Write buff 打...
ADODB.Recordset 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
Corn的博客
04-07 1949
错误提示： 除了度娘给出的错误-解决办法外，可能存在以下原因哦： 没有连接数据库！！ set conn = Server.CreateObject("ADODB.Connection") conn.Open xDb_Conn_Str ok了，解决。 ...
Adodb.Stream 使用错误记录: 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
编程路
02-03 3478
Adodb.Stream : 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
weixin_30349597的博客
08-13 2048
ADODB.Recordset 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 /Inventory/displayc.asp，行 29 转载于:https://www.cnblogs.com/kaixin110/archive/2007/08/13/853878.html...
SQLServer ADODB.Recordset 错误“800a0e78”，对象关闭时，不允许操作
10-25
当在使用ASP（Active Server Pages）技术开发的网站中遇到ADODB.Recordset对象相关的错误“800a0e78”，提示“对象关闭时，不允许操作”时，这通常是由于程序代码试图在Recordset对象被关闭后对其进行操作导致的。...
64位系统中IIS7运行ASP时出现ADODB.Connection 800a0e7a错误的解决方法
09-30
在64位操作系统环境下，尤其是Windows 7系统中，使用IIS7运行ASP应用程序时，可能会遇到一个常见的错误——ADODB.Connection 800a0e7a。这个错误通常表明系统在尝试访问或操作数据库时遇到了问题。本文将深入解析这...
set rs=server.CreateObject("adodb.recordset") 的中文详细说明
10-28
在编程中，尤其是在处理数据库操作时，`set rs=server.CreateObject("adodb.recordset")` 是一个常见的VBScript语句，用于创建一个ADO（ActiveX Data Objects）Recordset对象。Recordset对象是ADODB库中的核心组件之...
asp+sql的存储过程出错"800a0bb9 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。"
gongzhiwei的专栏
04-26 4574
求助:我在sql里面建了一个存储过程在下面的页面中传递2个变量给存储过程,执行查询.总是报错  ============================ 接收本文件传送的参数后查询 ============================ dim wzfid,wztitle fid=request.QueryString("listid") 获取本页参数－文章FID rooti
asp调用存储过程出现错误 '800a0bb9'
bigcarp的专栏
11-30 2000
create PROCEDURE dbo.sp_InsertSo    (     @cust_name varchar(120)    )    AS    BEGIN     INSERT INTO dbo.so (cust_name)     VALUES (@cust_name)    END asp:set cmd=server.CreateObject ("adodb.comman
ASP错误提示ADODB.Command (0x800A0BB9)
weixin_30374009的博客
04-15 113
今天调试个程序，调用一个存储过程， CAO了 ， 我写了半天写出来了， 在调用的时候出了问题， 费了老大的劲， 老是出错 ，原因找了TMD的半天， 最后发现竞然是一个存储过程的变量， 和调用的时候不一样， 那Y把我郁闷了， 所以以后还是得仔细一点啊， 马虎太耽误时间了。。。。。 转载于:https://www.cnblogs.com/flyshy/archive/2010/0...
ADODB.Recordset (0x800A0BB9)
weixin_33670713的博客
01-10 338
--------------错误类型：------------ ADODB.Recordset (0x800A0BB9) 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 ----or:---- ADODB.Recordset 错误 '800a0bb9' 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 解决之道---------...
缺少对象 index.php 行123,缺少对象: ''
weixin_39615402的博客
03-31 200
老师您好！我的[wz_lm.asp]的所有代码，怎么老是提示下面的错误：以下是我 wz_lm.asp 的全部代码Dim MM_editActionMM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))If (Request.QueryString <> "") ThenMM_editAction = MM_editAct...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值