📄 sql_make_index.asp

📁 后台地址：login.asp 管理员帐户：admin 密码：admin 数据库 Data/#23mn.cn.asp (电视电台数据) Data/Data_Admin.asp (管理信

💻 ASP

字号:

<!--#include file="Sql_Conn_Open.asp"-->
<!--#include file="Sql_Check.asp"-->
<%
if request("Action")="Index" then
response.write "<iframe height=0 width=0 scrolling=no align=middle border=0 frameborder=0 src=""Sql_Movie.asp""></iframe>"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>主页生成</title>
<link href="Images/Style.css" rel="stylesheet" type="text/css">
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<table width="98%" border="0" align="center" cellpAdding="0" cellspacing="0">
  <tr> 
    <td height="35" background="Images/Sql_top_bg.gif">　</td>
  </tr>
</table>

<%if request("Action") = "Index" then%>

<%
filename="../Index.html"
if request("body")<>"" then
set fso = Server.CreateObject("Scripting.FileSystemObject")
set fout = fso.CreateTextFile(server.mappath(""&filename&""))
fout.write request.form("body")
fout.close
set fout=nothing
set fso=nothing
end if
%>

<div align="center">
	<table border="0" width="80%" cellspacing="1">
		<tr>
			<td align="center">
			<form name="form2" method="post" action="">
               <textarea name="body" cols="80%" rows="20"><!--#include file="../Main.asp" --></textarea><br><br>
               <input type="submit" name="Submit" value="生成主页" style="float: right">
            </form> 
            </td>
		</tr>
	</table>
</div>
<!--#include file="Sql_Conn_Close.asp" -->
<%end if%>
</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -