亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

vbscript實(shí)現(xiàn)的根據(jù)不同時(shí)間段顯示不同的歡迎語(yǔ)

 更新時(shí)間:2013年04月03日 22:00:12   作者:  
頁(yè)面加載時(shí),瀏覽器遇到 Script 標(biāo)記。Script 標(biāo)記可能含有 Script 級(jí)代碼(不包含在過(guò)程之中),在對(duì) HTML 頁(yè)面進(jìn)行語(yǔ)法分析時(shí),將執(zhí)行此代碼。此代碼可使用瀏覽器提供的對(duì)象把內(nèi)容寫入頁(yè)面中

本例中,VBScript 代碼調(diào)用 Document 對(duì)象的 Write 方法來(lái)傳遞字符串。所有操作都在客戶端完成:無(wú)需指定服務(wù)器端操作、無(wú) PERL痕跡、穩(wěn)定、清晰!

復(fù)制代碼 代碼如下:

<SCRIPT LANGUAGE="VBScript">
     ' 對(duì) Script 標(biāo)記進(jìn)行語(yǔ)法分析時(shí)執(zhí)行此行
     Call PrintWelcome

     Sub PrintWelcome
      Dim h
      h = Hour(Now)
      If h < 12 then
       Document.Write "早上好!"
      ElseIf h < 17 then
       Document.Write "下午好!"
      Else
       Document.Write "晚上好!"
      End If
      Document.Write "歡迎進(jìn)入 VBScript 世界。"
      Document.Write "現(xiàn)在是 "
      Document.Write Date() & " 的 " &Time() & "。"
     End Sub
    </SCRIPT>

相關(guān)文章

最新評(píng)論