|
#2
hxfly2008-05-01 10:57
|
在ASP页面上如何进行运算呢/?
我在数据库时有几个字段.每次都要添加值进去,然后让他们相加.放在数据库里.请问如何实现呀??
我知道要先从数据库里提出数据然后和新的数据相加,再放入数据库,高手帮忙,怎么办呀??
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="file:///E|/mybbs/swd/conn_fj16.asp" -->
<!--#include file="file:///E|/mybbs/swd/admin_qx.asp" -->
<%
set conn=server.createobject("adodb.connection")
DSNtemp = "Driver={Microsoft Access Driver (*.mdb)};"
DSNtemp = DSNtemp & "DBQ=" & server.mappath("/swd/date/student.mdb")
conn.open DSNtemp
%>
<%
xingming=trim(request("xingming"))
zzgzdf=trim(request("zzgzdf"))
zzgzkf=trim(request("zzgzdf"))
glgzdf=trim(request("glgzdf"))
glgzkf=trim(request("glgzkf"))
jxgzdf=trim(request("jxgzdf"))
jxgzkf=trim(request("jxgzkf"))
sql="select * from lhgl where xingming like '"+xingming+"' "
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,2
rs("zzgzdf")=csng(rs("zzgzdf"))+csng(zzgzdf)
'response.write rs("zzgzdf")
'response.end
rs("zzgzkf")=csng(rs("zzgzkf"))+csng(zzgzkf)
rs("glgzdf")=csng(rs("glgzdf"))+csng(glgzdf)
rs("glgzkf")=csng(rs("glgzkf"))+csng(glgzkf)
rs("jxgzdf")=csng(rs("jxgzdf"))+csng(jxgzdf)
rs("jxgzkf")=csng(rs("jxgzkf"))+csng(jxgzkf)
rs.update
response.Write "<script language=javascript>{window.alert('数据添加成功!请点击“确定”继续添加 ');window.location.href='lhdf_add.asp';}</script>"
setrs(rs)
%>
[[it] 本帖最后由 peiyanjian 于 2008-5-3 21:51 编辑 [/it]]
