把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>
相关文档:
代码如下:
Function RemoveHTML(strText)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
RemoveHTML = replace(RemoveHTML," "," ")
End Function
这是最基本的正则替换,有某些特殊字符还没过滤,可自行添加 ......
IIS无法访问asp!
解决办法!今天打开电脑发现IIS无法访问asp页面。
提示:Server Application Error 然后就有了下面的一段话。
The server has encountered an error while loading an application during the processing of your request. Please refer to the event log for more detail information. Please contact ......
<script>window.parent.document.getElementById('BIframe').src='B.aspx';</script>
http://www.cnblogs.com/lijigang/archive/2007/05/18/751943.html
再来看看第二种刷新方法:“重载页面”
<script>window.parent.document.frames.BIframe.RefreshmyForm();</script>
<scri ......
Using the global.asa to schedule ASP code execution.
Have you ever had some asp code that needed to execute every once in a while but, you just didn't know how ......
刚刚 看到这么一个问题,这里也做个标记:http://topic.csdn.net/u/20080411/14/7b0f9da5-0413-4149-91e9-72c3df3018a3.html?seed=327251592
第一种方式:
//在Visual Studio 2008中调试通过
testPop_Page.aspx:主页面ASPX代码
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
  ......