|
|
| |
<%
on error resume next
strNewsId = Request.QueryString("newsId")
filePath ="db/optiquemks1.mdb"
'filePath ="..db/brainwise.mdb"
Set con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &server.MapPath(filePath)
SET rsTemp = Server.CreateObject("ADODB.Recordset")
rsTemp.Open "select * from news where newsId="&strNewsId,con,3,3
strNewsId=rsTemp("NewsId")
strTitle=rsTemp("newsTitle")
strTitle1=rsTemp("newsTitle1")
strDescription1=rsTemp("newsDes1")
strDescription2=rsTemp("newsDes2")
strDescription3=rsTemp("newsDes3")
strDescription4=rsTemp("newsDes4")
strContributor=rsTemp("contributor")
strAuthor=rsTemp("editor")
strdate=rsTemp("newsDate")
%>
|
<%=strTitle%>
<%=strTitle1%>
|
| Edited
by:
<%=strDescription1%> |
| ISBN:
<%=strDescription2%> |
| Year
of Pub:
<%=strDate%> |
| Price:
Rs.<%=strDescription3%> |
|
|
|
Description
:<%=strDescription4%>
|
<%
if strContributor<>"" then
%>
|
Contributors
:
<%=strContributor%>
|
<%
end if
%>
|
Editor :
<%=strAuthor%>
|
|
|
|
|
