<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim PlaceOrder__a1
PlaceOrder__a1 = "1"
If (Request.querystring("isbn") <> "") Then
PlaceOrder__a1 = Request.querystring("isbn")
End If
%>
<%
Dim PlaceOrder
Dim PlaceOrder_numRows
Set PlaceOrder = Server.CreateObject("ADODB.Recordset")
PlaceOrder.ActiveConnection = MM_RitanaBooks_STRING
PlaceOrder.Source = "SELECT * FROM RitanaBooks WHERE ISBN='" + Replace(PlaceOrder__a1, "'", "''") + "' "
PlaceOrder.CursorType = 0
PlaceOrder.CursorLocation = 2
PlaceOrder.LockType = 1
PlaceOrder.Open()
PlaceOrder_numRows = 0
%>
Ritana Books
‡
Library Supplier ‡
Ritana Books can supply the requirement of Libraries / Institutions / Individuals
of Books in India and Abroad. Please send your requirement giving following
details. And we shall supply the books soonest.
