📄 seaveinfo.asp
字号:
<!--#include File="Conn.asp"-->
<!--#include File="Left.asp"-->
<%
'==================================新闻分类
Dim NavigationName_1
Set Rs = Conn.Execute("Select * From ServeInfo Where ShopNumberID = '"& ShopNumberID &"'")
While Not Rs.Eof
NavigationName_1 = NavigationName_1 & "·<a href=SeaveInfo.asp?SeaveID="& Rs("ID") &">"& Rs("NavigationName") &"</A><br>"
Rs.MoveNext
Wend
Rs.Close
Set Rs = Nothing
NavigationArr= "<a href=./>首页</a> > <a href=./SeaveInfo.asp>服务导航</a>"
Dim SeaveID
Dim ServeContent
Dim ServeName
SeaveID = Request.QueryString("SeaveID")
IF Not Isnull(Trim(Request.QueryString("SeaveID"))) AND Trim(Request.QueryString("SeaveID")) <> "" Then
Set Rs = Conn.Execute("Select * From ServeInfo Where ID = "& SeaveID &" and ShopNumberID = '"& ShopNumberID &"'")
Else
Set Rs = Conn.Execute("Select * From ServeInfo Where ShopNumberID = '"& ShopNumberID &"' order by ServeOrder")
End IF
IF Not(Rs.eof and Rs.bof)Then
ServeContent = Rs("ServeContent")
NavigationArr= NavigationArr & " > " & Rs("ServeName")
ServeName = Rs("ServeName")
End IF
Rs.Close
Set Rs = Nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>服条导航-<%=HTMLEncodeNO(ShopName)%>-<%=HTMLEncodeNO(ShopTitle)%>-互联之光大卖场</title>
<meta name="keywords" content="<%=HTMLEncodeNO(ShopKey)%>">
<meta name="description" content="<%=HTMLEncodeNO(ShopContent)%>">
<link href="CSS.CSS" rel="stylesheet" type="text/css">
</head>
<body background="images/bg.gif" leftmargin="0" topmargin="0">
<!--#include File="Top.asp"-->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="4" background="images/i_18.gif"></td>
</tr>
</table>
<table width="760" height="400" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="ffffff">
<tr>
<td width="172" valign="top" background="images/i_58.gif">
<table width="172" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<%Call Login()%>
</td>
</tr>
</table>
<table width="172" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/i_89.gif" width="172" height="27"></td>
</tr>
<tr>
<td background="images/i_71.gif">
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> <%=NavigationName_1%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/i_83.gif" width="172" height="5"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</td>
<td width="588" valign="top">
<table width="588" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25"><%=NavigationArr%></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="right"><img src="images/i_15.gif" width="582" height="2"></td>
</tr>
</table>
<table width="588" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" align="center"><font size="2"><strong><%=ServeName%></strong></font></td>
</tr>
<tr>
<td align="center">
<%if ServeName <> "" Then%>
<hr width="100%" size="1" color="#cccccc" noshade>
<%enD IF%></td>
</tr>
<tr>
<td height="300" valign="top"><strong><%=ServeContent%></strong></td>
</tr>
<tr>
<td height="25" align="right"> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="588" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="8" cellspacing="0">
<tr>
<td> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include File="End.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -