📄 myinfo.asp
字号:
<%response.buffer = true%>
<!--
版本：草原二手市场V1.1
本程序作者：mysql QQ:54016224 TEL:13036133798
-->
<!--#include file="include/conn.asp"-->
<!--#include file="include/function.asp"-->
<!--#include file="include/md5.asp"-->
<!--#include file="include/access.asp"-->
<%
if isNum(request("InfoID")) then
InfoID = cint(request("InfoID"))
else
response.write "<script>alert('参数错误');history.go(-1);</script>"
response.end
end if
if request("action") = "delete" then
sql = "select * from [Info] where InfoID = "&InfoID&" and UserID="&request.Cookies("UserID")&""
set rs =server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof and rs.bof then
response.write "<script>alert('该会员不存在');</script>"
else
sql = "delete * from [Info] where InfoID = "&InfoID&" and UserID="&request.Cookies("UserID")&""
conn.execute(sql)
response.write "<script>alert('删除成功');window.location.href='myinfo.asp';</script>"
end if
end if
%>
<!--#include file = "head.asp" -->
<!--主体1-->
<table width="1000" border="0" cellpadding="0" cellspacing="2" bgcolor="#F0F9FB">
<tr>
<td width="785" height="883" valign="top" class="pgray12">
<!-- body1 left -->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="225" align="center" valign="top"> <table width="218" border="0" cellpadding="0" cellspacing="1" bgcolor="#C5DCE2">
<tr>
<td bgcolor="#F0F9FB" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/e_title_userlogin1.gif" width="218" height="21"></td>
</tr>
<tr>
<td><iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="login.asp" width="100%" height=85></iframe> </td>
</tr>
<tr>
<td height="1" bgcolor="#C5DCE2"></td>
</tr>
<tr>
<td align="center" height="50"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" width="50%"><a href="sign_in.asp"><img src="images/button_user_reg.gif" width="87" height="24" border="0"></a></td>
<td align="center"><img src="images/button_user_getps.gif" width="87" height="24"></td>
</tr>
</table></td>
</tr>
<tr>
<td height="1" bgcolor="#C5DCE2"></td>
</tr>
<tr>
<td height="150" valign="top" align="center">
<!-- notice -->
<marquee scrollAmount="2" width="200" height="140" direction="up" onmouseover='this.stop()' onmouseout='this.start()'>
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="font-12px120-000000"><img src='images/arrow_orange7.gif' width='13' height='11'>
<font color="#0066CC">二手市场二手市场二手市场二手市场二手市场二手市场！</font></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="font-12px120-000000"><img src='images/arrow_orange7.gif' width='13' height='11'>
<font color="#0066CC">二手市场二手市场二手市场二手市场二手市场二手市场！</font></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="font-12px120-000000"><img src='images/arrow_orange7.gif' width='13' height='11'>
<font color="#0066CC">二手市场二手市场二手市场二手市场二手市场二手市场！</font></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
</marquee>
<!-- notice end -->
</td>
</tr>
</table> </td>
</tr>
</table>
<table width="218" border="0" cellpadding="1" cellspacing="1" bgcolor="#C5DCE2">
<tr>
<td bgcolor="#f0f9fb"><img src="images/infolist.gif" width="218" height="21"></td>
</tr>
<tr>
<td bgcolor="#f0f9fb"><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td bgcolor="#f0f9fb"> <iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="html/Categories.html" width="100%" height=520 style="backgroud:#f0f9fb">
</iframe> </td>
</tr>
</table> </td>
</tr>
</table></td>
<td valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<TABLE cellSpacing=1 cellPadding=4 width="100%" border=0>
<TBODY>
<TR class=m_title>
<TD align=center>信息编号</TD>
<TD align=center>信息名</TD>
<TD align=center>发布者</TD>
<TD align=center>所属二级类</TD>
<TD align=center>所属大类</TD>
<TD align=center>操作</TD>
</TR>
<%
sql = "select * from [Info] where UserID="&request.Cookies("UserID")&" order by InfoID desc"
set rs =server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
'********************分页模块******************************'
apage = trim(request("page"))
rs.pagesize = 10
pagesize = rs.pagesize
totalnum = rs.recordcount
pagenum = cint(totalnum/pagesize) + 1
if not IsNumeric(apage) then
apage = 1
if not rs.eof and not rs.bof then
rs.absolutepage = apage
page = rs.absolutepage
end if
else
apage = abs(cint(apage))
'*************************************
if apage <= 0 then
if not rs.eof and not rs.bof then
rs.absolutepage = 1
page = rs.absolutepage
end if
else
if apage > pagenum then
if not rs.eof and not rs.bof then
rs.absolutepage = pagenum
page = rs.absolutepage
end if
else
if not rs.eof and not rs.bof then
rs.absolutepage = apage
page = rs.absolutepage
end if
end if
end if
'*************************************
end if
'************************分页模块end*********************************'
if rs.eof and rs.bof then
%>
<TR class=line_1 align="center">
<TD noWrap></TD>
<TD noWrap></TD>
<TD noWrap></TD>
<TD noWrap></TD>
<TD noWrap></TD>
<TD noWrap> <a href="addmyinfo.asp?action=add">添加</a> </TD>
</TR>
<%
end if
i = 0
do while not rs.eof and not rs.bof
i = i + 1
if i > 10 then exit do
sql = "select * from SubClass where SubIndexNO = '"&rs("SubIndexNO")&"'"
set rs0 = server.CreateObject("adodb.recordset")
rs0.open sql,conn,1,1
if not rs0.eof and not rs0.bof then
sql = "select * from BigClass where BigIndexNO = '"&rs("BigIndexNO")&"'"
set rs1 = server.CreateObject("adodb.recordset")
rs1.open sql,conn,1,1
if not rs1.eof and not rs1.bof then
%>
<TR class=line_1 align="center">
<TD noWrap><a href="#"><%=rs("InfoID")%></a></TD>
<TD noWrap><a href=showInfo.asp?InfoID=<%=rs("InfoID")%>><%=rs("InfoName")%></a></TD>
<TD noWrap> <%=rs("UserName")%></TD>
<TD noWrap><%=rs0("SubName")%></TD>
<TD noWrap> <%=rs1("BigName")%></TD>
<TD noWrap><a href="editmyinfo.asp?action=edit&InfoID=<%=rs("InfoID")%>"> 编辑</a> <a href="addmyinfo.asp?action=add">添加</a> <a href='?action=delete&InfoID=<%=rs("InfoID")%>' onclick='return confirm("确认删除?")'>删除</a></TD>
</TR>
<% end if
end if
rs.movenext
loop
%>
</TBODY>
</TABLE></td>
</tr>
</table>
<div align="right"><a href ="?page=<%=abs(page)-1%>">上一页</a><font color="red">|第<%=abs(page)%>页|</font><a href ="?page=<%=abs(page)+1%>">下一页</a></div></td>
</tr>
</table>
<!-- body1 left end-->
</td>
<td bgcolor="#F2F2F2" valign="top">
<!-- body1 right-->
<iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="updatelist.asp" width="100%" height="100%"></iframe>
<!-- body1 right end-->
</td>
</tr>
</table>
<!-- copyright -->
<table width="1002" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="3" bgcolor="#FFFFFF"></td>
<td bgcolor="#FFFFFF">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr align="center" valign="top">
<td width="20" height="104"> </td>
<td width="950">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="right"><a href="#"><img src="images/i_but_top.gif" width="43" height="37" border="0"></a></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="74%">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="121" rowspan="2"> </td>
<td width="10" rowspan="2"> </td>
<td width="492"><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_about.gif" height="14" border="0" width="57"></a><a href="http://www.vvcat.com"><img src="images/i_menu_c.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_wor.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_ser.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_declare.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_s.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_h.gif" width="31" height="14" border="0"></a>
</td>
</tr>
<tr>
<td height="5" width="492"></td>
</tr>
</table>
</td>
<td width="26%" valign="bottom"> </td>
</tr>
</table>
</td>
<td width="20"> </td>
</tr>
</table>
</td>
<td width="3" bgcolor="#FFFFFF"></td>
<td width="1"></td>
<td width="7"></td>
</tr>
</table>
<!-- copyright end -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -