替换字符小程序
时间:2007-01-04 来源:txkss
<html>
<head><title></title></head>
<body>
<div align="center"> <form name="form1" method="post" action="">
<textarea name="all" rows="5" cols="45">
<%=content%>
</textarea>
<p>
查找:
<input type="text" name="text1" size="8">
</p>
<p>
替换:
<input type="text"name="text2" size="8">
<input type="submit" nmae="submit1" value="确定">
</p>
</form>
<%
function content()
dim a,b,c,d
a=request.form("all")
b=request.form("text1")
c=request.form("text2")
if b="" then
response.write("天然林资源保护工程公益林建设和天然林资源保护工程管护情况。!")
else
d=replace(a,b,c)
response.write(d)
end if
end function
%>
</div>
</body>
</html>
<head><title></title></head>
<body>
<div align="center"> <form name="form1" method="post" action="">
<textarea name="all" rows="5" cols="45">
<%=content%>
</textarea>
<p>
查找:
<input type="text" name="text1" size="8">
</p>
<p>
替换:
<input type="text"name="text2" size="8">
<input type="submit" nmae="submit1" value="确定">
</p>
</form>
<%
function content()
dim a,b,c,d
a=request.form("all")
b=request.form("text1")
c=request.form("text2")
if b="" then
response.write("天然林资源保护工程公益林建设和天然林资源保护工程管护情况。!")
else
d=replace(a,b,c)
response.write(d)
end if
end function
%>
</div>
</body>
</html>
相关阅读 更多 +