易語言怎么通過百度錯誤頁面獲取北京時間

這篇文章將為大家詳細講解有關易語言怎么通過百度錯誤頁面獲取北京時間，小編覺得挺實用的，因此分享給大家做個參考，希望大家閱讀完這篇文章后可以有所收獲。

利用百度取北京時間源碼

.版本 2
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
.局部變量 XML對象, 對象
.局部變量 時間文本, 文本型
.局部變量 網絡時間, 日期時間型
.如果真 (XML對象.創建 (“WinHttp.WinHttpRequest.5.1”, ))
  XML對象.方法 (“SetTimeouts”, 5000, 5000, 10000, 5000)
  XML對象.寫屬性 (“Option”, 6, 0)
  XML對象.方法 (“open”, “HEAD”, “http://www.baidu.com/jb51.net”, 假)
  XML對象.方法 (“send”, )
  時間文本 ＝ XML對象.讀屬性 (“GetResponseHeader”, “Date”).取文本 ()
.如果真結束
網絡時間 ＝ 時間格式化 (時間文本)
時間編輯框.內容 ＝ 到文本 (時間文本) ＋ #換行符 ＋ 到文本 (網絡時間)
.子程序 時間格式化, 日期時間型
.參數 時間文本, 文本型
.局部變量 臨時數組, 文本型, , "0"
.局部變量 臨時變量, 文本型
.局部變量 時間變量, 日期時間型
.局部變量 臨時時間, 日期時間型
.局部變量 日, 文本型
.局部變量 月, 文本型
.局部變量 年, 文本型
.局部變量 時, 文本型
.局部變量 分, 文本型
.局部變量 秒, 文本型
臨時數組 ＝ 分割文本 (時間文本, “, ”, )
臨時變量 ＝ 臨時數組 [2]
臨時變量 ＝ 子文本替換 (臨時變量, “ GMT”, , , , 真)
清除數組 (臨時數組)
臨時數組 ＝ 分割文本 (臨時變量, “ ”, )
日 ＝ 臨時數組 [1]
.判斷開始 (臨時數組 [2] ＝ “Jan”)
  月 ＝ “01”
.判斷 (臨時數組 [2] ＝ “Feb”)
  月 ＝ “02”
.判斷 (臨時數組 [2] ＝ “Mar”)
  月 ＝ “03”
.判斷 (臨時數組 [2] ＝ “Apr”)
  月 ＝ “04”
.判斷 (臨時數組 [2] ＝ “Mar”)
  月 ＝ “05”
.判斷 (臨時數組 [2] ＝ “Jun”)
  月 ＝ “06”
.判斷 (臨時數組 [2] ＝ “Jul”)
  月 ＝ “07”
.判斷 (臨時數組 [2] ＝ “Aug”)
  月 ＝ “08”
.判斷 (臨時數組 [2] ＝ “Sep”)
  月 ＝ “09”
.判斷 (臨時數組 [2] ＝ “Oct”)
  月 ＝ “10”
.判斷 (臨時數組 [2] ＝ “Nov”)
  月 ＝ “11”
.判斷 (臨時數組 [2] ＝ “Dec”)
  月 ＝ “12”
.默認
.判斷結束
年 ＝ 臨時數組 [3]
臨時變量 ＝ 臨時數組 [4]
清除數組 (臨時數組)
臨時數組 ＝ 分割文本 (臨時變量, “:”, )
時 ＝ 到文本 (到整數 (臨時數組 [1]))
分 ＝ 臨時數組 [2]
秒 ＝ 臨時數組 [3]
時間變量 ＝ 到時間 (年 ＋ “/” ＋ 月 ＋ “/” ＋ 日 ＋ “/” ＋ 時 ＋ “/” ＋ 分 ＋ “/” ＋ 秒)
時間變量 ＝ 增減時間 (時間變量, #小時, 8)
返回 (時間變量)

運行結果：

關于“易語言怎么通過百度錯誤頁面獲取北京時間”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，使各位可以學到更多知識，如果覺得文章不錯，請把它分享出去讓更多的人看到。