国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 編程設計 > 正文

如何制作一個彈出式的調查窗口?

2020-06-19 13:52:21
字體:
來源:轉載
供稿:網友

    <%
    Dim bSurvey 

' 是否顯示調查表
    const bID="1" 

' 調查表的id

    bSurvey=false
    '
檢查調查表是否已經顯示過.
    if instr(request.Cookies("s"),":" & bID & ":")=0 then
   '
如果調查表沒有顯示,更新Cookie

      response.Cookies("s").expires = DateAdd("d",60,now())

      ' 設定Cookie過期時間60.
      response.Cookies("s").path = "/"

      ' 設定路徑.
      response.Cookies("s") = request.Cookies("s") & ":" & bID & ":"

' 寫入Cookie.

      bSurvey=true
    end if
    %>
   
知道我們給每個調查表一個id的好處了吧?如果有多個彈出窗口,可以很容易控制彈出順序的。

再在頁尾加入下面的ASP代碼,用來判斷是否彈出窗口:

<% if bSurvey then %>

<script>
      window.open("/survey/displaysurvey.asp?q=" &

' window.open()來打開新窗口.

bID,"SURVEY","width=350,height=400,top=0,left=0,scrollbars=yes")

</script>

<% end if %>
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 吉水县| 荥经县| 昌宁县| 广安市| 高青县| 阳曲县| 梧州市| 梁平县| 建平县| 土默特右旗| 祁连县| 白玉县| 东阿县| 阿拉善左旗| 安溪县| 荥经县| 漾濞| 攀枝花市| 大港区| 余干县| 噶尔县| 句容市| 襄樊市| 福泉市| 清水县| 青河县| 河津市| 邳州市| 正定县| 天水市| 岳普湖县| 巫溪县| 阳谷县| 仙居县| 平遥县| 黔江区| 岑巩县| 平乡县| 屏南县| 电白县| 雅江县|