?? edit.asp
字號(hào):
<html>
<head>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html;charset=gb_2312-80">
<title>用戶留言</title>
<style>
<!--
table{ font-family: 宋體; font-size: 12pt }
a{ font-family: 宋體; font-size: 12pt; color: rgb(0,32,64); text-decoration: none }
a:hover{ font-family: 宋體; color: rgb(255,0,0); text-decoration: underline }
a:visited{ color: rgb(128,0,0) }
-->
</style>
</head>
<body bgcolor="#FF8040">
<% '讀文件
if Request.Cookies("password")="juchen" then
function htmlencode2(str)
dim result
dim l
if isNULL(str) then
htmlencode2=""
exit function
end if
l=len(str)
result=""
dim i
for i = 1 to l
select case mid(str,i,1)
case "<"
result=result+"<"
case ">"
result=result+">"
case chr(34)
result=result+"""
case "&"
result=result+"&"
case else
result=result+mid(str,i,1)
end select
next
htmlencode2=result
end function
whichfile=server.mappath(Request("path"))
Set fs = CreateObject("Scripting.FileSystemObject")
Set thisfile = fs.OpenTextFile(whichfile, 1, False)
counter=0
thisline=htmlencode2(thisfile.readall)
thisfile.Close
set fs=nothing
%>
<%if request("text")="" then%>
<form method="POST" action="edit.asp">
<table border="0" width="700" cellpadding="0">
<tr>
<td width="100%" bgcolor="#FFDBCA"><div align="center"><center><p>【<a
href="http://netspace.wojia.com"><font size="3">網(wǎng)辰</font></a>在線網(wǎng)頁(yè)維護(hù)系統(tǒng)1.0】</td>
</tr>
<tr align="center">
<td width="100%" bgcolor="#FFDBCA"><input type="text" name="path" size="90"
value="<%=Request("path")%> "></td>
</tr>
<tr align="center">
<td width="100%" bgcolor="#FFDBCA"><textarea rows="25" name="text" cols="90"><%=thisline%></textarea></td>
</tr>
<tr align="center">
<td width="100%" bgcolor="#FFDBCA"><div align="center"><center><p><input type="submit"
value="提交" name="B1"><input type="reset" value="復(fù)原" name="B2"></td>
</tr>
</table>
</form>
<%else
whichfile=server.mappath(Request("path"))
Set fs = CreateObject("Scripting.FileSystemObject")
Set outfile=fs.CreateTextFile(whichfile)
outfile.WriteLine Request("text")
outfile.close
set fs=nothing
Response.write "修改成功！你可以<a href='javascript:window.close();'>關(guān)閉本窗口</a>了"
end if
else
response.write "對(duì)不起!你的密碼已經(jīng)失效或者你輸錯(cuò)了密碼，請(qǐng)返回重輸"
response.write "<a href='index.asp'>【返 回】</a>"
end if
%>
</body>
</html>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -