<%
id = request (id)
Jika permintaan (tindakan) = perbarui lalu
Set RS = Server.CreateObject (ADODB.Recordset)
sqltext = pilih * dari 表 where 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
Setel RS = tidak ada
response.redirect 转向页 .asp
akhiri jika
%>