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

📄 html.asp

📁 java_blog是一个非常好的blog
💻 ASP
字号:
<%if session("admin")<>"" and Request.Cookies("admin")<>"" then%>
<%
output_filename="index.html"
if request("body")<>"" then
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.CreateTextFile(server.mappath(""&output_filename&""))
fout.Write request("body")
fout.close
set fout=nothing
set fso=nothing
makeindex="ok"
end if
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>首页生成</title>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312" />
<META http-equiv=pragma content=no-cache />
<META http-equiv=expires content=0 />
<style>
td{font-size:9pt;line-height:120%} 
body{font-size:9pt;line-height:120%} 
a:link       { color: #0033CC; text-decoration: none }
a:visited    { color: #0033CC; text-decoration: none }
a:active     { color: #FF0000; text-decoration: none }
a:hover      { color: #000000; text-decoration: underline}
</style>

<script language="Javascript">
<!-- hide
function insertsmilie(smilieface){

	document.frmAnnounce.body.value+=smilieface;
}
// -->
</script>
</head>
<body leftmargin="0">
<%if makeindex="ok" then%>
<table width="98%" height="98%" border="0">
  <tr>
    <td><table width=100%>
        <tr> 
          <td valign="middle"><div align="center"><font color=#FF0000>已成功生成HTML首页</font><br><br>
              <a href="index.html" target="_blank">查看index.html</a><br><br>
              <a href="javascript:history.back(-1);">返回上页</a></div></td>
        </tr>
      </table></td>
  </tr>
</table>
<td align="center"> 
  <%else%>
  <table width="310" height="250" border="0" align="center" cellpadding="2" cellspacing="0" style="border-collapse: collapse">
    <form name="frmAnnounce" method="post" action="">
    <tr> 
      <td valign="middle"> <div align="center"><b>首页生成文件:<a target="_blank" href="<%=output_filename%>"><%=output_filename%></a> 
            ,源文件:<a  target="_blank" href="index.asp">index.asp</a></b></div></td>
    </tr>
    <tr> 
      <td height="98%" align="center" bgcolor="#FFFFFF"> <textarea style="width=99%;height=80%" rows="30" name="body" cols="40"><!--#include file="./index.asp"--></textarea> 
        <table width="98%" height="30">
          <tr> 
              <td> 
                <div align="center"> 
                  <input name="change" class=buttonface value=" 生成首页HTML " type='submit'>
              </div></td>
          </tr>
        </table> 
  </form>
</table>
<%end if%>
<%End if%>
</body>    
</html>

⌨️ 快捷键说明

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