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

📄 help.asp

📁 请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<%
dim ID,navID,rs,rsL,subRs,sql,title
if request("ID")="" or not isnumeric(request("ID")) then
	title="常见问题"
	navID=0
else
	ID=request("ID")
	set rs=conn.execute("select * from as_help where helpID="&ID)
	if not (rs.eof and rs.bof) then
		title=rs("title")
		navID=ID
				
		'判断是否链接
		if rs("islink")=1 then
			response.redirect rs("link")
		end if
	end if
	rs.close
	set rs=nothing
end if

call anysale.minHead(title&" - 使用帮助",anysale.asInfo(0)&",使用帮助,"&title,anysale.asInfo(0)&"使用帮助,常见使用问题,如何注册会员,如何使用本系统,诚信会员操作,后台管理操作,会员信息操作等。")
%>
<div class="line30">&nbsp;</div><div class="line30">&nbsp;</div>

<div class="bodyer">

 <ul style="float:left;width:120px;padding:0 0 0 60px;">
  <li class="minLT color"><h2 style="padding:38px 0 0 50px;">使用帮助</h2></li>
  <li class="minLM">
   <p<%if clng(navID)=0 then response.write" class=""minON""" end if%>><a href="help.asp">常见问题</a></p>
   <%
   if anysale.isAdmin then
   	set rsL=conn.execute("select helpID,title from as_help where parentID=0 order by orders")
   else
    set rsL=conn.execute("select helpID,title from as_help where isdisplay=1 and parentID=0 order by orders")
   end if
   if not (rsL.eof and rsL.bof) then
   do while not rsL.eof
   %>
   <p<%if rsL(0)=clng(navID) then response.write" class=""minON""" end if%>><a href="help.asp?id=<%=rsL(0)%>"><%=rsL(1)%></a></p>
   <%
   rsL.movenext
   loop
   end if
   rsL.close
   set rsL=nothing
   %>
  </li>
  <li class="minLF">&nbsp;</li>
 </ul>
 
 <ul style="float:left;width:650px;padding:0 0 0 35px;">
  <li class="color f14 txtRig borderB"><strong>使用帮助&raquo;<%=title%></strong></li>
  <li>&nbsp;</li>
  <li class="line20">
   <%
   if navID=0 then
    sql="select helpID,title from as_help where parentID>0 and iselite=1 and isdisplay=1 order by parentID,orders"
   else
    sql="select helpID,title from as_help where parentID="&navID&" and isdisplay=1 order by orders"
   end if
   set subRs=conn.execute(sql)
   if not(subRs.eof and subRs.bof) then
   do while not subRs.eof
   %>
   <p class="left value">·<a href="#<%=subRs(0)%>"><%=subRs(1)%></a></p>
   <%
   subRs.movenext
   loop
   end if
   subRs.close
   set subRs=nothing
   %>
  </li>
  <li class="clear">&nbsp;</li>
  <li>
   <%
   if navID=0 then
    sql="select helpID,title,detail from as_help where parentID>0 and iselite=1 and isdisplay=1 order by parentID,orders"
   else
    sql="select helpID,title,detail from as_help where parentID="&navID&" and isdisplay=1 order by orders"
   end if
   set subRs=conn.execute(sql)
   if not(subRs.eof and subRs.bof) then
   do while not subRs.eof
   %>
   <div class="line25 f14 detail">
    <h2 class="color"><a name="<%=subRs(0)%>"></a>Q:<%=subRs(1)%></h2>
	<div><strong>A:</strong><%=anysale.codeReplace(subRs(2))%></div>
   </div>
   <div class="txtRig"><a class="links" href="#">返回顶部</a></div>
   <div>&nbsp;</div>
   <%
   subRs.movenext
   loop
   end if
   subRs.close
   set subRs=nothing
   %>  
  </li>
  <li>&nbsp;</li>
 </ul>
</div>

<div class="line30">&nbsp;</div>
<%
anysale.minFoot
closeConn
%>

⌨️ 快捷键说明

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