📄 xgwj.asp

📁 宁波娱乐在线城市,丰富的内容版块
💻 ASP
字号:
<!--#include file="..\Tools.asp"-->
<%
   if (UCase(Request.Cookies("NC")) <> UCase(Application("NC"))) or (Request.Cookies("NC")="" or Request.Cookies("NC")="访客") then
        Response.Write("对不起，您不是管理员！")
        Response.End
    end if

   if  not IsObjInstalled("Scripting.FileSystemObject") then
       Response.Write("对不起，您的服务器不支持FSO(FileSystemObject)功能！")
       Response.End
   end if    
   On Error Resume Next
   if Request.ServerVariables("Request_Method") = "POST" then
       Set file = Server.CreateObject("Scripting.FileSystemObject")
       if Request.QueryString("ACT") = "1" then
           Set CountFile = file.OpenTextFile(Server.MapPath(Request.Form("tWJM")),1,False)
           if not CountFile.AtEndOfStream then fdata = CountFile.ReadAll
       end if
       if Err.number <> 0 then
           ShowError 5,"文件打开失败！"
       end if     
       if Request.QueryString("ACT") = "2" then
           fdata = Request.Form("tWJNR")
           Set CountFile = file.CreateTextFile(Server.MapPath(Request.Form("tWJM")),True)
           CountFile.Write fdata
           if Err.number <> 0 then
               ShowError 5,"修改失败！"
           else 
               ShowMessage 5,"修改成功！"
           end if    
       end if
  	   CountFile.Close
 	   Set CountFile=Nothing
       Set file = Nothing
   end if
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<style type="text/css">
<!--
.p9 {  font-family: "宋体"; font-size: 9pt}
.TButton {  font-family: "宋体"; font-size: 9pt;cursor:hand;width:66px;height:22px}
INPUT{BORDER-TOP-WIDTH: 1px; PADDING-RIGHT: 1px; PADDING-LEFT: 1px; BORDER-LEFT-WIDTH: 1px; BORDER-LEFT-COLOR: #cccccc; BORDER-BOTTOM-WIDTH: 1px; BORDER-BOTTOM-COLOR: #cccccc; PADDING-BOTTOM: 1px; BORDER-TOP-COLOR: #cccccc; PADDING-TOP: 1px; HEIGHT: 18px; BORDER-RIGHT-WIDTH: 1px; BORDER-RIGHT-COLOR: #cccccc}
-->
</style>
<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--

function sWJM_onchange() {
    fXGWJ.tWJM.value = fXGWJ.sWJM.value;
    fXGWJ.sWJM.selectedIndex = 0;
}

function bQD_onclick() {
    fXGWJ.action = 'xgwj.asp?ACT=1';
    fXGWJ.submit();
}

function bTJ_onclick() {
    fXGWJ.action = 'xgwj.asp?ACT=2';
    fXGWJ.submit();
}

//-->
</SCRIPT>
</HEAD>
<BODY background=../images/bjxt.gif>
<form name="fXGWJ" method="post">
<p align="center">
  <select name="sWJM" class="p9" LANGUAGE=javascript onchange="return sWJM_onchange()">
    <option selected>请选择修改的文件名</option>
    <option value="../Default.asp">Default.asp</option>
    <option value="../config.asp">config.asp</option>
  </select>
  <input name="tWJM" value="<%=Request.Form("tWJM")%>" class="p9">
  <input type="button" name="bQD" value="确定" class="TButton" LANGUAGE=javascript onclick="return bQD_onclick()">
</p>
<p align="center"><TEXTAREA class=p9 name=tWJNR rows=40 style="width:90%;height:80%"><%=fdata%></TEXTAREA>
</p>
<p align="center"> 
  <input type="reset" name="bCS" value="取消" class="TButton">
  <input type="button" name="bTJ" value="修改" class="TButton" LANGUAGE=javascript onclick="return bTJ_onclick()">
</p>
</form>
</BODY>
</HTML>
⌨️ 快捷键说明

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