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: 	GroupID = Session("DraftGroupID")
0010: 	RegNumber = Session("DraftRegNumber")
0011: 	
0012: 
0013: 
0014: 			Set rs = Server.CreateObject("ADODB.Recordset")
0015: 
0016:     		sqlString = "SELECT * FROM mmdraftpicks WHERE ID = " & ID
0017: 							
0018: 			rs.Open sqlString, conn, adOpenDynamic, adLockOptimistic, adCmdText
0019: 
0020: 			rs("PickNumber").Value = 0
0021: 			rs("RegNumber").Value = "0"
0022: 
0023: 			rs.Update
0024: 
0025: '			Response.Redirect("DraftSelectPicks.asp?GroupID=" & GroupID & "&PickRegNumber=" & PickRegNumber)
0026: 
0027: 	
0028: Response.Redirect("DraftSelectPicks.asp?GroupID=" & GroupID & "&PickRegNumber=" & RegNumber)
0029: %>