%@LANGUAGE="VBSCRIPT"%>
<%
Dim ParaviewPress
Dim ParaviewPress_numRows
Set ParaviewPress = Server.CreateObject("ADODB.Recordset")
ParaviewPress.ActiveConnection = MM_Paraviewdb_STRING
ParaviewPress.Source = "SELECT Author1LastName, Author1FirstName, ISBN, Title, PublishersCatalogPage, DateNew, eBook FROM DOIdata WHERE Imprint='paraview press' ORDER BY Author1LastName"
ParaviewPress.CursorType = 0
ParaviewPress.CursorLocation = 2
ParaviewPress.LockType = 1
ParaviewPress.Open()
ParaviewPress_numRows = 0
%>
<%
Dim SpecialEditions
Dim SpecialEditions_numRows
Set SpecialEditions = Server.CreateObject("ADODB.Recordset")
SpecialEditions.ActiveConnection = MM_Paraviewdb_STRING
SpecialEditions.Source = "SELECT Author1LastName, Author1FirstName, Title, ISBN, PublishersCatalogPage, DateNew, eBook FROM DOIdata WHERE Imprint='paraview special editions' ORDER BY Author1LastName"
SpecialEditions.CursorType = 0
SpecialEditions.CursorLocation = 2
SpecialEditions.LockType = 1
SpecialEditions.Open()
SpecialEditions_numRows = 0
%>
<%
Dim PocketBooks
Dim PocketBooks_numRows
Set PocketBooks = Server.CreateObject("ADODB.Recordset")
PocketBooks.ActiveConnection = MM_Paraviewdb_STRING
PocketBooks.Source = "SELECT Author1LastName, Author1FirstName, Title, ISBN, PublishersCatalogPage, DateNew, eBook FROM DOIdata WHERE Imprint='paraview pocket books' ORDER BY Author1LastName"
PocketBooks.CursorType = 0
PocketBooks.CursorLocation = 2
PocketBooks.LockType = 1
PocketBooks.Open()
PocketBooks_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
ParaviewPress_numRows = ParaviewPress_numRows + Repeat1__numRows
%>
<%
Dim Repeat2__numRows
Dim Repeat2__index
Repeat2__numRows = -1
Repeat2__index = 0
SpecialEditions_numRows = SpecialEditions_numRows + Repeat2__numRows
%>
<%
Dim Repeat3__numRows
Dim Repeat3__index
Repeat3__numRows = -1
Repeat3__index = 0
PocketBooks_numRows = PocketBooks_numRows + Repeat3__numRows
%>
Paraview Press and Paraview Special Editions Booklist
Between 2000-2004 Paraview was a leader in using print-on-demand technology to publish original books and reprints. These works continue to be available (see list below) for ordering at all bookstores. Booksellers can place bulk orders for Paraview Press and Paraview Special Editions titles here or through our distributors . Since 2005, a sister company, Cosimo Books , has been publishing related print-on-demand works.
AUTHOR
TITLE
ISBN NO.
<%
While ((Repeat1__numRows <> 0) AND (NOT ParaviewPress.EOF))
%>
<%=(ParaviewPress.Fields.Item("Author1LastName").Value)%>, <%=(ParaviewPress.Fields.Item("Author1FirstName").Value)%>
"><%=(ParaviewPress.Fields.Item("Title").Value)%> <%
DIM strDate, strNew
strDate = (ParaviewPress.Fields.Item("DateNew").Value)
strNew = Date()
IF (DateDiff("d", Date(), strDate) >= -90) THEN
strNew = response.write (" ")
END IF%>
<%
DIM strEbook, strNew4
strEbook= (ParaviewPress.Fields.Item("eBook").Value)
IF (strEbook >= -90) THEN
strNew = response.write ("*")
END IF%>
<%=(ParaviewPress.Fields.Item("ISBN").Value)%>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
ParaviewPress.MoveNext()
Wend
%>
AUTHOR
TITLE
ISBN NO.
<%
While ((Repeat2__numRows <> 0) AND (NOT SpecialEditions.EOF))
%>
<%=(SpecialEditions.Fields.Item("Author1LastName").Value)%>, <%=(SpecialEditions.Fields.Item("Author1FirstName").Value)%>
"><%=(SpecialEditions.Fields.Item("Title").Value)%> <%
strDate = (SpecialEditions.Fields.Item("DateNew").Value)
strNew= Date()
IF (DateDiff("d", Date(), strDate) >= -90) THEN
strNew = response.write (" ")
END IF%>
<%
DIM strEbook1, strNew5
strEbook1= (SpecialEditions.Fields.Item("eBook").Value)
IF (strEbook1 >= -90) THEN
strNew5 = response.write ("*")
END IF%>
<%=(SpecialEditions.Fields.Item("ISBN").Value)%>
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
SpecialEditions.MoveNext()
Wend
%>
* indicates title also available
as an e-Book
<%
ParaviewPress.Close()
Set ParaviewPress = Nothing
%>
<%
SpecialEditions.Close()
Set SpecialEditions = Nothing
%>
<%
PocketBooks.Close()
Set PocketBooks = Nothing
%>