请教，ASP插入ORACLE编译报错参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 - ASP技术论坛

已结贴√ 问题点数：20 回复次数：0

请教，ASP插入ORACLE编译报错参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。

ADODB.Recordset 错误 '800a0bb9'

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

/add.asp，行 44

以下为源码：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>


<%
Dim khmc,xmmc,xmfl,xmjz,khxy,sbqd,cght,yszs,qtwd,zcgs,zcgsxy,xysxsj,xydqsj,xywhyq,whztxd,ghs_jcs
Dim cgnr,cgjl,zbq,bwxbbz,fwnrbz,ylwk,dhsj,cysj,zysj,ysr,xh,pc,khjl,whjl,jwsj,bz

khmc=request.form("khmc")
xmmc=request.form("xmmc")
xmfl=request.form("xmfl")
xmjz=request.form("xmjz")
khxy=request.form("khxy")
sbqd=request.form("sbqd")
cght=request.form("cght")
yszs=request.form("yszs")
qtwd=request.form("qtwd")
zcgs=request.form("zcgs")
zcgsxy=request.form("zcgsxy")
xysxsj=request.form("xysxsj")
xydqsj=request.form("xydqsj")
xywhyq=request.form("xywhyq")
whztxd=request.form("whztxd")
ghs_jcs=request.form("ghs_jcs")
cgnr=request.form("cgnr")
cgjl=request.form("cgjl")
zbq=request.form("zbq")
bwxbbz=request.form("bwxbbz")
fwnrbz=request.form("fwnrbz")
ylwk=request.form("ylwk")
dhsj=request.form("dhsj")
cysj=request.form("cysj")
zysj=request.form("zysj")
ysr=request.form("ysr")
xh=CInt(request.form("xh"))
pc=CInt(request.form("pc"))
khjl=request.form("khjl")
whjl=request.form("whjl")
jwsj=request.form("jwsj")
bz=request.form("bz")

dim sql,rs
set rs=server.createobject("adodb.recordset")
sql="select * from jinye.main_list where xh=" &trim(request.form("xh"))
rs.open sql,conn,1,3
if not rs.eof then
response.write "该编号已经存在"
response.end
end if
rs.addnew()
rs("khmc")=khmc
rs("xmmc")=xmmc
rs("xmfl")=xmfl
rs("xmjz")=xmjz
rs("khxy")=khxy
rs("sbqd")=sbqd
rs("cght")=cght
rs("yszs")=yszs
rs("qtwd")=qtwd
rs("zcgs")=zcgs
rs("zcgsxy")=zcgsxy
rs("xysxsj")=xysxsj
rs("xydqsj")=xydqsj
rs("xywhyq")=xywhyq
rs("whztxd")=whztxd
rs("ghs_jcs")=ghs_jcs
rs("cgnr")=cgnr
rs("cgjl")=cgjl
rs("zbq")=zbq
rs("bwxbbz")=bwxbbz
rs("fwnrbz")=fwnrbz
rs("ylwk")=ylwk
rs("dhsj")=dhsj
rs("cysj")=cysj
rs("zysj")=zysj
rs("ysr")=ysr
rs("xh")=xh
rs("pc")=pc
rs("khjl")=khjl
rs("whjl")=whjl
rs("jwsj")=jwsj
rs("bz")=bz
rs.update
response.write("<p align='center'><font color=red>添加成功！请返回</font></p>")
rs.close
set rs = nothing
conn.close
set conn= nothing
%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />



<title>新增记录</title>

<style>
input {
    border-style:inset;
    border-width:2px;
    border-color:#FFF;
    background-color:#CCC;
    -moz-border-radius:1px;
    font-size:12px;
    font-family:"宋体";
    font-weight:400;
}
body,td,th {
    font-family: "楷体";
    font-size: 16px;
    font-weight: bold;
    color: #000;
}
body {
    margin-left: 0px;
    margin-top: 0px;
    margin-right: 0px;
    margin-bottom: 0px;
    background-color: #FFF;
}
.btn {
    border:3px;
    font-size:15px;
    font-family:"楷体";
    font-weight:bold;
    border-style:outset;
    border-color:#FFF;
    background-color:#FFF;
    -moz-border-radius:3px;
}
.jin {
    border-style:inset;
    background-color:#FFF;
    -moz-border-radius:1px;
    font-size:12px;
    font-family:"宋体";
    font-weight:400;
}

a:link {
    color: #000;
}
a:visited {
    color: #000;
}
a:hover {
    color: #000;
}
a:active {
    color: #000;
}
</style>

</head>

<body>
<p> </p>
<p> </p>
<p> </p>
<table width="1002" border="2" align="center" cellpadding="2" cellspacing="2">
  <tr>
    <td height="30" align="center" background="images/red_001.jpg" style="font-size:24px">创新转型用户档案新增</td>
  </tr>
  <tr>
    <td height="333" align="center" valign="middle">
    <form id="form1" name="form1" action='form1' method="post">
      <p> </p>
      <p>用户名称
        <input name="khmc" type="text" id="khmc" size="20" />
        项目名称
        <input name="xmmc" type="text" id="xmmc" size="20" />
        项目分类
        <input name="xmfl" type="text" id="xmfl" size="20" />
        项目进展
        <input name="khmc5" type="text" id="xmjz" size="20" />
      </p>
      <p>客户协议
        <input name="khxy" type="text" id="khxy" size="20" />
        设备清单
        <input name="sbqd" type="text" id="sbqd" size="20" />
        采购合同
        <input name="cght" type="text" id="cght" size="20" />
        验收证书
        <input name="yszs" type="text" id="yszs" size="20" />
      </p>
      <p>其他文档
        <input name="qtwd" type="text" id="qtwd" size="20" />
        资产归属
        <input name="zcgs" type="text" id="zcgs" size="20" />
        归属协议
        <input name="zcgsxy" type="text" id="zcgsxy" size="20" />
        协议生效
        <input name="xysxsj" type="text" id="xysxsj" size="20" />
      </p>
      <p>协议到期
        <input name="xydqsj" type="text" id="xydqsj" size="20" />
        维护要求
        <input name="xywhyq" type="text" id="xywhyq" size="20" />
        主维协定
        <input name="whztxd" type="text" id="whztxd" size="20" />
        供货集成
        <input name="ghs_jcs" type="text" id="ghs_jcs" size="20" />
      </p>
      <p>采购内容
        <input name="cgnr" type="text" id="cgnr" size="20" />
        采购经理
        <input name="cgjl" type="text" id="cgjl" size="20" />
        首保期限
        <input name="zbq" type="text" id="zbq" size="20" />
        续保价格
        <input name="bwxbbz" type="text" id="bwxbbz" size="20" />
      </p>
      <p>服务承诺
        <input name="fwnrbz" type="text" id="fwnrbz" size="20" />
        预留尾款
        <input name="ylwk" type="text" id="ylwk" size="20" />
        到货时间
        <input name="dhsj" type="text" id="dhsj" size="20" />
        初验时间
        <input name="cysj" type="text" id="cysj" size="20" />
      </p>
      <p>终验时间
        <input name="zysj" type="text" id="zysj" size="20" />
        验收人员
        <input name="ysr" type="text" id="ysr" size="20" />
        项目序号
        <input name="xh" type="text" id="xh" value="0" size="20" />
        交维批次
        <input name="pc" type="text" id="pc" value="0" size="20" />
      </p>
      <p>客户经理
        <input name="khjl" type="text" id="khjl" size="20" />
        维护经理
        <input name="whjl" type="text" id="whjl" size="20" />
        交维时间
        <input name="jwsj" type="text" id="jwsj" size="20" />
        备注说明
        <label for="bz"></label>
        <input name="bz" type="text" id="bz" size="20" />
      </p>
      <p>
        <input class='btn' type="submit" name="tj" id="tj" value="添加记录" />
      </p>
    </form></td>
  </tr>
  <tr>
    <td height="30" align="center" bgcolor="#CCCCCC"> </td>
  </tr>
</table>
</body>
</html>

---数据库表结构如下：

khmc    varchar2(100)    y
xmmc    varchar2(100)    y
xmfl    varchar2(50)    y
xmjz    varchar2(50)    y
khxy    varchar2(10)    y
sbqd    varchar2(10)    y
cght    varchar2(10)    y
yszs    varchar2(10)    y
qtwd    varchar2(1000)    y
zcgs    varchar2(100)    y
zcgsxy    varchar2(100)    y
xysxsj    varchar2(100)    y
xydqsj    varchar2(100)    y
xywhyq    varchar2(100)    y
whztxd    varchar2(10)    y
ghs_jcs    varchar2(100)    y
cgnr    varchar2(100)    y
cgjl    varchar2(100)    y
zbq    varchar2(100)    y
bwxbbz    varchar2(100)    y
fwnrbz    varchar2(100)    y
ylwk    varchar2(100)    y
dhsj    varchar2(100)    y
cysj    varchar2(100)    y
zysj    varchar2(100)    y
ysr    varchar2(100)    y
xh    number(12)    y
pc    number(10)    y
khjl    varchar2(100)    y
whjl    varchar2(100)    y
jwsj    varchar2(100)    y
bz    varchar2(1000)    y

搜索更多相关主题的帖子: include　file　