<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <%'image app Dim imgSrc, imgAlt, brdr brdr = 0 'default image If request.QueryString("ID")="" or request.QueryString("ID")="1" Then imgSrc = "home.jpg" imgAlt = "U-M Department of English, V.3, Home" End If 'image 2 If request.QueryString("ID")="2" Then imgSrc = "ug1.jpg" imgAlt = "U-M Department of English, V.3, Undergraduate" End If 'image 3 If request.QueryString("ID")="3" Then imgSrc = "menu.jpg" imgAlt = "U-M Department of English, V.3, Drop-down Menu" End If 'image 4 If request.QueryString("ID")="4" Then imgSrc = "grad1.jpg" imgAlt = "U-M Department of English, V.3, Graduate 1" End If 'image 5 If request.QueryString("ID")="5" Then imgSrc = "grad2.jpg" imgAlt = "U-M Department of English, V.3, Graduate 2" End If 'image 6 If request.QueryString("ID")="6" Then imgSrc = "grad3.jpg" imgAlt = "U-M Department of English, V.3, Graduate 3" End If 'image 7 If request.QueryString("ID")="7" Then imgSrc = "news.jpg" imgAlt = "U-M Department of English, V.3, News & Events" End If 'image 8 If request.QueryString("ID")="8" Then imgSrc = "eventsCal.jpg" imgAlt = "U-M Department of English, V.3, Calendar" End If 'image 9 If request.QueryString("ID")="9" Then imgSrc = "media.jpg" imgAlt = "U-M Department of English, V.3, Multimedia" End If 'image 10 If request.QueryString("ID")="10" Then imgSrc = "alum.jpg" imgAlt = "U-M Department of English, V.3, Alumni" End If 'image 11 If request.QueryString("ID")="11" Then imgSrc = "programs.jpg" imgAlt = "U-M Department of English, V.3, Affiliated Programs" End If 'image 12 If request.QueryString("ID")="12" Then imgSrc = "prof1.jpg" imgAlt = "U-M Department of English, V.3, Faculty Profile 1" End If 'image 13 If request.QueryString("ID")="13" Then imgSrc = "prof2.jpg" imgAlt = "U-M Department of English, V.3, Faculty Profile 2" End If 'check for ID If request.QueryString("ID")<>"" Then 'check to make sure ID is numeric If IsNumeric(request.QueryString("ID"))=False Then 'ID isn't number response.Redirect(request.ServerVariables("URL")) End If 'end check for ID End If %> cSquared Design :: Anthony Cece <%' for studio pages adjust body style Dim bdyStyle bdyStyle="" If inStr(cstr(Request.ServerVariables("URL")),"/studio/") Then bdyStyle="id=""studioBody""" End If %> >
cSquared Design :: Anthony Cece

Selected Web Projects

Web Home:

U-M Department of English V.3—2009-Current

The University of Michigan Department of English Language and Literature has long been recognized as one of the top English departments in the nation. As one of the largest departments within the College of Literature, Science, and the Arts (LSA), English serves as an extraordinary center of creativity, inquiry, and discovery with a proud tradition of leadership in scholarship and teaching. With over eighteen thousand alumni, eight hundred active students, and nearly three hundred full-time faculty members, lecturers, and graduate student instructors, the Department offers not only opportunities for study of all aspects of English language and its literature, but also a well-developed, diverse, and active community within the University.

The Project:
Anthony has been responsible for the design, coding and administration of the Department of English website since 2000. In 2004, an improved and overhauled version (V.2) of this website was launched, and in the fall of 2009 the English site was once again given a complete update. This process involved six months of collecting feedback from users of the site, meeting with focus groups, and studying the latest trends in educational institution websites. The result: the most dramatic improvements to date.

Improvements included: a more personal and human feel to the site; streamlined navigation; complete implementation of CSS; more robust search and site tracking features; a simple, secure and more prominent user login; more flexible and robust user/content management; increased use of RSS feeds and availability of multimedia content; and an updated, cleaner, more thorough branding.

To view the English website, click here.

 

<%= imgAlt %>
<%If request.QueryString("ID")="" or request.QueryString("ID")="1" Then%> 1 <% Else %> 1 <%End If%> <%If request.QueryString("ID")="2" Then%> 2 <% Else %> 2 <%End If%> <%If request.QueryString("ID")="3" Then%> 3 <% Else %> 3 <%End If%> <%If request.QueryString("ID")="4" Then%> 4 <% Else %> 4 <%End If%> <%If request.QueryString("ID")="5" Then%> 5 <% Else %> 5 <%End If%> <%If request.QueryString("ID")="6" Then%> 6 <% Else %> 6 <%End If%> <%If request.QueryString("ID")="7" Then%> 7 <% Else %> 7 <%End If%> <%If request.QueryString("ID")="8" Then%> 8 <% Else %> 8 <%End If%> <%If request.QueryString("ID")="9" Then%> 9 <% Else %> 9 <%End If%> <%If request.QueryString("ID")="10" Then%> 10 <% Else %> 10 <%End If%> <%If request.QueryString("ID")="11" Then%> 11 <% Else %> 11 <%End If%> <%If request.QueryString("ID")="12" Then%> 12 <% Else %> 12 <%End If%> <%If request.QueryString("ID")="13" Then%> 13 <% Else %> 13 <%End If%>

U-M English Website, V.3
Technology Used:

ASP, VBScript, SQL Server 2000, Access, D/HTML, JavaScript, MooTools, CSS