电脑桌面全屏壁纸高清:ASP实现点击加分问题

连接所在文件的部分（必须）内容：
<script language="javascript">
function loadxml(str)
{
var oBao = new ActiveXObject("Microsoft.XMLHTTP");
oBao.open("POST",str,false);
oBao.send();
}
</script>
<a href="#" onClick="javascript:loadxml('jiafen.asp?id=<%=ID%>')">点击连接加分 </a>
-----------------------------------------------------------
说明：ID为点击用户的某一信息，我假设的为用户的ID号码。
-----------------------------------------------------------
jiafen.asp文件的部分内容：
<%
ID=request("ID")
dim conn,connstr,dbpath
dbpath="DB.mdb"'数据库文件名
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbpath)
conn.Open connstr
sql="select * from 用户 where ID=" & id
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,3
if not rs.eof then
rs("积分")=rs("积分")+20
end if
rs.close
set rs=nothing
%>