用ASP编写更人性化的弹出窗口程序_ASP教程

推荐：初学者的ASP教程：常用ASP内置函数
函数，就是该语言封装了的一个功能块，以方便用户的调用。比如“now()”在VBScript中就是一个能显示出当前日期和时间的函数。至于具体为什么能显示，则是该语言内核所定的，用户只需

ASP实例：用ASP编写更人性化的弹出窗口程序，来帮我们制作一个不烦人的调查的方法。

用弹出窗口来显示调查表，被认为是达到我们收集访问用户信息的最方便快捷的方法。当制作出第一份调查表后，我们客气的询问人们是否愿意填这份表，但结果却令人失望。于是我们决定把这份调查表放到我们主页里，当人们访问时就自动弹出，其效果出人意料的好。

下面就是我们成功的秘诀：

1：自动弹出窗口只能显示一次，不管用户是否填写了调查表。

2：自动弹出窗口不能影响主页的显示速度。

3：自动弹出窗口在用户填写完调查表后，自动消失。

4: 自动弹出窗口显示在屏幕的左上方。

5：自动弹出窗口里不要加广告，因为我们的目的是得到用户的调查报告。

为了判断是否弹出窗口，我们用了一个小小的cookie。我们定义一个cookie可以多次使用并且判断多个弹出窗口。我们给这个cookie起名为“s”,它包含所有已经弹出的窗口的id。

现在，当用户访问主页时，我们判断请求的id是否已经包含在cookie中。如果cookie不存在，我们弹出窗口并且写入cookie，以防止窗口再次弹出。

在下面的例子里，我们在服务器端写入cookie,用javascript一样可以实现，我们选择服务器端，是因为它比较简单。

在我们主页的最开始，我们执行一下asp代码.这段代码要放在HTML输出之前，因为我们需要编辑header。

以下为引用的内容： <% Dim bSurvey ' 是否显示调查表 const bID="1" ' 调查表的id bSurvey=false ' 检查调查表是否已经显示过 if instr(request.cookies("s"),":" & bID & ":")=0 then ' 调查表没有显示，更新cookie ' 设定cookie过期时间为60天 response.cookies("s").expires = DateAdd("d",60,now()) ' 设定路径 response.cookies("s").path = "/" ' 写入cookie response.cookies("s") = request.cookies("s") & ":" & bID & ":" bSurvey=true end if %>

我们给每个调查表一个id,如果你有多个弹出窗口，可以很容易的有计划的输出。

我们在页尾加入一段asp脚本去判断是否弹出窗口，这段脚本方在页末，不影响主页的下载速度。这段脚本十分简单，它用window.open()来打开新窗口。

以下为引用的内容： <% if bSurvey then %> <SCRIPT> window.open("/survey/displaysurvey.asp?q=" & bID,"SURVEY","width=350,height=400,top=0,left=0,scrollbars=yes") </SCRIPT> <% end if %>

分享：ASP入门：认识ASP程序所使用的几种脚本语言
在浏览器中通过查看源代码的方式是无法看到ASP源代码的，你只能看到由ASP文件输出的结果，而那些只是纯粹的HTML而已。这是因为，在结果被送回浏览器前，脚本已经在服务器执行了。 实例： 用