国产探花免费观看_亚洲丰满少妇自慰呻吟_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 %>
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 泾阳县| 瑞安市| 城口县| 黎川县| 繁昌县| 琼中| 许昌县| 屯留县| 延寿县| 邳州市| 孝感市| 瓮安县| 蓝山县| 黄冈市| 昌图县| 连云港市| 寻乌县| 襄樊市| 东山县| 藁城市| 灵武市| 杨浦区| 万山特区| 临沂市| 洪湖市| 鄂托克前旗| 民县| 郴州市| 长治县| 宣化县| 闽清县| 昆山市| 马公市| 陇川县| 宁陕县| 肇庆市| 天津市| 云霄县| 龙口市| 稻城县| 仁布县|