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

📄 wish.asp

📁 5237 论坛.rar
💻 ASP
字号:
<!--#include file="Connections/connY.asp" -->
<!--#include file="Inc/Level0.asp" -->
<!--#include file="Inc/Info.asp" -->
<!--#include file="Inc/TimeFormat.asp" -->
<!--#include file="Inc/UBBCode.asp" -->
<!--#include file="Inc/SetCss.asp" -->
<%
State="许愿"
%>
<html>
<head>
<title><%=Forum_Title%></title>
<meta http-equiv="Content-Type" content="text/html;">
<meta http-equiv="Expires" CONTENT="0">
<meta http-equiv="Cache-Control" CONTENT="no-cache">
<meta http-equiv="Pragma" CONTENT="no-cache">
<!--#include file="Inc/Css.asp" -->
<script language=Javascript src="Js/Menu.Js"></script>
<script language=Javascript src="Js/Button.Js"></script>
<script language=Javascript src="Js/Operate.Js"></script>
</head>
<body leftmargin="0" topmargin="0" bgcolor="<%=Forum_ColorList_BgColor%>" vlink="<%=Forum_Css_A_Link_Color%>">
<!--#include file="Inc/Top.asp" -->
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor="<%=Forum_ColorList_BorderColor%>">
  <tr> 
    <td height="20" bgcolor="<%=Forum_ColorList_BgColor%>"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" class="font">
        <tr> 
          <td width="50%">&nbsp;您所在的位置: <a href="../" onfocus="this.blur()">首页</a> 
            &gt;&gt; <a href="List.asp" onfocus="this.blur()">讨论组</a> &gt;&gt; 
            <a href="Pray.asp" onfocus="this.blur()">许愿版</a> &gt;&gt; <font color="<%=Forum_ColorList_NavFontColor%>">我要许愿</font></td>
          <td width="20%"> </td>
          <td width="30%"> 
            <div align="right"><img src="<%=Forum_Pic_Open%>" width="15" height="14" border="0" alt="显示个人工具箱" onClick="ShowInfo()" style="CURSOR: hand" align="texttop"></div>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td height=1></td>
  </tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="0" align="center" id=info style="DISPLAY: none" bgcolor="<%=Forum_ColorList_BorderColor%>">
  <tr>
    <td valign="top" bgcolor="<%=Forum_ColorList_BgColor%>"><!--#include file="Inc/Tools.asp" --></td>
  </tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="0" cellpadding="0" align="center" id=infoborder style="DISPLAY: none">
  <tr>
    <td height=1></td>
  </tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="2" align="center" bgcolor="<%=Forum_ColorList_BorderColor%>" class="font">
  <tr bgcolor="<%=Forum_ColorList_BgColor%>"> 
    <td> 
      <div align="center"> 
        <%
If Request("Action")="WishNow" Then
Set rsWish = Server.CreateObject("ADODB.Recordset")
Sql = "Select *  From tWishManage"
rsWish.Open Sql,ConnY,3,3
rsWish.AddNew
rsWish("rForWho")=Request.Form("ForWho")
rsWish("rSex")=Request.Form("Sex")
rsWish("rWho")=Request.Form("Who")
rsWish("rAddress")=Request.Form("Address")
rsWish("rIsSecret")=Request.Form("IsSecret")
rsWish("rType")=Request.Form("Type")
rsWish("rTime")=Request.Form("WishTime")
rsWish.Update
rsWish.Close
Set rsWish=Nothing
%>
        <br>
        <br>
        <br>
        <br>
        <br>
        <table width="400" border="0" cellspacing="1" cellpadding="2" bgcolor="<%=Forum_ColorList_BorderColor%>" class="font" align="center">
          <tr>
            <td height="100" bgcolor="<%=Forum_ColorList_AlternateColor1%>">
              <div align="center"><font color="<%=Forum_ColorList_PFontColor%>">许愿成功<br>
                </font><br>
                该页面将会在3秒钟后自动返回</div>
            </td>
          </tr>
        </table>
        <br>
        <br>
        <br>
        <br>
        <br><br><br><br>
        <script language=javascript>
setTimeout("location.replace('Pray.asp')",3000)
</script>
        <%  
End If
If Request("Action")="" Then
%>
        <br>
        <br>
        <br>
        <br>
        <table width="50%" border="0" cellspacing="1" cellpadding="2" class="font" bgcolor="<%=Forum_ColorList_BorderColor%>">
          <form name="form1" method="post" action="Wish.asp?Action=WishNow">
            <tr bgcolor="<%=Forum_ColorList_TitleColor%>"> 
              <td colspan="2" height="20"> 
                <div align="center">许愿</div>
              </td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="20">我的名字</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor2%>"> 
                <input type="text" name="Who" value="<%=Session("SNickName")%>" class="textfiled">
              </td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="20">我的性别</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor2%>"> 
                <input type="radio" name="Sex" value="1" checked onFocus="this.blur()">
                <input type="radio" name="Sex" value="0" onFocus="this.blur()">
                女</td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="20">来自</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor2%>"> 
                <input type="text" name="Address" class="textfiled" value="5237社区">
              </td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="20">为谁许愿</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor2%>"> 
                <input type="text" name="ForWho" value="自己" class="textfiled">
              </td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="20">许愿类型</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor2%>"> 
                <select name="Type" class="textfiled">
                  <option value="1" selected>健康</option>
                  <option value="2">事业</option>
                  <option value="3">爱情</option>
                  <option value="4">财富</option>
                  <option value="5">学业</option>
                  <option value="6">家庭</option>
                  <option value="7">生活</option>
                  <option value="8">心情</option>
                </select>
                <input type="hidden" name="WishTime" value="<%=Now%>">
              </td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="20">是否公开</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor2%>"> 
                <input type="radio" name="IsSecret" value="0" checked onFocus="this.blur()">
                公开 
                <input type="radio" name="IsSecret" value="1" onFocus="this.blur()">
                不公开</td>
            </tr>
            <tr> 
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="35"> 
                操作</td>
              <td bgcolor="<%=Forum_ColorList_AlternateColor1%>" height="35">
                <input type="submit" name="Submit" value="许愿" class="button" onFocus="this.blur()">
                <input type="reset" name="Reset" value="重置" class="button" onFocus="this.blur()">
              </td>
            </tr>
          </form>
        </table>
		<br>
        <br>
        <br>
        <br>
        <br>
        <%
		End If
		%>
      </div>
      </td>
  </tr>
  </table>
<table width="<%=Forum_Width%>" border="0" cellspacing="0" cellpadding="0" align="center" id=onlineborder>
  <tr>
    <td height=1></td>
  </tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="1" align="center" bgcolor="<%=Forum_ColorList_BorderColor%>" id=online>
  <tr> 
    <td valign="top" bgcolor="<%=Forum_ColorList_OnlineColor%>"> 
      <!--#include file="Inc/Online.asp" -->
    </td>
  </tr>
</table>
<!--#include file="Inc/Bottom.asp" --></body>
</html>

⌨️ 快捷键说明

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