⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 particular.asp

📁 实验教学系统 很好用 有学生 老师 管理等模块 便于学校使用
💻 ASP
字号:
<!--#include file="odbc_connection.asp"-->
<!--#include file="config.asp"-->
<html>
<head>
	<title>::网上书店::</title>
	<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
	<link rel="stylesheet" href="style.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" topmargin="0">
	<%
	'获取传过来的BookId
	Dim BookId
	BookId=Request.QueryString("BookId")
	%>
	<table border="0" cellpadding="0" cellspacing="0" width="657" height="80" align="center">
		<tr>
			<td width="300" align="left">
				<font size="6" face="黑体" Color="blue">网上书店</font>
			</td>
			<td align="right">
				<img border="0" src="images/adver.jpg" width="468" height="59">
			</td>
		</tr>
	</table>
	<table width="657" border="1" cellspacing="0" cellpadding="0" bordercolor="#D1DAF1" bgcolor="#D1DAF1" class="text" height="20" align="center">
		<tr align="left"> 
			<td>
				<a href="index.asp?KindId=0">首页</a>&nbsp;&nbsp;
				<%
				'下面输出类别信息
				Dim rs,strSql
				strSql="Select * From Kind Order By KindId"
				Set rs=db.Execute(strSql)
				Do While Not rs.Eof
					Response.Write "<a href='index.asp?KindId=" & rs("KindId") & "&KindName=" & rs("KindName") & "'>" & rs("KindName") & "</a>&nbsp;&nbsp;"
					rs.MoveNext
				Loop
				%>
			</td>
		</tr>
	</table>

	<br>
	<table width="657" border="0" align="center">
		<tr>
			<td width="150" valign="top">
				<table width="100%"  border="1" cellspacing="0" cellpadding="0" bordercolor="#D1DAF1" bgcolor="#FFFFFF" class="text">
				<form action="log/in.asp" method="post" name="form">
					<tr bgcolor="#D1DAF1"> 
						<td align="center">
							用户登录
						</td>
					</tr>
					<%if session("UserId")="" then%>
						<tr> 
							<td align="left">
								用户名:<input type="text" name="UserId" size="10">
								<br>密&nbsp;&nbsp;码:<input type="password" name="password" size="10">
								<p align="center"><input type="submit" value="登 录" name="button1" class="inputbutton">
								<input onclick="window.open('log/register1.asp','_self')" type="button" value="注 册" name="register" class="inputbutton" >
							</td>
						</tr>
					<%else%>
						<tr> 
							<td align="left">
								用户名:<input type="text" name="UserId" size="10" value="<%=session("UserId")%>" disabled>
								<p align="left"><a href="log/out.asp">注销</a>&nbsp;&nbsp;<a href="log/updatePWD.asp">修改密码</a>
								<p><a href="log/update.asp">修改个人信息</a>
							</td>
						</tr>
					<%end if%>
				</form>
				</table>
				<br>
				<table width="150" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" class="text">
					<tr> 
						<td align="center">
							<p>
							<a href="#"  onClick="open('shoppingcart.asp','购物车','resizable=0,scrollbars=1,status=no,toolbar=no,location=no,menu=no,width=660,height=400,left=100,top=100')"><img border="0" src="images/car.gif" width="50" height="50"></a>
						</td>
					</tr>
				</table>
			</td>

			<td  valign="top">
				<%
				'下面开始显示该书记录
				strSql="Select * From book Where BookId=" & BookId
				Set rs=db.Execute(strSql)
				%>
				<table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="#0099FF" align="center" class="text" height="74">
					<tr>
					<td height="70"> 
						<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF" class="text">
							<tr> 
								<td align="center" width="20%">
									<img src="showimage.asp?BookId=<%=rs("BookId")%>" width='67' height='87'>
								</td>
								<td align="left" >
									名称:<%=rs("bookName")%>
									<br>作者:<%=rs("bookAuthor")%>
									<br>价格:<%=rs("bookPrice")%>元
									<a href="#"  onClick="open('buybook.asp?BookId=<%=rs("BookId")%>','购物车','resizable=0,scrollbars=1,status=no,toolbar=no,location=no,menu=no,width=660,height=400,left=100,top=100')">
									<img border="0" src="images/buy.gif"></a>
								</td>
							</tr>
						</table>
						<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF" class="text">
							<tr> 
								<td align="left" valign="top">
									<hr>
									<b>内容简介:</b>
									<p><%=rs("BookIntro")%>
								</td>
							</tr>
							<tr> 
								<td align="left" valign="top">
									<hr>
									<b>目录:</b>
									<p><%=rs("BookIndex")%>
								</td>
							</tr>
						</table>
					</td>
					</tr>
				</table>
				<p align="center"><a href="index.asp">返回列表</a>
			</td>
		</tr>
	</table>
</body>
</html>

⌨️ 快捷键说明

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