请教,ASP插入ORACLE编译报错参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
ADODB.Recordset 错误 '800a0bb9' 参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
/add.asp,行 44
以下为源码:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="Connections/jinye.asp" -->
<%
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" />
<!--<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />-->
<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