<%@ Language=VBScript %> Essential Elements of Digital Portfolios
[ISTE Home] presents ASSESSMENT &
TECHNOLOGY FORUM
<% ' get session info project_id = Request.QueryString("p") project_sql = "SELECT * FROM project WHERE project_id=" & project_id & " ORDER by record_id DESC" set project_info = db.execute(project_sql) cur_purpose = project_info("purpose").value cur_audience = project_info("audience").value cur_tech = project_info("technology").value cur_people = project_info("num_people").value cur_time = project_info("time_needed").value cur_access = project_info("equip_access").value cur_culture = project_info("culture").value cur_assessment = project_info("assessment").value cur_tech_story = project_info("tech_story").value cur_web = project_info("website").value cur_accept = project_info("accepted").value cur_title = project_info("title").value cur_org = project_info("organization").value Response.Write("

") Response.Write("Essential Elements") Response.Write("
") Response.Write(cur_title) Response.Write("
") Response.Write(cur_org) Response.Write("

") %>

Presenters at the 2002 ISTE Technology and Assessment Forum were asked to describe what it takes to put a digital portfolio system in place. In the table below, you can read how the presenters described the "essential elements" of their digital portfolio work.

You can return to the Gallery Walk menu to learn about other projects.

<% Response.Write("

") Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) if cur_tech_story <> 0 then Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) end if Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("") Response.Write("" & vbNewLine) Response.Write("" & vbNewLine) Response.Write("
" & vbNewLine) Response.Write("Web site:" & cur_web & "
" & vbNewLine) Response.Write("Tech Story:") Response.Write("") Response.Write("Click here to learn about the portfolio from a student's or teacher's perspective.
" & vbNewLine) Response.Write("Purpose:") Response.Write("
What purpose does your portfolio serve? ") ' Repsonse.Write("What skills, knowledge, or standards does the learner demonstrate through this portfolio?") Response.Write("		" & vbNewLine) Response.Write(cur_purpose) Response.Write("
" & vbNewLine) Response.Write("Who is the audience for this portfolio?" & vbNewLine) Response.Write(cur_audience) Response.Write("
" & vbNewLine) Response.Write("What technology is used?" & vbNewLine) Response.Write(cur_tech) Response.Write("
" & vbNewLine) Response.Write("Approximately how many people are currently using this system?" & vbNewLine) Response.Write(cur_people) Response.Write("
" & vbNewLine) Response.Write("How are the portfolios assessed?" & vbNewLine) Response.Write(cur_assessment) Response.Write("
" & vbNewLine) Response.Write("How much time does it take to assemble a portfolio?" & vbNewLine) Response.Write(cur_time) Response.Write("
" & vbNewLine) Response.Write("How do students gain access to the technology?") ' Response.Write("
Please describe how you have arranged your equipment, including both computer workstations ") ' Response.Write("(e.g., computer labs, dedicated portfolio stations) and multimedia equipment (e.g., scanners, digital cameras).		" & vbNewLine) Response.Write(cur_access) Response.Write("
" & vbNewLine) Response.Write("What makes the portfolio valued and valuable to your school?" & vbNewLine) Response.Write(cur_culture) Response.Write("
" & vbNewLine) %>