<%'============================================================ ' Copyright 2007-09 燃点真情. All Rights Reserved. ' Last Update: 2008-3-22 13:28 ' ADD:wap.nowtx.cn ' E-Mail: xivn@163.com QQ:531233814 '============================================================ %>

<%dim yibi,Action yibi=Trim(Request.form("yibi")) IF Request.QueryString("Action")="save" Then if yibi="" then Response.Write "存款数量不能为空!
" Response.Write "社区银行
" Response.Write "
我的空间
" Response.Write "社区首页
" Response.Write "

" response.end End if yibi = abs(int(yibi)) if myjb < yibi then Response.Write ""&getcent&"不足!不能为你服务!
" Response.Write "社区银行
" Response.Write "
我的空间
" Response.Write "社区首页
" Response.Write "

" response.end End if conn.execute("update Users Set bank = bank + "&yibi&" where ID="&myid) conn.execute("update Users Set myjb = myjb - "&yibi&" where ID="&myid) Response.write "存款成功,你已成功存入"&yibi&getcent&"!" else Response.Write "当天存取不计利息:" Response.Write "
输入存款易币数量:" Response.Write "
" Response.Write "
下一步" Response.Write "" Response.Write "" response.write "
您自带"&getcent&""&myjb&"" end if Response.Write "
社区银行" Response.Write "
我的空间
" Response.Write "社区首页
" Response.Write "

" %>