<% ' INCLUDE FILES AND VARIABLES openPage = "index.asp" 'include helper, talks to dbsupport openDB = "../access_db/sbDB.mdb" 'include helper, talks to dbsupport %> [an error occurred while processing this directive] [an error occurred while processing this directive] [an error occurred while processing this directive] <% 'OPEN DATABASE Set Conn1 = OpenDB2(openPage,openDB) %> itp wiki
Susan Buck (General ITP)
<% whichClass = request.queryString("whichClass") theDay = WeekdayName(weekday(date)) if whichClass = "" then if theDay = "domenica" then theDay = "Sunday" elseif theDay = "lunedì" then theDay = "Monday" whichClass = "narInTheRound" elseif theDay = "martedì" then theDay = "Tuesday" whichClass = "dynamicWeb" elseif theDay = "mercoledì" then theDay = "Wednesday" whichClass = "nonFicMedia" elseif theDay = "giovedì" then elseif theDay = "venerdì" then theDay = "Friday" whichClass = "digitalImaging" elseif theDay = "sabado" then theDay = "Saturday" end if end if %> <%p date()%>

Spring '07
<% if whichClass = "narInTheRound" then %> - Narrative in the Round
<% else %> - Narrative in the Round
<% end if %> <% if whichClass = "dynamicWeb" then %> - Dynamic Web Development
<% else %> - Dynamic Web Development
<% end if %> <% if whichClass = "nonFicMedia" then %> - Experimental Approaches to Non-Fiction Media
<% else %> - Experimental Approaches to Non-Fiction Media
<% end if %> <% if whichClass = "ajax" then %> - GUI Interface Design with AJAX
<% else %> - GUI Interface Design with AJAX
<% end if %> <% if whichClass = "digitalImaging" then %> - Digital Imaging: Reset
<% else %> - Digital Imaging: Reset
<% end if %>
Fall '06
<% if whichClass = "applications" then %> - Applications in Interactive Telecommunications Systems <% else %> - Applications in Interactive Telecommunications Systems <% end if %> <% if whichClass = "redGRoup" then %> - App Presentation
<% else %> - Presentation
<% end if %> <% if whichClass = "comLab" then %> - Communications Lab
<% else %> - Communications Lab
<% end if %> <% if whichClass = "compMedia" then %> - Intro to Computational Media
<% else %> - Intro to Computational Media
<% end if %> <% if whichClass = "pcomp" then %> - Intro to Physical Computing
<% else %> - Intro to Physical Computing
<% end if %>

<% 'sql = "CREATE TABLE itpNYU (theClass memo,semester memo,content memo)" 'conn1.execute(sql) 'theClass = "narInTheRound" 'semester = "spring07" 'content = "stuff" 'sql = "INSERT into itpNYU (theClass,semester,content) VALUES ('" & theClass & "','" & semester & "','" & content & "')" 'conn1.execute(sql) 'theClass = "redGroup" 'semester = "fall06" 'content = "stuff" 'theClass = "applications" 'semester = "fall06" 'content = "stuff" 'theClass = "compMedia" 'semester = "fall06" 'content = "stuff" 'theClass = "pcomp" 'semester = "fall06" 'content = "stuff" 'theClass = "general" 'semester = "fall06" 'content = "stuff" 'whichClass = request.queryString("whichClass") form = request.queryString("form") editAction = request.queryString("editAction") content1 = request.form("content") content2 = replace(content1,"'","[]") content = replace(content2,"""","[[]]") if editAction = "save" then sql = "UPDATE itpNYU set content='" & content & "' WHERE theClass='" & whichClass & "'" if Request.Cookies("user") = "susan" OR whichClass = "redGroup" then conn1.execute(sql) end if end if classTitle = whichClass select case (classTitle) case "general" classTitle = "general ITP" case "comLab" classTitle = "Communications Lab" case "applications" classTitle = "Applications in Interactive Telecommunications Systems" case "compMedia" classTitle = "Intro to Computational media" case "pcomp" classTitle = "Intro to Physical Computing" case "redGroup" classTitle = "Applications Presentation Group" case "dynamicWeb" classTitle = "Dynamic Web Development" case "nonFicMedia" classTitle = "Experimental Approaches to Non-Fiction Media" case "ajax" classTitle = "GUI Interface Design in Ajax" case "digitalImaging" classTitle = "Digital Imaging : Reset" case "narInTheRound" classTitle = "Narrative in the Round" end select if whichClass <> "" then sql = "select * from itpNYU where theClass ='" & whichClass & "'" set rs1 = conn1.execute(Sql) theClass = rs1.fields("theClass") semester = rs1.fields("semester") content1 = rs1.fields("content") content2 = replace(content1,"[[]]","""") content = replace(content2,"[]","'") %> <%p classTitle%>

view edit <% if form = "edit" then %> save save and view  <% end if%>

<% if form = "view" then %>
<%p content%>
<% elseif form = "edit" then %>

<%end if %> <% end if 'end check for class %>