📄 xfjl.asp
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="head.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>消费记录</title>
<link href="../images/STYLE.CSS" rel="stylesheet" type="text/css">
</head>
<%
MaxPerPage=20
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
dim typename
typename=""
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim sql
dim rs
dim rstype
if request("page")="" then
page=0
end if
%>
<body bgcolor="#3B5815" leftmargin="0" topmargin="0">
<TABLE width=778 height="30"
<TD align=center class=mix> <script src="jsmenu.asp"></script> </TD>
</TR>
</TABLE>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="../images/inchelp-04.gif">
<tr>
<td width="35"><img src="../images/inchelp-05.gif" width="27" height="29"></td>
<td>
<marquee class= behavior=scoll width=404 scrollDelay=2 scrollAmount=1 onmouseover=this.stop(); onmouseout=this.start();> <script src="../js/jstopgd.js" ></script></marquee>
</td>
<td width="17"><img src="../images/inchelp-01.gif" width="18" height="29"></td>
<td width="55" align="center" background="../images/inchelp-06.gif"><a href="playhelp.asp" class="left">播放帮助</a></td>
<td width="27"><img src="../images/inchelp-02.gif" width="27" height="29"></td>
<td width="55" align="center" background="../images/inchelp-06.gif"><a href="downhelp.asp" class="left">下载帮助</a></td>
<td width="27"><img src="../images/inchelp-02.gif" width="27" height="29"></td>
<td width="55" align="center" background="../images/inchelp-06.gif">
<a class="left" target="_blank" href="/bbs">本站论坛</a></td>
<td width="27"><img src="../images/inchelp-02.gif" width="27" height="29"></td>
<td width="55" align="center" background="../images/inchelp-06.gif"><a href="reguser.asp" class="left">注册会员</a></td>
<td width="14"><img src="../images/inchelp-03.gif" width="14" height="29"></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<TBODY>
<%set rs=server.createobject("adodb.recordset")
sql="select id from users where userid='"&Replace(request.cookies("userid"), "'", "''")&"' and password='"&Replace(request.cookies("password"), "'", "''")&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<TD vAlign=top background="../images/fufeibg.gif">
<P> </P>
<TABLE cellSpacing=0 cellPadding=0 width=550 align=center border=0>
<TBODY>
<TR>
<TD width=550 height=25>
<IMG
src="../images/error.gif" border=0 width="562" height="51"></TD></TR>
<TR>
<TD align=middle background="../images/fufeiconbg.gif"
height=200><BR>
<TABLE cellSpacing=0 cellPadding=0 width="80%" align=center
border=0>
<FORM name=regstep1 onsubmit="if (!formcheck()) return false;"
action=register.asp method=post>
<TBODY>
<TR>
<TD class=left align=middle height=30>提示:没有登陆或用户名密码错误无法查询！！ </TD></TR>
<TR>
<TD class=left align=middle height=30></TD></TR>
<TR>
<TD class=left align=middle height=30><INPUT class=button1 onclick="window.location.href='login.asp'" type=reset value="登 陆" name=index>
<INPUT class=button1 onclick="window.location.href='javascript:history.go(-1)'" type=reset value="后 退" name=login></TD></TR></FORM></TBODY></TABLE><BR></TD></TR>
<TR>
<TD bgColor=#94c50a height=6><IMG height=1
src="../images/spacer.gif"
width=1></TD></TR></TBODY></TABLE>
<P> </P></TD>
<TD align=middle width=156 bgColor=#c3ef26>
<TABLE cellSpacing=0 cellPadding=0 width=156 align=center border=0>
<TBODY>
<TR>
<TD align=middle><IMG height=25 src="../images/service-001.gif"
width=156></TD></TR>
<TR>
<TD align=middle background=../images/service-002.gif>
<TABLE width="80%" border=0>
<TBODY>
<tr>
<%
sql="select articleid,domurl,title,content from learning where firstbest=1 order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
b=0
row_count=1
%> <%
do while not rs.eof
b=b+1%>
<td align="center"><span lang="zh-cn">
<a href="../html/<%=rs("articleid")%>.html" target="_blank">
<img border="0" height="131" src="<%if rs("domurl")="" then%>../images/nopic.gif<%else%><%=rs("domurl")%><%end if%>" width="111"></a></span></td>
</tr>
<tr>
<% if row_count mod 1 =0 then%>
<td align="center">
</td>
</tr>
<tr>
<td align="center"><a href="../html/<%=rs("articleid")%>.html" target="_blank" class="left">
<%content=rs("title")
if len(content)>8 then content=left(content,8)&"…"
response.write content
%></a></td>
<%end if%>
<%row_count=row_count+1
if b>=1 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%> </tr>
</TBODY></TABLE></TD></TR>
<TR>
<TD align=middle><IMG height=50 src="../images/service-003.gif"
width=156></TD></TR>
<TR>
<TD align=middle background=../images/service-002.gif>
<TABLE width="100%" border=0>
<TBODY>
<tr>
<TD align=middle><a ><STRONG><FONT
color=#3c5b17><< 在线支付</FONT></a></STRONG></TD>
</tr>
<tr>
<TD align=middle><A
href="sj.asp"><STRONG><FONT
color=#3c5b17><< 手机支付</FONT></STRONG></A></TD>
</tr>
<tr>
<TD align=middle><A
href="168.asp"><STRONG><FONT
color=#3c5b17><<
声讯支付</FONT></STRONG></A></TD>
</tr>
</TBODY></TABLE><IMG height=19
src="../images/service-005.gif" width=156></TD></TR>
<TR>
<TD align=middle bgColor=#c3ef26 height=10><IMG height=1
src="../images/spacer.gif"
width=1></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<!--#include file="end.asp"-->
</BODY></HTML>
<%response.end
end if
sql="select * from tolook where userid='"&Replace(request.cookies("userid"), "'", "''")&"' order by id desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if not rs.eof and rs.bof then
%>
<TD vAlign=top background="../images/fufeibg.gif">
<P> </P>
<TABLE cellSpacing=0 cellPadding=0 width=550 align=center border=0>
<TBODY>
<TR>
<TD width=550 height=25>
<IMG
src="../images/error.gif" border=0 width="562" height="51"></TD></TR>
<TR>
<TD align=middle background="../images/fufeiconbg.gif"
height=200><BR>
<TABLE cellSpacing=0 cellPadding=0 width="80%" align=center
border=0>
<FORM name=regstep1 onsubmit="if (!formcheck()) return false;"
action=register.asp method=post>
<TBODY>
<TR>
<TD class=left align=middle height=30>提示:没有登陆或用户名密码错误无法查询！ </TD></TR>
<TR>
<TD class=left align=middle height=30></TD></TR>
<TR>
<TD class=left align=middle height=30><INPUT class=button1 onclick="window.location.href='login.asp'" type=reset value="登 陆" name=index>
<INPUT class=button1 onclick="window.location.href='javascript:history.go(-1)'" type=reset value="后 退" name=login></TD></TR></FORM></TBODY></TABLE><BR></TD></TR>
<TR>
<TD bgColor=#94c50a height=6><IMG height=1
src="../images/spacer.gif"
width=1></TD></TR></TBODY></TABLE>
<P> </P></TD>
<TD align=middle width=156 bgColor=#c3ef26>
<TABLE cellSpacing=0 cellPadding=0 width=156 align=center border=0>
<TBODY>
<TR>
<TD align=middle><IMG height=25 src="../images/service-001.gif"
width=156></TD></TR>
<TR>
<TD align=middle background=../images/service-002.gif>
<TABLE width="80%" border=0>
<TBODY>
<tr>
<%
sql="select articleid,domurl,title,content from learning where firstbest=1 order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
b=0
row_count=1
%> <%
do while not rs.eof
b=b+1%>
<td align="center"><span lang="zh-cn">
<a href="../html/<%=rs("articleid")%>.html" target="_blank">
<img border="0" height="131" src="<%if rs("domurl")="" then%>../images/nopic.gif<%else%><%=rs("domurl")%><%end if%>" width="111"></a></span></td>
</tr>
<tr>
<% if row_count mod 1 =0 then%>
<td align="center">
</td>
</tr>
<tr>
<td align="center"><a href="../html/<%=rs("articleid")%>.html" target="_blank" class="left">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -