📄 tigaoxuanshang.asp
字号:
<!--#include file=conn.asp-->
<!--#include file="Config.asp"-->
<!--#include file="md5.asp"-->
<%
if session("person")="" then
response.redirect "Login.asp"
end if
if not IsNumeric(request("id")) or request("id")="" then
Response.Write ("<script>alert('友情提示!\n\参数错误!');history.back();</script>")
Response.end
end if
if request("id")<>"" then
id=CLNG(request("id"))
end if
rs.open"select * from question where id="&id,conn,1,1
if rs.eof then
response.write"问题参数出错!"
else
rs2.open"select * from person where name='"&rs("sender")&"'",conn,1,1
touxian=rs2("touxian")
rs2.close
rs2.open"select * from assort where topic='"&rs("topic")&"'",conn,1,1
shuxing=rs2("shuxing")
rs2.close
rs2.open"select * from class where id="&shuxing&"",conn,1,1
topic0=rs2("topic")
id0=rs2("id")
rs2.close
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>处理问题-提高悬赏</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file=top.asp-->
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25"><a href="<%=weburl%>"><%=webname%></a> > <a href="List_Big.asp?id=<%=id0%>&topic=<%=topic0%>"><%=topic0%></a> > <a href=List_Little.asp?id=<%=rs("fenleiid")%>&topic=<%=rs("topic")%>><%=rs("topic")%></a></td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td valign="top" width="200">
<table border="0" width="100%" cellspacing="0" cellpadding="0" class="t1">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="36" align="center" onmouseover="this.className='tbb'" onmouseout="this.className='taa'" class="taa"><strong><%if session("person")<>"" then%>用户信息<%else%>用户登录<%end if%></strong></td>
</tr>
<tr>
<td align=center><br>
<table border="0" width="95%" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="bgtle"></td>
</tr>
<tr>
<td class="bgcntBor3">
<%if request("login")="登录" then
jiance=request("name")
if InStr(jiance,"or")<>0 or InStr(jiance,"'")<>0 or InStr(jiance,"`")<>0 or InStr(jiance,"=")<>0 or InStr(jiance,"-")<>0 or InStr(jiance,",")<>0 or InStr(jiance,"and")<>0 then
Response.Write "<script language=JavaScript>{alert('用户名非法！');history.back();}</script>"
Response.End
end if
if not IsNumeric(request("verifycode")) then
Response.Write ("<script>alert('友情提示!\n\n验证编码必须是数字!');history.back();</script>")
Response.end
end if
if (int(session("SafeCode"))<>int(request("verifycode"))) then
Response.Write ("<script>alert('友情提示!\n\n验证编码输入错误!');history.back();</script>")
Response.end
end if
if request("name")="" then
response.write"<script>alert('用户名不能为空!');history.back();</script>"
elseif request("pwd")="" then
response.write"<script>alert('密码不能为空!');history.back();</script>"
else
name=request("name")
pwd=request("pwd")
rs2.open"select * from person where name='"&name&"' and pwd='"&md5(pwd)&"'",conn,1,1
if rs2.eof then
response.write"<script>alert('用户名或密码错误!');history.back();</script>"
else
rs3.open"select * from person where name='"&name&"'",conn,1,3
rs3("logintime")=now
rs3.update
rs3.close
session("person")=name
end if
rs2.close
end if
end if%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="zhtable"><%if session("person")<>"" then%>
<tr>
<td >您好：<%=session("person")%> </td>
</tr>
<tr>
<td><%rs2.open"select * from person where name='"&session("person")&"'",conn,1,1%>
<a href="Help.asp#n5" target=_blank><%=rs2("touxian")%></a> ( <%=rs2("jifen")%> )</td>
</tr>
</table>
<table cellSpacing=0 cellPadding=0 width="100%" border=0>
<tr>
<td height=22>• <a href="user.asp?lei=mywen" target=_blank>我的提问</a></td>
<td>• <a href="user.asp" target=_blank>个人中心</a></TD>
</tr>
<tr>
<td>• <a href="user.asp?lei=myda" target=_blank>我的回答</a></td>
<td>• <a href="Exit.asp">退出</a><%rs2.close%></td>
</tr>
<%end if%><%if session("person")="" then%><tr><form method=post action=Show_Question.asp?id=<%=id%>><td align="center" valign="top">
<p>用 户: <input name="name" type="text" id="name" size="12"><br>密 码: <input name="pwd" type="password" id="pwd" size="12"><br>验证码:<input type="text" size=3 maxlength=4 name=verifycode> <%Call GetSafeCode%><br><FONT color=#666666>(请输入图中数字)</FONT><br><input name="login" type="submit" id="login" value="登录">
<a href="Reg.asp">注册</a>
</td></form><%end if%></tr>
</table>
</table></td>
</tr>
</table>
<br></td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<table border="0" width="100%" cellspacing="0" cellpadding="0" class="t1">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="36" align="center" onmouseover="this.className='tbb'" onmouseout="this.className='taa'" class="taa"><strong>同类热点问题</strong></td>
</tr>
<tr>
<td align=center><br>
<table border="0" width="98%" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td>
<%
rs2.open"select top 5 * from question where fenleiid="&rs("fenleiid")&" order by views desc",conn,1,1
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" style="table-layout:fixed;word-wrap:break-word;"><%while NOT rs2.EOF%>
<tr><td width=10 valign="top">• </td>
<td><a href="Show_Question.asp?id=<%=rs2("id")%>" target="_blank"><%=rs2("title")%></a></td></tr>
<%
rs2.movenext
wend
rs2.close
%>
<tr><td> </td><td height="22" >
<p align="right"><a href="List_Little.asp?id=<%=rs("fenleiid")%>&topic=<%=rs("topic")%>" class="lmore">更多>></a></td></tr></table>
</td></tr></table>
</td>
</tr>
</table>
<br></td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<table border="0" width="100%" cellspacing="0" cellpadding="0" class="t1">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="36" align="center" onmouseover="this.className='tbb'" onmouseout="this.className='taa'" class="taa"><strong>公告</strong></td>
</tr>
<tr>
<td align=center><br>
<table border="0" width="98%" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="bgcntBor4"><%rs2.open"select top 5 * from gonggao where flid=3 order by time desc",conn,1,1
if rs2.eof then%>暂时没有公告<%else
while not rs2.eof
%>☆<%=rs2("text")%><hr size="1" class="hr1">
<%rs2.movenext
wend
end if
rs2.close%>
</td>
</tr></table></td>
</tr>
</table>
<br></td>
</tr>
</table>
</td>
</tr>
</table>
<br>
</td>
<td valign="top" width="8"></td>
<td valign="top"><table border="0" width="100%" cellspacing="0" cellpadding="0" class="t1">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="36" align="center" onmouseover="this.className='tbb'" onmouseout="this.className='taa'" class="taa"><strong>增加悬赏分</strong></td>
</tr>
<tr>
<td align=center><br>
<table border="0" width="98%" cellspacing="0" cellpadding="0">
<tr>
<td>
<%
if request("Submit")="确 认" then
if session("person")="" then
response.redirect "Login.asp"
end if
if not IsNumeric(request("shang")) then
Response.Write ("<script>alert('友情提示!\n\参数错误!');history.back();</script>")
Response.end
end if
if request("shang")="" then
response.write"<script>alert('增加的悬赏分不能为空!');history.back();</script>"
end if
shang=request("shang")
rs1.open"select * from person where name='"&session("person")&"'",conn,1,1
if Int(request("shang")) > rs1("jifen") then
response.write"<script>alert('您的积分不够!');history.back();</script>"
response.end
rs1.close
end if
rs3.open"select * from question where id="&id,conn,1,3
rs3("shang")=rs3("shang")+shang
if datediff("d", now, rs("overtime"))<5 then
rs3("overtime")=now+5
end if
rs3.update
rs3.close
rs3.open"select * from person where name='"&session("person")&"'",conn,1,3
rs3("jifen")=rs3("jifen")-shang
if rs3("jifen")-shang<fen1 then
rs3("touxian")=""&ji1&" "
elseif rs3("jifen")-shang>=fen1 and rs3("jifen")-shang<fen2 then
rs3("touxian")=""&ji1&" "
elseif rs3("jifen")-shang>=fen2 and rs3("jifen")-shang<fen3 then
rs3("touxian")=""&ji2&" "
elseif rs3("jifen")-shang>=fen3 and rs3("jifen")-shang<fen4 then
rs3("touxian")=""&ji3&" "
elseif rs3("jifen")-shang>=fen4 and rs3("jifen")-shang<fen5 then
rs3("touxian")=""&ji4&" "
elseif rs3("jifen")-shang>=fen5 and rs3("jifen")-shang<fen6 then
rs3("touxian")=""&ji5&" "
elseif rs3("jifen")-shang>=fen6 and rs3("jifen")-shang<fen7 then
rs3("touxian")=""&ji6&" "
elseif rs3("jifen")-shang>=fen7 and rs3("jifen")-shang<fen8 then
rs3("touxian")=""&ji7&" "
elseif rs3("jifen")-shang>=fen8 and rs3("jifen")-shang<fen9 then
rs3("touxian")=""&ji8&" "
elseif rs3("jifen")-shang>=fen9 and rs3("jifen")-shang<fen10 then
rs3("touxian")=""&ji9&" "
elseif rs3("jifen")-shang>=fen10 then
rs3("touxian")=""&ji10&" "
end if
rs3.update
rs3.close
response.write"<script>alert('悬赏分已成功提高!');window.navigate('Show_Question.asp?id="&id&"');</script>"
end if
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class=zhtable>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0" class=zhtable>
<tr>
<td><font color="#FF0000"><%=rs("title")%></font></td>
</tr>
<tr>
<td height="100"> <span>增加悬赏分，可以提高问题的关注度，此时：（从现在开始计时）<br>
1）如果您的问题距离结束时间不足5天，则系统自动把该问题的有效期增加至5天；<br>
2）如果您的问题距离结束时间尚多于5天，则截止日期不发生变化。
</span></td>
</tr>
</table></td>
</tr>
</table>
<br>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><form action=TiGaoXuanShang.asp?id=<%=id%> method=post>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="22%" valign="bottom">
<p align="right"><span>设置新的悬赏分：</span></td>
<td width="78%"> <p> 请设置一个需要增加的更高的悬赏分
<select name="shang">
<option value=5 selected>5</option>
<option value=10>10</option>
<option value=15>15</option>
<option value=20>20</option>
<option value=30>30</option>
<option value=40>40</option>
<option value=50>50</option>
</select>
分 </p> </td>
</tr>
</table>
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="22%"> </td>
<td width="78%" valign="top"><input type="submit" name="Submit" value="确 认" class="bnsrh">
<span class="bgcnt"> <a href="javascript:history.go(-1);"><span>返回</span></a> </span>
<input type=hidden name=id value=<%=id%>>
</td>
</tr></form>
</table>
</td>
</tr>
</table>
<%
end if
rs.close
%>
</td>
</tr>
</table>
<br></td>
</tr>
</table>
</td>
</tr>
</table>
<br>
</td>
</tr>
</table>
<!--#include file=end.asp-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -