大家好~~我是初学的，有人能帮写个输入数值自动加计后且写出大写吗？先谢谢了！ - ASP技术论坛

qjw9004

等　级：新手上路
帖　子：89
专家分：0
注　册：2011-1-27
结帖率：47.37%

楼主

已结贴√ 问题点数：10 回复次数：3

大家好~~我是初学的，有人能帮写个输入数值自动加计后且写出大写吗？先谢谢了！

[local]1[/local]

程序代码：

’页面shenqing.asp
<!-- #include file="conn.asp" -->
<%
sql="select * from config"
set rs_config=conn.execute(sql)
biaoji=rs_config("biaoji")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=biaoji%>-系统-</title>
<link rel="stylesheet" type="text/css" href="style/style.css" />
</head>
<body>   
<div>

 <form  method="get" name="b_c" id="b_c">

 现金申请：
   <input type="radio" name="pc_or_pb" value="pc">

 银行申请：

 <input type="radio" name="pc_or_pb" value="pb">
  <input type="submit" name="Submit" value="提交">
</form>
</div>

<%if request("pc_or_pb")="pb" then%>
<div id="pb_shenqing">
<center>
    <h1>银行付款申请单</h1>       
    <form name="pb_shenqing" method="post" action="pb_shenqing_do.asp">
    <div>
        <dl>
            <table width="600" border="0" cellpadding="0" cellspacing="0">
            <dt>以下均为必填项：</dt>
            <dd>申&nbsp;请&nbsp;人：<input type="text" name="username" class="text" /></dd>
            <dd>日&nbsp;&nbsp;&nbsp;&nbsp;期：<input type="text" name="sq_date" class="text" /></dd>
            <dd>收款单位：<input type="text" name="skr" class="text" /></dd>
      <dd>帐&nbsp;&nbsp;&nbsp;&nbsp;号：<input type="text" name="zh" class="text" /></dd>
      <dd>开&nbsp;户&nbsp;行：<input type="text" name="khh" class="text" /></dd>
      <dd>事&nbsp;&nbsp;&nbsp;由：<input type="text" name="sy" class="text" /></dd>
            <dd>￥：<input type="text" name="je" class="text" /></dd>
            <dd>发票情况：<input type="text" name="fp" class="text" /></dd>
            <dd>备&nbsp;&nbsp;&nbsp;&nbsp;注：<input type="text" name="bz" class="text" /></dd>
            </table>
            <dd><input type="submit" value="提交" name="send"  class="submit" /></dd>
        </dl>
        </table>
    </div>
    </form>
</center>
</div>
<%else%>
<div id="pc_shenqing">
<center>
    <h1>现金支出（费用报销）单</h1>       
    <form name="pc_shenqing" method="post" action="pc_shenqing_do.asp">
    <div>
        <dl>
            <table width="600" border="0" cellpadding="0" cellspacing="0">
            <dt>以下均为必填项：</dt>
            <dd>部    门：<input type="text" name="bm" class="text" /></dd>
            <dd>报 帐 人：<input type="text" name="username" class="text" /></dd>
            <dd>送达日期：<input type="text" name="sq_date" class="text" /></dd>
            <dd>事由1：<input type="text" name="sy01" class="text" />￥：<input type="text" name="je01" class="text" /></dd>
            <dd>事由2：<input type="text" name="sy02" class="text" />￥：<input type="text" name="je02" class="text" /></dd>
            <dd>事由3：<input type="text" name="sy03" class="text" />￥：<input type="text" name="je03" class="text" /></dd>
            <dd>事由4：<input type="text" name="sy04" class="text" />￥：<input type="text" name="je04" class="text" /></dd>
            <dd>合计(大写)：￥：</dd>
            <dd>备 注：<input type="text" name="bz" class="text" /></dd>
            </table>
            <dd><input type="submit" value="提交" name="send"  class="submit" /></dd>
        </dl>
        </table>
    </div>
    </form>
</center>
</div>
<%end if%>
</body>
</html>

2011-07-02 01:15

yms123

等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17

第 3 楼

得分:7

    <h1>现金支出（费用报销）单</h1>
    <script language="javascript">
    function isNum(val)
    {
        try
        {
            var test=eval(val+"1");
            return true;
        }
        catch(e)
        {
           return false;
        }
    }
    function SumFun()
    {
      var total=0;
      for(var i=0;i<document.pc_shenqing.je.length;i++)
      {
          var temp=document.pc_shenqing.je[i].value;
          if(temp!=""&&isNum(temp)
          total=total+temp;
      }
      document.getElementById("Total").innerHTML="合计(大写)：￥："+ changeNum(total);
    }
    function changeNum(val)
    {
         var tstr=val.toString();
         var restr="";
         for(var i=0;i<tstr.length;i++)
         {
             restr+=changeCHNum(tstr.substr(i,1));
             restr+=LocNum(i);
         }
         return restr;
    }
    function changeCHNum(val)
    {
         var tAry={"0|零","1|壹","2|贰","3|叁","4|肆","5|伍","6|陆","7|柒","8|捌","9|镹"，"10|拾"}
         for(var i=0;i<tAry.length;i++)
         {
               if(val.indexOf(tAry[i])!=-1)
                  return tAry[i].split('|')[1];
         }
    }
    function LocNum(idx)
    {
        var tAry={"","十","百","千","万","十万","百万","千万","亿"}
        if(idx<tAry.length)
           return tAry[idx];
       return "";
    }
    </script>
    <form name="pc_shenqing" method="post" action="pc_shenqing_do.asp">
    <div>
        <dl>
            <table width="600" border="0" cellpadding="0" cellspacing="0">
            <dt>以下均为必填项：</dt>
            <dd>部    门：<input type="text" name="bm" class="text" /></dd>
            <dd>报帐人：<input type="text" name="username" class="text" /></dd>
            <dd>送达日期：<input type="text" name="sq_date" class="text" /></dd>
            <dd>事由1：<input type="text" name="sy01" class="text" />￥：<input type="text" name="je" onchange="SumFun();" class="text" /></dd>
            <dd>事由2：<input type="text" name="sy02" class="text" />￥：<input type="text" name="je" onchange="SumFun();"  class="text" /></dd>
            <dd>事由3：<input type="text" name="sy03" class="text" />￥：<input type="text" name="je" onchange="SumFun();"  class="text" /></dd>
            <dd>事由4：<input type="text" name="sy04" class="text" />￥：<input type="text" name="je" onchange="SumFun();"  class="text" /></dd>
            <dd id="Total">合计(大写)：￥：{$Total}</dd>
            <dd>备注：<input type="text" name="bz" class="text" /></dd>
            </table>
            <dd><input type="submit" value="提交" name="send"  class="submit" /></dd>
        </dl>
        </table>
    </div>
    </form>

[ 本帖最后由 yms123 于 2011-7-7 14:17 编辑 ]

2011-07-07 14:16