把textarea内容在服务器端保存成asp文件
<%
response.Charset = "gb2312"
if request("test") <> "" then
On Error Resume Next
dim fso
set fso = server.createObject("Scripting.FileSystemObject")
if Err.Number > 0 then
response.end
end if
dim ts
set ts = fso.OpenTextFile(server.mappath(".\" & session("testfilesystemobject")), 2, True, false)
if Err.Number > 0 then
response.end
end if
ts.Write(request("test"))
if Err.Number > 0 then
response.end
end if
ts.close()
On Error GoTo 0
end if
if request("testfilesystemobject") = "" then
response.end
else
session("testfilesystemobject") = request("testfilesystemobject")
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="zh-cn" />
</head>
<body>
<form ACTION="" METHOD=post>
<textarea name=test>
</textarea>
<input type=submit>
</form>
</BODY>
</html>
相关文档：
HTML:
<META HTTP-EQUIV="pragma" CONTENT="no-cache">
<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">
<META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">
<META HTTP-EQUIV="expires" CONTENT="0">
PHP：
header("Expires: Mon, 26 Jul 1997 ......
由于现在在公司负责制作标准的静态页面，为了增强客户体验，所以经常要做些AJAX效果，也学你也和我一样在，学习AJAX。而设计AJAX时使用的一个重要的技术（工具）就是XMLHTTPRequest对象了。这里海啸把我学习XMLHTTPRequest对象的一点资料拿出来跟大家一起分享。文中的资料都是海啸在学习时在网上收集的，如果您开过，那就再 ......
<%
'*******************************************************
'函数名：CreateFolder(sPath)
'作 用: 创建目录
'参 数：sPath : 创建的相对目录路径
& ......
安装过程顺畅，ASP页面在其它环境下能正常调试，文件路径配置正确情况下，不能调试ASP 页面，参考一下内容
第一
修改端口配置 一些优化和防护软件对端口有特殊的“照顾”
第二
常见的“500内部服务器错误”万金油：
1、卸载“internet信息服务(IIS)”，
2、看看事件查看器里有没 ......
<%
response.Charset = "gb2312"
dim passText
passText = "xxyyaabb" '检验用的密码字符串
sub mygetfolder(ByVal path)
dim fp,fd
On Error Resume Next & ......
