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

📄 admin_text.asp

📁 一个足球彩票程序,不是原创.是朋友偷来的!
💻 ASP
字号:
🔍 
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>admin</title>
</head>

<body>

<form method="POST" action="admin_text.asp">
 
  <p>文本维护：</p>
  <%
          	set newconn=server.createobject("adodb.connection")
          	DBpath=server.mappath("football.mdb")
          	newconn.open"driver={Microsoft Access Driver (*.mdb)};dbq=" & dbpath
          	
                  newcmd="select * from config"
                  set newrst=newconn.execute(newcmd)
      %>


  <table border="1" width="100%" height="20">
    <tr>
    

      <td width="33%" height="7">&nbsp;声明</td>
      <td width="33%" height="7">公告</td>
      <td width="34%" height="7">专家寄语</td>
    </tr>
    
    <%do while not newrst.eof%>
    <tr>
      <td width="33%" height="3"><%=newrst(0)%></td>
      <td width="33%" height="3"><%=newrst(1)%></td>
      <td width="34%" height="3"><%=newrst(2)%></td>
    </tr>
    <%newrst.movenext%>
    <%loop%>
    <%newrst.close%>
  </table>
  <p><textarea rows="8" name="S1" cols="42"></textarea>&nbsp; <textarea rows="8" name="S2" cols="41"></textarea>&nbsp;            
  <textarea rows="8" name="S3" cols="41"></textarea></p>
  <p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  
  <input type="submit" value="修改声明" name="B2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  
  <input type="submit" value="修改公告" name="B3">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  
  <input type="submit" value="修改寄语" name="B1"></p>
  <p align="center"><input type="submit" value="刷  新" name="B4"></p>
</form>

<% 
                  if request("b2")="修改声明" then
                      aaa=request("S1")
                      aaa=aaa & "T8"
                      if aaa<>"T8" then
                          text=request("S1")

                          SQLcmd="Update config set shengming='" & text & "'"
                          
                          newconn.execute SQLcmd

                      end if
                  end if  
                  aaa=""
%>


<% 
                  if request("b3")="修改公告" then
                      aaa=request("S2")
                      aaa=aaa & "T8"
                      if aaa<>"T8" then
                          text=request("S2")

                          SQLcmd="Update config set gonggao='" & text & "'"
                          
                          newconn.execute SQLcmd

                      end if
                  end if  
                  aaa=""
%>


<% 
                  if request("b1")="修改寄语" then
                      aaa=request("S3")
                      aaa=aaa & "T8"
                      if aaa<>"T8" then
                          text=request("S3")

                          SQLcmd="Update config set zhuanjia='" & text & "'"
                          
                          newconn.execute SQLcmd

                      end if
                  end if  
                  aaa=""
%>



</body>

</html>

⌨️ 快捷键说明

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