admin_cssedit.asp

庐江二中

<%PageName="admin_AdminMana"%>
<!--#include file="session.asp"-->
<%checkAdmin3%>
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<!--#include file="top.asp"-->
<br>
<table border="1" width="90%" cellspacing="0" cellpadding="1" bgcolor="<%=MainBgColor%>">
<tr>
<td align=center valign=top>
<table border="1" cellspacing="0" cellpadding="0" Class="TableLine" bordercolorlight="<%=MainBColor%>" bgcolor="<%=MainCColor%>" width="100%">
<tr>
<td colspan=9 bgcolor="<%=MainTColor%>" height="22" align=center background="images/admin/b3.gif">编辑字体属性</td>
</tr>
<tr>
<td valign=top>
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
if request("save")="" then
Set objCountFile = objFSO.OpenTextFile(Server.MapPath("style.css"),1,True)
If Not objCountFile.AtEndOfStream Then fdata = objCountFile.ReadAll
else
fdata=request("fdata")
Set objCountFile=objFSO.CreateTextFile(Server.MapPath("style.css"),True)
objCountFile.Write fdata
end if
objCountFile.Close
Set objCountFile=Nothing
Set objFSO = Nothing
%>


<table width="100%" border="0" cellspacing="0" cellpadding="0">
<form method=post>
<tr>
<td width="97%" height="23" align="center">&nbsp;&nbsp;&nbsp;&nbsp;
<p>文件将被保存在你安装目录下的<font color="#FF0000">style.css</font>里，如果您的空间不支持<font color="#FF0000">FSO</font>，请直接编辑该文件！<br>
如果您对CSS的属性不了解，请不要随意编辑。</p>
</td>
</tr>
<tr>
<td width="97%" align="center">
<textarea name="fdata" cols="80" rows="40"><%=fdata%></textarea>
<br>
&nbsp; </td>
</tr>
<tr>
<td width="97%" align="center" height="60">
<input type="submit" name="save" value="确定">
<input type="reset" name="Reset" value="重置">
</td>
</tr>
</form>
</table>


</td>
</tr>
</table>
</td>
</tr>
</table>
<%
set rs=nothing%>