<%@ Language=VBScript%>
<%Response.Buffer = True%>
<%
'***************************************************
'Author: Bennett Giesler
'Date: 3-30-2006
'
'Description: This asp program allows the administrator to select multiple committees and change their date value with one easy click
'
' * Displays all committees with a checkbox next to their name
' * To change the date the user needs to select all the committees they want to change
' * Then simply enter in a new Start Nom, End Nom, Vote Start, and Vote End Date
' * It also lists the committees with alternating table colors to make it easier to read.
'***************************************************
%>
NVS Admin - Mass Date Change
<% Title = "Mass Date Change" %>
<%
' Lets list all of the committees.
Dim strSQL
Dim commname
strSQL = "SELECT COMID, COMNAME, STARTNOM, ENDNOM, STARTVOTE, ENDVOTE"
strSQL = strSQL + " FROM COMM1"
strSQL = strSQL + " ORDER BY COMNAME"
'response.write strSQL
dbNVS.Open
set myRS = Server.CreateObject("ADODB.Recordset")
myRS.ActiveConnection = dbNVS
myRS.Open strSQL, dbNVS
%>