<%@LANGUAGE="VBSCRIPT"%>
<%
Dim rsFaculty__MMColParam
rsFaculty__MMColParam = "1"
If (Request.QueryString("pick") <> "") Then
rsFaculty__MMColParam = Request.QueryString("pick")
End If
%>
<%
Dim rsFaculty
Dim rsFaculty_numRows
Set rsFaculty = Server.CreateObject("ADODB.Recordset")
rsFaculty.ActiveConnection = MM_conSCC_STRING
rsFaculty.Source = "SELECT * FROM faculty WHERE ID = " + Replace(rsFaculty__MMColParam, "'", "''") + " ORDER BY Last_Name ASC"
rsFaculty.CursorType = 0
rsFaculty.CursorLocation = 2
rsFaculty.LockType = 1
rsFaculty.Open()
rsFaculty_numRows = 0
%>
SCC - Early Childhood
