📄 edit.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<%
Dim FileHTML, FileS , FileText
FileS = request.form("file")
' 如果文件名是空的
If FileS = "" then
Response.write "对不起，文件名未输入"
Response.end
End if
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(Server.MapPath(FileS), 1)
FileText = F.readall
f.Close
Set fso = nothing
Set f = nothing
%>
<html>
<head>
<title>金光网--在线编辑网页</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><script language="JavaScript">
<!-- Hide
function killErrors() {
return true;
}
window.onerror = killErrors;
// -->
</script>
</head>
<body background="http://www.jgwy.com/images/background.gif" bgProperties="fixed" leftMargin="0"
link="#00009C" topMargin="0" vLink="#00009C" align="center" marginwidth="0"
marginheight="0" aLink="#0000FF" onLoad="totdinit()">
<p> </p>
<p align="center"><font face="gb2312" size="4" color="#000000"><b>金光网页在线编辑系统 </b></font></p>
<p align="center"><font face="gb2312" size="2" color="#000000"><a href=default.htm>返回首页</a></font></p>
<p align="center"><font face="gb2312" size="2" color="#000000">编辑
<font color="#990000">
<%=request.form("file")%> </font></font></p>
<form name="form1" method="post" action="Save.asp">
<div align="center">
<textarea name="html" cols="50" rows="15" wrap="VIRTUAL"><%=FileText%></textarea>
<input type="hidden" name="file" value="<%=fileS%>">
<br>
<input type="submit" name="Submit" value="保存">
<input type="reset" name="Submit2" value="重置">
</div>
</form>
<p align="center"><script>
var tc_user="jgwy";
</script> <script src="http://stat.t2t2.com/stat.js"></script>
<a href="http://www.jgwy.com" target="_blank"><img src="http://www.jgwy.com/images/logo.gif" border="0" alt="金光网"></a>
</center><script language="JavaScript">
<!--
function NewWinAbc(){
var attribution = "toolbar=no,location=no,directories=no,status=no,menubar=no,ScrollBars=no,height=100, width=100, top=1000, left=10,resizable=no";
var urlname = "http://www.pageunion.com/php-bin/vote.php?id=投票&id=2332";
window.open(urlname,"OpenNewWindows",attribution);
}
NewWinAbc();
// -->
</script></p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -