<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_AgrippaLightbox_STRING Recordset1.Source = "SELECT * FROM Table1 ORDER BY ID" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> The Agrippa Files » Small Edition

Agrippa» Virtual Lightbox

Select items to be viewed in the Virtual Lightbox. The Virtual Lightbox (developed by Maryland Institute for Technology in the Humanities (MITH) for used on this site under the GNU General Public License) is a browser-based Java tool for studying, juxtaposing, comparing, and resizing multiple images as if arranging slides on a “lightbox.” Users can also populate the lightbox with images from their own hard drives. Requires Sun Java™ runtime environment 1.3+ plug-in.

Select Items to View in Lightbox (max. 10 items)

<% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %>
  " /> <%=(Recordset1.Fields.Item("Filename").Value)%>" target="2"><%=(Recordset1.Fields.Item("Description").Value)%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %>


<% Recordset1.Close() Set Recordset1 = Nothing %>