<％
id =請求（id）
如果請求（操作）=更新然後
設置RS = Server.CreateObject（adodb.RecordSet）
sqlText = select *從表中id =＆id
Rs.open SqlText，Conn，1,3
rs（x_name）= request.form（x_name）
rs（x_biaojia）= request.form（x_biaojia）
rs（x_leixun）= request.form（x_leixun）
rs（x_shijian）= request.form（x_shijian）
rs（x_shuoming）= request.form（x_shuoming）
rs（x_jingdian）= request.form（x_jingdian）
rs（x_anpai）= request.form（x_anpai）
rs（x_zhushi）= request.form（x_zhushi）
Rs.update
Rs.Close
設置Rs =沒有
響應。redirect轉向頁.asp
如果結束
％>