<%
strQ = Request.ServerVariables("URL")
strQ = Request.ServerVariables("SERVER_NAME")
arrID=Split(strQ,".")
if ubound(arrID)>1 then
if arrID(0)="admin" and arrID(1) = "d41teachers" then
response.redirect("/teachers/admin/default.asp")
response.end
' elseif arrID(0)="www" and arrID(1) <> "d41teachers" then
' teacher=arrID(1)
elseif arrID(1)="d41teachers" then
teacher=arrID(0)
' else
' Server.Transfer("/default.asp")
' response.end
end if
'else
' Server.Transfer("/indexa.htm")
' response.end
end if
response.write teacher
if len(trim(teacher))>0 then
response.redirect ("/teachers/default.asp?t=" & teacher)
'response.write "/teachers/default.asp?t=" & teacher
'else
' response.write "NO"
end if
%>
<%
Dim dbconn
Set dbconn = Server.CreateObject("ADODB.Connection")
'dbconn.Open "dsn=web41;uid=web41;pwd=$$$d41793;DATABASE=d41"
'dbconn.Open "Provider=SQLOLEDB.1;Password=$$$d41793;Persist Security Info=True;User ID=web41;Initial Catalog=d41;Data Source=WEB41"
dbconn.Open "Driver=SQL Server;Server=WEB41;Database=d41;UID=web41;PWD=$$$d41793"
Dim SQL
%>
Counselors Corner :: Hadley Junior High School
Counselors Corner is the place to check out the Counseling services offered at Hadley Junior High School. Sharon Dunham is our 7th grade counselor, Kyle Sieck is our 8th grade counselor, Emmah Welsh is our 6th grade counselor
