📄 my_help.asp
字号:
<!--#include file="../config/sys.asp"-->
<%a=check_session()
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css" />
</head>
<body><script src="images/skins.js"></script>
<div align="center">
<TABLE style="TABLE-LAYOUT: fixed" height=100% cellSpacing=0 cellPadding=0 width="98%" border=0>
<TBODY>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD bgColor=#DCDCDC></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC></TD>
<TD bgColor=#f7f8f9 colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD> <TABLE style="TABLE-LAYOUT: fixed" height="100%" cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#DCDCDC></TD>
<TD id=oINNER bgColor=#FFFFFF>
<table border="0" width="100%" id="table1" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="24" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" colspan="3">
<font color="#999999"><b> 我的咨询</b></font></td>
</tr> <tr>
<td bgcolor="#FFFFFF" valign="top">
<div align="center">
<table cellspacing="1" cellpadding="4" width="98%" border="0" class="a2" bgcolor="#FFFFFF">
<tr class="a1">
<td width="54%" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px" align="center">【咨询标题】</td>
<td width="8%" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">【浏览】</td>
<td width="8%" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">【回复】</td>
<td width="17%" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">【最后更新】</td>
</tr>
<%s =cint( request.querystring("s"))
if len(s)<1 then s = 0
s=s*13
a="1"
IF selectROLE2(SESSION("USER_NAME")) THEN
sql = "select title, autor, lastdate, views, replies, datum_updated, id from postings where connected = 0 and helpflog='"&a&"' order by updated desc"
else
sql = "select title, autor, lastdate, views, replies, datum_updated, id from postings where connected = 0 and helpflog='"&a&"' and autor='"&session("user_name")&"' order by updated desc"
end if
set rs = conn.Execute(sql)
while not rs.eof
lastdate=rs("lastdate")
shicha=DateDiff("n",lastdate,date)
count = count +1
if count>s and count<=(s+13) then
if count mod 2 = 0 then
bgcolor = "a3"
else
bgcolor = "a4"
end if%>
<tr class="<%=bgcolor%>">
<td style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"> <img src=images/icon.gif> <a class="text" href="view1.asp?id=<%=rs("id")%>&s=<%=s/13%>"><%=formatierung(rs("title"))%></a>
<%if shicha<=1 then %>
<img src=images/new.gif>
<%end if%>
</td>
<td align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><font color="#0000FF"><%=rs("views")%></font></td>
<td align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"> <font color="#FF0000"><%=rs("replies")%></font></td>
<td align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=year(rs("datum_updated"))%>-<%=month(rs("datum_updated"))%>-<%=day(rs("datum_updated"))%></td>
</tr>
<%end if
rs.movenext
wend
sql = "select count(id) as alleEintraege from postings where connected = 0 and helpflog='"&a&"' and autor='"&session("user_name")&"'"
set rs = conn.Execute(sql)
alleEintraege = int(rs("alleEintraege"))%>
<tr class="a4">
<td width="100%" colspan = "4">
<table width=100% cellpadding="0" cellspacing="0">
<tr>
<td width="58%"> </td>
<td align="right">跳到
<select name="select" onChange="if(this.options[this.selectedIndex].value!=''){location=this.options[this.selectedIndex].value;}">
<% for t = 0 to fix((alleEintraege-1)/13)%>
<option value="my_help.asp?s=<%=t%>" <%if t=(s/13) then%>selected<%end if%>><%=t+1%></option>
<%next%>
</select>
页 当前第<font color=red> <%=s/13+1%> </font>页
<% if s>0 then %>
<a href=my_help.asp?s=<%=s/13-1%>>[上一页]</a>
<%end if%>
<% if fix((alleEintraege-1)/13)-s/13 <> 0 then %>
<a href="my_help.asp?s=<%=s/13+1%>">[下一页]</a>
<%end if%></td>
</tr>
</table></td>
</tr>
</table>
</div>
<%rs.close
conn.close
set rs = nothing
set conn = nothing%>
</td>
</tr>
</table>
</TD>
<TD width=1 bgColor=#DCDCDC></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD colSpan=3></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -