0001: <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
0002: 
0003: <!--#include file="include/constants.inc"-->
0004: <!--#include FILE="include/adovbs.inc" -->
0005: 
0006: <%
0007: 	ID = Trim(Request.QueryString("id"))
0008: 	
0009: 	Set cn = Server.CreateObject("ADODB.Connection")
0010: 	cn.Open Conn
0011: 	sqlString = "DELETE FROM mmConfig WHERE ID = " & ID
0012: 	cn.Execute sqlString, lngRecs, adCmdText + adExecuteRecords	
0013: 	cn.Close
0014: 	Set cn = Nothing
0015: 	
0016: 	Response.Redirect("mmConfig_Maint.asp")		
0017: %>