<% prodCat=Request("prodCat") 'prodCat="Grammar" if prodCat="" then end if i=0 currentPage = request("currentPage") if currentPage="" or currentPage = "0" then currentPage=1 end if %> List of Abbreviations
 
-  About Us -
-  New Books -
-  Order Form -
-  Contact Us -
-  Home -
Series   Author Name  Title Books
<%=msg%> <%=" "%> <%=""%> <%=userTxt%> <%=""%> <%=""%>
  Subject Title : <%=prodCat%>

<% Response.Write("You are on Page No: ") Response.Write("") Response.Write(currentPage) Response.Write("") %>

<% DIM rowCount, i Set Con = Server.CreateObject("adodb.connection") Con.CursorLocation = 3 'Con.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=D:\webProj\rajeev\sadana\dbsadana.mdb" 'Con.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=D:\webProj\rajeev\chowkhamba\db.mdb" Con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa; password=MN#054013588;Initial Catalog=chowkhambaseries;Data Source=202.71.128.173" Con.Open, "sa","MN#054013588" Set RS=Server.CreateObject("ADODB.Recordset") RS.CursorType=adOpenStatic RS.PageSize=9 Rs.Open "SELECT * from t_bookDetails where m_title ='"&prodCat&"'" ,Con ' RS.AbsolutePage=cINT(currentPage) rowCount=1 %> <% While not RS.EOF and rowCount <= RS.PageSize if i mod 2=0 then i=i+1 %> <% else i=i+1 %> <% end if rowCount=rowCount+1 RS.MoveNext Wend %>
----- List of Abbreviations used in the Catalogue -----
C.S.S. - Chowkhamba Sanskrit series
B.S.S. - Banaras Sanskrit Series
B.A.S. - Banaras Ayurveda Series
H.S.S. - Haridas Sanskrit Series
C.S.St .- Chowkhamba Sanskrit Studies
V.V.G. - Vidya Vilasa Granthamala
C.S.G. - Chowkhamba Stotra Granthamala
K.P.G. - Krishnadas Prachyavidya Granthamala
K.S.S. - Krishnadas Sanskrit Series
Bi.S.S. - Bitthaldas Sanskrit Series
K.A.S. - Krishnadas Ayurveda Series
K.R.S. - Krishnadas Rashtrabhasa Series
K.S.St. - Krishnadas Sanskrit Studies
K.G. - Kishor Granthamala
C.A.G. - Chowkhamba Amarbharati Granthamala
Mis. - Miscellaneous