%@LANGUAGE="VBSCRIPT"%> <% Dim ROScin__MMColParam ROScin__MMColParam = "CIN" if (Request("MM_EmptyValue") <> "") then ROScin__MMColParam = Request("MM_EmptyValue") %> <% set ROScin = Server.CreateObject("ADODB.Recordset") ROScin.ActiveConnection = MM_tdfl_STRING ROScin.Source = "SELECT LastName, FirstName, POS, AcquiredDate, AcquiredVia, DraftOverall FROM RostersQuery WHERE TeamID = '" + Replace(ROScin__MMColParam, "'", "''") + "' ORDER BY LastName ASC" ROScin.CursorType = 0 ROScin.CursorLocation = 2 ROScin.LockType = 3 ROScin.Open() ROScin_numRows = 0 %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %>
![]() |
||||||||||||||||||||
|
2006 Draft
|
||||||||||||||||||||
|
TDFL focuses on drafting, trading, and gameday skills. By eschewing standard internet league extras like contracts and free agency, The Diesel Football League is the ultimate old school GM and coaching experience. Sound like your game? Then what are you waiting for? Join today! |
||||||||||||||||||||