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)容寫(xiě)入頁(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>
您可能感興趣的文章:
- 用vbscript實(shí)現(xiàn)修改屏幕保護(hù)的等待時(shí)間長(zhǎng)度
- 將WMI中的DateTime類(lèi)型轉(zhuǎn)換成VBS時(shí)間的函數(shù)代碼
- 用VBS修改（設(shè)置）系統(tǒng)時(shí)間和日期的代碼
- 校準(zhǔn)系統(tǒng)時(shí)間的VBS代碼
- VBS中獲取系統(tǒng)本次及上次開(kāi)關(guān)機(jī)時(shí)間的代碼(WinXP/win2003/Win7兼容版)
- vbs獲取當(dāng)前時(shí)間日期的代碼
- vbscript獲取文件的創(chuàng)建時(shí)間、最后修改時(shí)間和最后訪問(wèn)時(shí)間的方法
- VBS實(shí)現(xiàn)將當(dāng)前時(shí)間轉(zhuǎn)換成UTC時(shí)間
- VBS顯示當(dāng)前標(biāo)準(zhǔn)時(shí)間
相關(guān)文章
用vbs實(shí)現(xiàn)選擇顏色的兩種方法，一種帶組件，一種不帶2008-08-08
VBS編程教程 (第2篇)...2007-12-12
VBScript 中的字節(jié)數(shù)據(jù)操作函數(shù)
VBScript 中的字節(jié)數(shù)據(jù)操作函數(shù)...2006-06-06
一個(gè)收集的下載木馬并運(yùn)行的VBS代碼...2007-03-03
經(jīng)常有一些想學(xué)習(xí)vbs的朋友問(wèn)我一些問(wèn)題，昨天又有一個(gè)朋友問(wèn)我取路徑的問(wèn)題，今天就biweilun就一并寫(xiě)出來(lái)，希望對(duì)大家有點(diǎn)幫助，呵呵2008-07-07
用vbs確定腳本正在哪一個(gè)帳戶下運(yùn)行...2007-03-03
記錄客戶機(jī)操作的VBS腳本2008-05-05
最近對(duì) VBS 字符串 Chr(0) 注①截?cái)嘤懻摰帽容^多，看來(lái)有必要介紹一下 VBS 字符串的內(nèi)部實(shí)現(xiàn)。2012-01-01
Msxml2.XMLHTTP Msxml2.ServerXMLHTTP與緩存
用 VBS 發(fā)送 HTTP 請(qǐng)求時(shí)，首先想到的一般是 Msxml2.XMLHTTP（Microsoft.XMLHTTP 已經(jīng)不提倡使用了）。2011-10-10
VBS教程：VBscript語(yǔ)句-Function 語(yǔ)句
VBS教程：VBscript語(yǔ)句-Function 語(yǔ)句...2006-11-11