気象情報の取得と記録――VBScriptでExcelを操作する
今回の主役はVBScriptです。インターネット経由で空港の気象情報を取り込み，取り込んだデータの中から気温と気圧をExcelシートに書き出します。Excelの起動，セルへの書き出し，終了もVBScriptにやらせます。VBScriptの中に書かれたExcel/VBAのコードが実行されていく様をご覧ください。VBScript恐るべしです。 インターネットにありそうでないものとして気象関係のデータがあります。天気予報はあっても，現在の気温や気圧のデータだけを提供しているところは意外に見つかりません。今回は，米海洋大気局（NOAA：National Oceanic ＆ Atmospheric Administration）が提供している気象情報を取り上げます。NOAAは世界中の空港の気象データを，「METAR」（Meteorological Aviaion Report，定時航空気象実況通報式
CSVファイル読み込み
Option Explicit Dim objFileSystem Dim objStream Dim strLine Dim arrFields Dim strMessage Set objFileSystem = CreateObject("Scripting.FileSystemObject") Set objStream = objFileSystem.OpenTextFile(Left(WSH.ScriptFullName,Len(WSH.ScriptFullName) - Len(WSH.ScriptName)) & "\CSV_TEST.csv", 1) Do Until objStream.AtEndOfStream strLine = objStream.ReadLine arrFields = Split(strLine,",") strMessage = strMes
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
