<% set rs=Server.CreateObject("ADODB.RECORDSET") rs.open "select * from stock where stockid=" & request("ipo"),conn,3,2 rs("totalshares") = clng(rs("totalshares")) + clng(request("totalshares")) rs("currentprice") = (cdbl(rs("currentprice")) + cdbl(request("pricepershare"))) / 2 rs.update Response.Redirect("muchostock.asp") %>