加上了ccur说是类型不匹配!
不加的时候向数据库提交的时候根本就本能显示网页
<%response.write request.Form("rpid")%>
<%
dim rs
Set rs = Server.CreateObject("ADODB.RECORDSET")
'在数据库表rpdan中插入新信息
sql="Select * from rpdan"
rs.Open sql,Conn,1,2
rs.AddNew
rs("rpid") = Request("rpid")
rs("rpname")= request("rpname")
rs("rpangebotname") = Request("rpangebotname")
rs("rprushijian")=now()
货币型'rs("rpdanjia") = ccur(Request("rpdanjia"))
货币型的 'rs("rpjine") = ccur( cint(request("rpshuliang"))*cint(Request.form("rpdanjia")))
数字型的 'rs("rpshuliang") = cint(Request.form("rpshuliang"))
rs("rpguige") = request("rpguige")
rs("rpkuwei") = request("rpkuwei")
rs("rpbeizhu") = request("rpbeizhu")
'rs("rpguanliyuan") = request("rpguanliyuan")
rs.Update%>
</body>
问题就出在了货币型和数字型的那三行!
把他们注释上问题就没有啦!
然后我又改这这样了!可是还是不行!我的代码哪有问题呀!?
rs("rpdanjia") = Request("rpdanjia")
rs("rpguanliyuan") = request("rpguanliyuan")