asp的一个问题 很容易 可是我不懂 求解

代码:

<%
Dim db,varyxnc,varyxjf,StrSql,newyxjf,xxyxjf,sql
set db=Server.Createobject("ADODB.Connection") 
db.Open "DBQ="&Server.Mappath("#cj.asp")&";DRIVER={Microsoft Access Driver (*.mdb)};" 
varyxnc=Request("xyxnc")
varyxjf=Request("xyxjf")
sql="select yxjf from cj where yxnc='"&varyxnc&"'"
xxyxjf=db.execute(sql)
newyxjf=varyxnc+xxyxjf
StrSql="UPDATE cj set yxjf='"&newyxjf&"' where yxnc='"&varyxnc&"'"
db.execute(strSql)
Response.Redirect "cj.asp"
%>

这个代码有问题 可以要怎么改才可以用啊?