Our website is currently being re-designed. For information please visit www.moufflon.com.cy or contact us

vMoufflon Publications vvvvvvvvvvvvvvvvvvvvvvv vvvvvvvvvvvvvvvvvvvEmail us

Book Details

<% 'Dimension variables Dim adoCon 'Holds the Database Connection Object Dim rsGuestbook 'Holds the recordset for the records in the database Dim strSQL 'Holds the SQL query to query the database 'Create an ADO connection object Set adoCon = Server.CreateObject("ADODB.Connection") 'Set an active connection to the Connection object using a DSN-less connection adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("/fpdb/books.mdb") 'Set an active connection to the Connection object using DSN connection 'adoCon.Open "DSN=books" 'Create an ADO recordset object Set rsbooks = Server.CreateObject("ADODB.Recordset") 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT * FROM publications WHERE ID=" & Request("ID") 'Open the recordset with the SQL query rsbooks.Open strSQL, adoCon 'Write the HTML to display the current record in the recordset %>
" hspace="5" vspace="7" border="1" align="left"> Title: <% Response.Write (rsbooks("title"))%>
Author: <% Response.Write (rsbooks("author"))%>
Publisher: <% Response.Write (rsbooks("publisher"))%>
Year: <% Response.Write (rsbooks("year"))%>
Series: <% Response.Write (rsbooks("series"))%>
Edition: <% Response.Write (rsbooks("edition"))%>
Size: <% Response.Write (rsbooks("size"))%>
ISBN: <% Response.Write (rsbooks("isbn"))%>
Languages: <% Response.Write (rsbooks("language"))%>
pp: <% Response.Write (rsbooks("pp"))%>
Illustrations: <% Response.Write (rsbooks("illustrations"))%>
Cover: <% Response.Write (rsbooks("cover"))%>
Price : <% Response.Write (rsbooks("price"))%>

<% Response.Write (rsbooks("summary"))%>
<% Response.Write (rsbooks("miscellany"))%>
Ordering information:
Please email us quoting book reference: <% Response.Write (rsbooks("id"))%>


<% rsbooks.Close Set rsbooks = Nothing Set adoCon = Nothing %>