<%
ID = Anfrage (ID)
Wenn Anfrage (Aktion) = Update dann
Setzen Sie rs = server.createObject (adodb.Recordset)
SQLTEXT = SELECT * von 表 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_leisixun) = request.form (x_leisixun)
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
Setzen Sie Rs = nichts
Antwort.Redirect 转向页 .asp
Ende wenn
%>