跟我学会用后台程序控制弹出窗口---用file access组件修改文件实例
我们经常需要在首页上做一个弹出窗口(其实我很讨厌这个东东),一般的办法是在<body> 中加入这样一句 onLoad="Window.open('new-window.htm','','width=300,height=250')" 其中new-window.htm为新开的窗口网页文件名,后页是宽度和高度,但如果是一会要这个窗口,一会又不要,并且常改这个窗口的内容的话,那真是太太麻烦了(阿余的头就这样,气死我了,有一天竟改了N次,以至于阿余发奋图强,写了这个小程序)。
基本思路:
1。要做这样一个程序,关键在于准确的在首页找到<body>标记,并在其中加上onLoad="Window.open('new-window.htm','','width=300,height=250')" ,使其成为<body onLoad="Window.open('new-window.htm','','width=300,height=250')" >, 怎么才能找到<body>呢?通过观察发现,整个首页就一个<body>,用ins函数找出<body>在页中的起始位置加上五就得到应插入的语句的位置。当然,还要能删除掉onLoad="Window.open('new-window.htm','','width=300,height=250')" 这一句,也就是删除掉从“<body ”到“')"”中间的语句,以撤消弹出窗口,我发现网页中也只有一个“')"” ,至少从首往后找的第一个就是我们要的“')"”。
2。要建立一个文件,名字叫new-window.htm,这比较简单,看后面的代码就知道了。
制作过程:
有了想法,下面我们开工了。
首先制作一个输入参数的页面,文件名为,newwindow.asp 在这个页面上有六个文本框,第一个名为name,用于输入窗口名称,第二个名为co1,用于填写页面底色,第三个名为co2用于填写文字颜色,第四个名为bg,用于填写底图文件名,第五个名为w,用于填写弹出窗口的宽度,第五个名为h,用于填写弹出窗口的宽度。还要一个滚动文本框,名为lr,用于填写要在弹出窗口中发布的内容。再建立三个按钮,第一个为建立弹出窗口,第二个为预览,第三个为撤消弹出窗口,按钮类型均为提交,名了分别为b1,b2,b3。表单提交后由newwindow1.asp文件处理,这个文件的代码如下(你也可按前面的说明自己写):
<!--#include file="window.ini"-->
<html>
<head>
<title>卓越电脑网站快车www.zydn.net</title>
</head>
<body bgcolor="#E0F0F8">
<div align="center">
<p>制作弹出窗口,请输入相关信息<br>
<form method="POST" action="newwindow1.asp">
<table border="1" width="100%" bordercolorlight="#000000" cellspacing="0" cellpadding="4" bordercolordark="#FFFFFF" bgcolor="#A4D1E8" style="font-size: 9pt">
<tr><td>窗口标题:</td><td colspan="2"><input type="text" name="name" size="62" style="border: 1 solid #6384C0" value="<%=name111%>"></td>
</tr><tr><td valign="top">窗口底色:</td> <td><input type="text" name="co1" size="9" style="border: 1 solid #6384C0" value="<%=co1%>"></td>
<td>窗口底图:<input type="text" name="bg" size="21" style="border: 1 solid #6384C0" value="<%=bglr%>"></td> </tr>
<tr><td valign="top">文字颜色:</td> <td colspan="2"><input type="text" name="co2" size="9" style="border: 1 solid #6384C0" value="<%=co2%>"></td>
</tr><tr><td valign="top">窗口大小:</td><td>宽:<input type="text" name="w" size="9" style="border: 1 solid #6384C0" value="<%=w%>">象素</td>
<td>高:<input type="text" name="h" size="9" style="border: 1 solid #6384C0" value="<%=h%>">象素</td> </tr>
<tr><td valign="top">窗口内容:</td><td colspan="2"><textarea rows="9" name="lr" cols="61" style="border: 1 solid #6384C0"><%=lr%></textarea></td>
</tr><tr><td colspan="3" align="center"><input type="submit" value="查看效果" name="B2"><input type="submit" value="建立弹出窗口" name="B1"><input type="submit" value="撤消弹出窗口" name="B3"></td>
</tr></table><p>窗口内容中的<p>用于表示换行</p> &