这个是错的哪错了!我找也找不到啊!!!!!!!!! <% Connstr="DBQ="+server.mappath("database/wh1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;" set conn=server.createobject("adodb.connection") conn.open Connstr sqlstr="select * from wh01 " set rs=server.CreateObject("adodb.recordset") rs.open sqlstr,conn,1,3
select case request("dan") case 1 rs("a02")=rs("a02")+1 case 2 rs("a04")=rs("a04")+1 case 3 rs("a05")=rs("a05")+1
end select rs.update
rs.close
set rs=nothing conn.close set conn=nothing response.write "<script>window.alert('恭喜你投票成功');window.location.href='piao.asp'</script>" %>