📄 bookpre_detail.asp

📁 书店的管理系统。不错的一个源程序。提供给大家。
💻 ASP
字号:
<%@ Language=VBScript %>
<!--#INCLUDE FILE="query/BaseFun.asp"-->

<%
id =Request.QueryString ("id")

'set con=server.createobject("ADODB.Connection")
'con.open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.MapPath("/news.mdb")

set con=server.createobject("ADODB.Connection")
con.open Application("str_con")

set res=server.createobject("ADODB.Recordset")
set res.ActiveConnection = con
res.source="select news_title,news_content from book_pre where id ="&id
res.cursorlocation=3
res.open ,,adOpenStatic
%>


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0034)http://168.160.212.36/xw/xw167.htm -->
<HTML><HEAD><TITLE>新华书店总店新书</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="MSHTML 5.00.2014.210" name=GENERATOR>
<STYLE type=text/css>A:link {
	FONT-SIZE: 9pt; TEXT-DECORATION: none
}
A:visited {
	FONT-SIZE: 9pt; TEXT-DECORATION: none
}
A:active {
	FONT-SIZE: 9pt; TEXT-DECORATION: none
}
A:hover {
	COLOR: red; TEXT-DECORATION: none
}
BODY {
	FONT-SIZE: 9pt
}
TABLE {
	FONT-SIZE: 9pt
}
TR {
	FONT-SIZE: 9pt
}
TD {
	FONT-SIZE: 9pt
}
</STYLE>

<SCRIPT language=JavaScript>
<!--
function MM_callJS(jsStr) { //v2.0
  return eval(jsStr)
}
//-->
</SCRIPT>
</HEAD>
<BODY aLink=#ff0000 link=#0000ff topMargin=5 vLink=#0000ff>
<DIV align=center>
<CENTER></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=700>
  <TBODY>
  <TR>
    <TD align=middle bgColor=#000000 class=chn height=1 noWrap 
width=700></TD></TR>
  <TR>
    <TD align=middle bgColor=#000000 class=chn height=1 noWrap 
width=700></TD></TR>
  <TR>
    <TD align=middle class=chn height=10 noWrap 
width=700></TD></TR></TBODY></TABLE></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=10 width=700>
  <TBODY>
  <TR bgColor=#ccccff>
    <TD width="100%"></TD></TR></TBODY></TABLE></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=452 width=700>
  <TBODY>
  <TR>
    <TD height=474 vAlign=top width="19%">
      <DIV align=center>
      <TABLE border=0 cellPadding=0 cellSpacing=0 height=450 width=1>
        <TBODY>
        <TR bgColor=#ccccff>
          <TD height="100%">&nbsp;</TD></TR></TBODY></TABLE></DIV></TD>
    <TD height=474 vAlign=top width="81%">
      <TABLE border=0 cellPadding=0 cellSpacing=0 width=556>
        <TBODY>
        <TR>
          <TD colSpan=2 height=320 vAlign=top>
            <P align=left><FONT color=#61667c></FONT>　 
            <H4 align=center><%=res("news_title")%></H4>
            <P align=left>&nbsp;&nbsp;&nbsp;&nbsp; <FONT size=2>

			<%=changeBR( res("news_content"),chr(13)+chr(10) )%>

			<%res.close
			  con.Close
			%>

            </FONT></P>
            <FORM action=../cxts/window.close() name=form1>
            <DIV align=right><FONT size=2><INPUT name=关闭窗口 onclick="MM_callJS('{javascript:window.close()}')" type=button value=关闭窗口> 
            </FONT></DIV></FORM>
            <P 
align=left>&nbsp;</P></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><BR></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=2 width=700>
  <TBODY>
  <TR>
    <TD bgColor=#cdcfd8 width="100%"></TD></TR></TBODY></TABLE></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=1 width="99%">
  <TBODY>
  <TR>
    <TD bgColor=#cdcfd8 width="100%"></TD></TR></TBODY></TABLE></CENTER></DIV>
<P align=center><FONT 
color=#cdcfd8><SPAN></SPAN>版权所有：新华书店总店<SPAN></SPAN><BR><SPAN 
style="FONT-SIZE: 9pt">新华通力图书信息技术有限公司<BR>电话：（010）68351133-2017<BR>传真：（010）88363145<BR></SPAN></FONT><FONT 
color=#b6b043><SPAN style="FONT-SIZE: 9pt">电子邮件：<A 
href="mailto:webmaster@bookbbc.com">mailto:webmaster@bookbbc.com</A></SPAN></FONT><FONT 
color=#cdcfd8><SPAN style="FONT-SIZE: 9pt"></SPAN></FONT></P></BODY></HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -