苏州小妹上门微信:高手帮看看这个SQL语句错在哪里？

<%if Session("weight")=0 then
Response.Redirect "error.asp?cause=4"
end if
%>
<object runat=server id=conn1 progid="adodb.connection"></object>
<%application.Lock
conn1.Open Application("p_jyzx")
Application.UnLock
%>
<%if Request("user_name")<>session("Current_user") then
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "other_note",conn1,3,2
rs.addnew
rs("user_name")=request("user_name")
rs("from_who")=session("Current_user")
rs("type")=1
'rs("other_note")=replace(Request("note"),chr(10),"<br>",1,-1,1)
rs("title")=request("title")
rs("other_note")=request("other_note")
rs("time")=now()
rs.update
sql="update user set send_letter=send_letter+1,charisma=charisma+"&Application("send_letter_value")
sql=sql&" where user_name='"&session("Current_user")&"'"
conn1.Execute(sql)
sql="update user set receive_letter=receive_letter+1,charisma=charisma+"&Application("receive_letter_value")
sql=sql&" where user_name='"&Request("user_name")&"'"
conn1.Execute(sql)
else
response.write "<Script language=javascript>alert('对不起，您不能发信给自己！');window.close();</script>"
end if
response.write "<Script language=javascript>alert('发送成功！');location='show_user.asp?user_name="&request("user_name")&"'</script>"
'Response.Redirect "show_user.asp?user_name="&request("user_name")

%>

运行后总是提示：

Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14'

[Microsoft][ODBC Microsoft Access Driver] 语法错误 (操作符丢失) 在查询表达式 'charisma+' 中。

/show_note.asp，行 24

请问如何解决？谢谢！