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

首頁 > 編程 > VBScript > 正文

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

2019-10-26 17:57:20
字體:
供稿:網(wǎng)友

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

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

<SCRIPT LANGUAGE="VBScript">
     ' 對 Script 標(biāo)記進行語法分析時執(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 "歡迎進入 VBScript 世界。"
      Document.Write "現(xiàn)在是 "
      Document.Write Date() & " 的 " &Time() & "。"
     End Sub
    </SCRIPT>

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表

圖片精選

主站蜘蛛池模板: 永仁县| 会泽县| 余干县| 蕉岭县| 巍山| 巴彦淖尔市| 新乐市| 深圳市| 六安市| 来凤县| 呈贡县| 崇州市| 广南县| 昭平县| 阿拉善盟| 邢台市| 炎陵县| 全椒县| 淳化县| 隆昌县| 邵武市| 泰州市| 鲁甸县| 林口县| 巩留县| 洪湖市| 宁德市| 裕民县| 尉犁县| 五华县| 长宁区| 青岛市| 罗江县| 平安县| 昌吉市| 双峰县| 莆田市| 衡阳市| 上杭县| 灵寿县| 舞钢市|