📄 fso_indexall.asp

📁 全站生成htm静态页面

💻 ASP

字号:

<!--#include file="function.asp"-->
<%CheckAdmin3%>
<%if request("file")="tj" then
files="tj"
else
files="indexall"
end if
if request("mb")<>"" then
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.CreateTextFile(server.mappath("../"&files&".htm"))
fout.Write request("mb")
fout.close
set fout=nothing
set fso=nothing
mskrindex="ok"
end if
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<style type="text/css"><!--
body{font-size: 9pt;line-height: 13pt}
td  {font-size: 9pt;line-height: 13pt}
--></style>
</head>
<body>
<%if mskrindex="ok" then%>
<p align="center"><b>成功生成文件,<span lang="en-us">[<a target="_blank" href="../<%=files%>.htm"><%=files%>.htm</a>]</span></b>
<%else%>
  <div align="center">
    <center>
  <table border="0" width="30%" cellspacing="1" cellpadding="0" bgcolor="#D4D4D4">
    <tr> 
      <td width="50%">
        <p align="center"><b>生成文件<span lang="en-us">[<a target="_blank" href="../<%=files%>.htm"><%=files%>.htm</a>] 
        (</span><span lang="zh-cn">模版文件mb_<%=files%>.asp</span><span lang="en-us">)</span></b></td>   
    </tr>   
    <tr>    
      <td width="50%" height="26" bgcolor="#FFFFFF">
      <form name=pwd method="post" action="?file=<%=request("file")%>">
        <table border="0" width="100%" cellspacing="1" cellpadding="0">
          <tr>    
            <td><textarea rows="19" name="mb" cols="102">
<%if request("file")="tj" then%>
<%else%>
<!--#include file="mb_indexall.asp"-->
<%end if%></textarea></td>    
          </tr>    
          <tr>    
            <td nowrap>    
              <p align="center">        
    <input name="change" class=buttonface value="确认生成全部歌曲文件" type='submit'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;     
    <input type="reset" value="还原" name="B2"></td>    
          </tr>    
        </table>  
        </form>   
      </td>        
    </tr>    
  </table>        
    </center>
  </div> 
<%end if%>   
</body>    
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -