大家帮我看看下面的代码有什么问题 调试通不过
如题,谢谢!
<%@LANGUAGE= "VBSCRIPT " CODEPAGE= "936 "%>
<!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 ">
<head>
<meta http-equiv= "Content-Type " content= "text/html; charset=gb2312 " />
<title> 评价指标录入 </title>
</head>
<!-- #include file = "conn.asp " -->
<body>
保单编号: <%=request.QueryString( "baodanbianhao ")%> <br>
被保险人: <%=request.QueryString( "beibaoxianren ")%> <br>
所属处室: <%=request.QueryString( "suochuchushi ")%> <br>
客户经理: <%=request.QueryString( "kehujingli ")%> <br>
评估类型: <%=request.QueryString( "pingguleixing ")%> <br>
<p>
<form name= "data ">
<table bgcolor= "#00CCFF " width= "425 " height= "150 " border= "1 ">
<caption align= "top ">
评估指标录入
</caption>
<tr>
<td width= "174 "> 保费收入: </td>
<td width= "235 "> <input type= "text " name= "baofeishouru " /> </td>
</tr>
<tr>
<td> 申报保额: </td>
<td> <input type= "text " name= "shenbaobaoe " /> </td>
</tr>
<tr>
<td> 约定保费: </td>
<td> <input type= "text " name= "yuedingbaofei " /> </td>
</tr>
<tr>
<td> 约定保额: </td>
<td> <input type= "text " name= "yuedingbaoe " /> </td>
</tr>
<tr>
<td> 海关统计出口额: </td>
<td> <input type= "text " name= "haiguantongji " /> </td>
</tr>
<tr>
<td> 有申报限额个数: </td>
<td> <input type= "text " name= "shenbaoxianegeshu " /> </td>
</tr>
<tr>
<td> 批复限额总个数: </td>
<td> <input type= "text " name= "xianepifuzongshu " /> </td>
</tr>
<tr>
<td> 累计赔付金额: </td>
<td> <input type= "text " name= "lijipeifujine " /> </td>
</tr>
<tr>
<td> 承保通知书总金额: </td>
<td> <input type= "text " name= "chengbaotongzhizonge " /> </td>
</tr>
<tr>
<td> 财务处评级: </td>
<td> <select name= "caiwu ">
<option value= "5 " selected> 5分 </option>
<option value= "4 "> 4分 </option>
<option value= "3 "> 3分 </option>
<option value= "2 "> 2分 </option>
<option value= "1 "> 1分 </option>
<option value= "0 "> 0分 </option>
</select> </td>
</tr>
<tr>
<td> 迟申报: </td>
<td>
<select name= "chishenbao ">
<option value= "2 " selected= "selected "> 2分 </option>
<option value= "1 "> 1分 </option>
<option value= "0 "> 0分 </option>
</select> </td>
</tr>
<tr>
<td> 限额倒签: </td>
<td>
<select name= "daoqian ">
<option value= "2 " selected= "selected "> 2分 </option>
<option value= "1 "> 1分 </option>
<option value= "0 "> 0分 </option>
</select> </td>
</tr>
<tr>
<td> 文档管理 </td>
<td>
<select name= "wendangguanli ">
<option value= "1 " selected= "selected "> 1分 </option>
<option value= "0 "> 0分 </option>
</select> </td>
</tr>
<tr align= "center " bgcolor= "#FFFFFF ">
<td>
<input type= "reset " value= "重置 " name= "cancel " />
</td>
<td>
<input type= "button " value= "下一步 " name= "save " onclick = "saveData() ">
</td>
<%
sub saveData()
set rs = Server.CreateObject( "ADODB.recordset ")
sql = "Select * from ranktable Where baodanbianhao = ' "&baodanbianhao& " ' "
rs.open sql,db,3,3
If Rs.EOF or Rs.BOF Then
Rs.addNew
Rs( "baodanbianhao ") = request.QueryString( "baodanbianhao ")
Rs( "pingguleixing ") = request.QueryString( "pingguleixing ")
Rs.Update
Else
response.write( " <script language= 'vbscript '> msgbox( '提示内容 ',0, '错误 ') </script> ")
End If
End sub
%>
</tr>
</table>
</form>
<p>
<注:> <br>
一个保单年度内 保费收入、实际缴纳保费、实际申报保费先阶段按相同的方法计算; <br>
一个保单年度内 申报保额、实际申报保额、申报总额现阶段按相同的方法计算。
</body>
</html>
[解决办法]
onclick = "saveData() "> '调用客户端代码.
<% '服务器端代码
sub saveData()
....
end sub
%>
两者不要搞混了.
[解决办法]
最好用些变量来存request.QueryString( "baodanbianhao ")的值,再进行传递,不然在saveData()中取不到值
[解决办法]
客户端代码执行放在
<script> </script> 之间。