<!--#INCLUDE FILE="odbc_connection.asp"-->
<%
'首先获取传过来的记录编号id
Dim myselect_id
myselect_id=Request.Form("myselect")
'然后删除其中的空格
myselect_id=Replace(myselect_id," ","")
'下面组织Delete语句,条件为传过来的记录编号
strSql ="Delete From kfgl where kfgldl in ('" & myselect_id & "')"
Response.Write strSql
'执行删除操作,执行完毕后返回首页
db.Execute(strSql)
Response.Redirect "scyh1.asp"
%>