¿Cómo hacer un asp de envío de formulario de clasificación?

lt; form name="form1" método="post" action="#"gt

lt;

lt; valor de opción="pc"gt;/optiongt;

lt; valor de opción="tongxun"gt;/optiongt; > lt;opción valor="bangong"gt;officelt;/optiongt;

lt;opción valor="bangong"gt;officelt;/optiongt;

lt;opción valor= " shuma"gt;productos digitaleslt;

lt;/selectgt;

lt;/formgt;

lt;/formgt;

lt;

dim conn, connstr, db, rs

db="data.mdb" 'Su base de datos

connstr = " Proveedor =Microsoft.Jet.OLEDB.4.0; fuente de datos=" amp; Server.MapPath(db)

set conn=server .createobject("ADODB.CONNECTION")

conn. abra connstr

gt;

lt;

zl=request.form("zhonglei")

sql=" seleccione * de "amp; zl

set rs=server.createobject("adodb.recordset")

rs.open sql, conn, 1, 3

rs . Addnew

......'El siguiente código se ha agregado a la base de datos

gt;

El siguiente código se ha agregado a la base de datos.