这段代码是删除选中的一条或多条数据，怎样才能改成修改选中的数据中的ca01字段，使字段里的1变为2呢。

<%dim selectm,selectbookid
selectm=trim(request("selectm"))
'//删除文件
if selectm="" then
selectm=request.QueryString("selectm")
end if
selectbookid=request("selectbookid")
nclassid=request("nclassid")
if selectbookid<>"" then
conn.execute "delete from news where id in ("&selectbookid&")"
response.Redirect "manage.asp"
response.End
end if
%>