%@LANGUAGE="JAVASCRIPT"%>
<%
var Recordset1 = Server.CreateObject("ADODB.Recordset");
Recordset1.ActiveConnection = MM_IngaDesign_STRING;
Recordset1.Source = "SELECT * FROM Watercolours ORDER BY Number DESC";
Recordset1.CursorType = 0;
Recordset1.CursorLocation = 2;
Recordset1.LockType = 3;
Recordset1.Open();
var Recordset1_numRows = 0;
%>
<%
var Repeat1__numRows = 2;
var Repeat1__index = 0;
Recordset1_numRows += Repeat1__numRows;
%>
<%
// *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
// set the record count
var Recordset1_total = Recordset1.RecordCount;
// set the number of rows displayed on this page
if (Recordset1_numRows < 0) { // if repeat region set to all records
Recordset1_numRows = Recordset1_total;
} else if (Recordset1_numRows == 0) { // if no repeat regions
Recordset1_numRows = 1;
}
// set the first and last displayed record
var Recordset1_first = 1;
var Recordset1_last = Recordset1_first + Recordset1_numRows - 1;
// if we have the correct record count, check the other stats
if (Recordset1_total != -1) {
Recordset1_numRows = Math.min(Recordset1_numRows, Recordset1_total);
Recordset1_first = Math.min(Recordset1_first, Recordset1_total);
Recordset1_last = Math.min(Recordset1_last, Recordset1_total);
}
%>
<% var MM_paramName = ""; %>
<%
// *** Move To Record and Go To Record: declare variables
var MM_rs = Recordset1;
var MM_rsCount = Recordset1_total;
var MM_size = Recordset1_numRows;
var MM_uniqueCol = "";
MM_paramName = "";
var MM_offset = 0;
var MM_atTotal = false;
var MM_paramIsDefined = (MM_paramName != "" && String(Request(MM_paramName)) != "undefined");
%>
<%
// *** Move To Record: handle 'index' or 'offset' parameter
if (!MM_paramIsDefined && MM_rsCount != 0) {
// use index parameter if defined, otherwise use offset parameter
r = String(Request("index"));
if (r == "undefined") r = String(Request("offset"));
if (r && r != "undefined") MM_offset = parseInt(r);
// if we have a record count, check if we are past the end of the recordset
if (MM_rsCount != -1) {
if (MM_offset >= MM_rsCount || MM_offset == -1) { // past end or move last
if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region
MM_offset = MM_rsCount - (MM_rsCount % MM_size);
} else {
MM_offset = MM_rsCount - MM_size;
}
}
}
// move the cursor to the selected record
for (var i=0; !MM_rs.EOF && (i < MM_offset || MM_offset == -1); i++) {
MM_rs.MoveNext();
}
if (MM_rs.EOF) MM_offset = i; // set MM_offset to the last possible record
}
%>
<%
// *** Move To Record: if we dont know the record count, check the display range
if (MM_rsCount == -1) {
// walk to the end of the display range for this page
for (var i=MM_offset; !MM_rs.EOF && (MM_size < 0 || i < MM_offset + MM_size); i++) {
MM_rs.MoveNext();
}
// if we walked off the end of the recordset, set MM_rsCount and MM_size
if (MM_rs.EOF) {
MM_rsCount = i;
if (MM_size < 0 || MM_size > MM_rsCount) MM_size = MM_rsCount;
}
// if we walked off the end, set the offset based on page size
if (MM_rs.EOF && !MM_paramIsDefined) {
if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region
MM_offset = MM_rsCount - (MM_rsCount % MM_size);
} else {
MM_offset = MM_rsCount - MM_size;
}
}
// reset the cursor to the beginning
if (MM_rs.CursorType > 0) {
if (!MM_rs.BOF) MM_rs.MoveFirst();
} else {
MM_rs.Requery();
}
// move the cursor to the selected record
for (var i=0; !MM_rs.EOF && i < MM_offset; i++) {
MM_rs.MoveNext();
}
}
%>
<%
// *** Move To Record: update recordset stats
// set the first and last displayed record
Recordset1_first = MM_offset + 1;
Recordset1_last = MM_offset + MM_size;
if (MM_rsCount != -1) {
Recordset1_first = Math.min(Recordset1_first, MM_rsCount);
Recordset1_last = Math.min(Recordset1_last, MM_rsCount);
}
// set the boolean used by hide region to check if we are on the last record
MM_atTotal = (MM_rsCount != -1 && MM_offset + MM_size >= MM_rsCount);
%>
<%
// *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters
// create the list of parameters which should not be maintained
var MM_removeList = "&index=";
if (MM_paramName != "") MM_removeList += "&" + MM_paramName.toLowerCase() + "=";
var MM_keepURL="",MM_keepForm="",MM_keepBoth="",MM_keepNone="";
// add the URL parameters to the MM_keepURL string
for (var items=new Enumerator(Request.QueryString); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepURL += "&" + items.item() + "=" + Server.URLencode(Request.QueryString(items.item()));
}
}
// add the Form variables to the MM_keepForm string
for (var items=new Enumerator(Request.Form); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepForm += "&" + items.item() + "=" + Server.URLencode(Request.Form(items.item()));
}
}
// create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL + MM_keepForm;
if (MM_keepBoth.length > 0) MM_keepBoth = MM_keepBoth.substring(1);
if (MM_keepURL.length > 0) MM_keepURL = MM_keepURL.substring(1);
if (MM_keepForm.length > 0) MM_keepForm = MM_keepForm.substring(1);
%>
<%
// *** Move To Record: set the strings for the first, last, next, and previous links
var MM_moveFirst="",MM_moveLast="",MM_moveNext="",MM_movePrev="";
var MM_keepMove = MM_keepBoth; // keep both Form and URL parameters for moves
var MM_moveParam = "index";
// if the page has a repeated region, remove 'offset' from the maintained parameters
if (MM_size > 1) {
MM_moveParam = "offset";
if (MM_keepMove.length > 0) {
params = MM_keepMove.split("&");
MM_keepMove = "";
for (var i=0; i < params.length; i++) {
var nextItem = params[i].substring(0,params[i].indexOf("="));
if (nextItem.toLowerCase() != MM_moveParam) {
MM_keepMove += "&" + params[i];
}
}
if (MM_keepMove.length > 0) MM_keepMove = MM_keepMove.substring(1);
}
}
// set the strings for the move to links
if (MM_keepMove.length > 0) MM_keepMove += "&";
var urlStr = Request.ServerVariables("URL") + "?" + MM_keepMove + MM_moveParam + "=";
MM_moveFirst = urlStr + "0";
MM_moveLast = urlStr + "-1";
MM_moveNext = urlStr + (MM_offset + MM_size);
MM_movePrev = urlStr + Math.max(MM_offset - MM_size,0);
%>
Inga's Design. Silk paintings.
|
|
|
|
<% while ((Repeat1__numRows-- != 0) && (!Recordset1.EOF)) { %>
" onMouseDown="MM_openBrWindow('zoom1-W.asp?<%= MM_keepNone + ((MM_keepNone!="")?"&":"") + "Number=" + Recordset1.Fields.Item("Number").Value %>','Zoom','width=430,height=480,top=0,left=0')" border="0"> |
" onMouseDown="MM_openBrWindow('zoom2-W.asp?<%= MM_keepNone + ((MM_keepNone!="")?"&":"") + "Number=" + Recordset1.Fields.Item("Number").Value %>','Zoom','width=430,height=480,top=0,left=0')" border="0"> |
" onMouseDown="MM_openBrWindow('zoom3-W.asp?<%= MM_keepNone + ((MM_keepNone!="")?"&":"") + "Number=" + Recordset1.Fields.Item("Number").Value %>','Zoom','width=430,height=480,top=0,left=0')" border="0"> |
" onMouseDown="MM_openBrWindow('zoom4-W.asp?<%= MM_keepNone + ((MM_keepNone!="")?"&":"") + "Number=" + Recordset1.Fields.Item("Number").Value %>','Zoom','width=430,height=480,top=0,left=0')" border="0"> |
<%=(Recordset1.Fields.Item("Title1").Value)%> |
<%=(Recordset1.Fields.Item("Title2").Value)%> |
<%=(Recordset1.Fields.Item("Title3").Value)%> |
<%=(Recordset1.Fields.Item("Title4").Value)%> |
<%=(Recordset1.Fields.Item("Description1").Value)%> |
<%=(Recordset1.Fields.Item("Description2").Value)%> |
<%=(Recordset1.Fields.Item("Description3").Value)%> |
<%=(Recordset1.Fields.Item("Description4").Value)%> |
<%=(Recordset1.Fields.Item("Format1").Value)%> |
<%=(Recordset1.Fields.Item("Format2").Value)%> |
<%=(Recordset1.Fields.Item("Format3").Value)%> |
<%=(Recordset1.Fields.Item("Format4").Value)%> |
|
|
|
|
<%
Repeat1__index++;
Recordset1.MoveNext();
}
%>
This
page and all the images on it are © Copyright 2002 Inga and SpiderWeb
France™. All Rights Reserved. You may download these images for use
only on a single web site for non-commercial purposes but not otherwise
and you may not use or distribute these photographic images in any
other fashion nor use or distribute them in any other manner or media
whatsoever nor may you alter, modify, disassemble or prepare any derivative
work using any of these photographic images without the prior, express
and written approval of Inga and SpiderWeb France™. When you use them
on your web site, you must give credit as follows: © Copyright 2002
Inga Ropsa. All Rights Reserved. Used by permission of SpiderWeb France™.
All rights to these images are reserved by Inga Ropsa and SpiderWeb
France™ and you must include a link back to this site along with an
e-mail note to us saying you've used them. You may not create a link
to any of these images. THESE IMAGES ARE PROVIDED WITHOUT WARRANTY
ON AN "AS IS" BASIS.SpiderWeb™ DESIGN AND Inga Ropsa SHALL NOT BE
LIABLE FOR ANY DAMAGES OF ANY SORT ARISING OUT OF THE USE OR INABILITY
TO USE THESE IMAGES. |
|
|
|
|
|
|
<%
Recordset1.Close();
%>