?? edit.asp
字號:
<%
Set fs = Server.CreateObject("Scripting.FileSystemObject")
File = Server.MapPath( "homepage.txt" )
Set txtf = fs.OpenTextFile( File )
If Not txtf.atEndOfStream Then ' 先確定還沒有到達結(jié)尾的位置
Content = txtf.ReadAll ' 讀取整個文件的信息
End If
%>
<HTML> <BODY>
<H2>個人主頁編輯器<HR></H2>
<FORM Action=display.asp Method=POST>
<TEXTAREA Rows=10 Cols=60 Name=Sample><%=Content%>
</TEXTAREA><P>
<INPUT Type=Submit Value=" 提交">
</FORM> </BODY> </HTML>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -