インターネット上のライブデータ

Question

私は非常にシンプルな視覚的な基本的なwinformアプリケーションを持っています。これは単なるカウンタです。このデータをウェブページに表示するにはどうすればよいですか？ここで

は私のコードです：

Public Function GetTime(Time as Integer) As String 
    Dim Hrs  As Integer 'number of hours ' 
    Dim Min  As Integer 'number of Minutes ' 
    Dim Sec  As Integer 'number of Sec  ' 

    'Seconds' 
    Sec = Time Mod 60 

    'Minutes' 
    Min = ((Time - Sec)/60) Mod 60 

    'Hours' 
    Hrs = ((Time - (Sec + (Min * 60)))/3600) Mod 60 

    Return Format(Hrs, "00") & ":" & Format(Min, "00") & ":" & Format(Sec, "00") 
End Function 

Answer 1

私はWebページを作成し、エクセル

からのHTTPリクエストでそれを送信し、このサイト上の手順に従います。ここではhttps://codingislove.com/http-requests-excel-vba/

は一例です上記のデータを送信するためにPOSTリクエストがどのように表示されるのか（これはテストしていませんが、正しく見えます）：

Public Sub sendRunTime(min as Integer, sec as Integer, hrs as Integer) 
    Dim xmlhttp As New MSXML2.XMLHTTP, myurl As String 
    myurl = "http://url/15oxrjh1" 
    xmlhttp.Open "POST", myurl, False 
    xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 
    xmlhttp.Send "min="&min&"&sec="&sec&"&hrs="&hrs 
End Sub 

ライブとしてではなくてもかなり速い別のオプションは、VBAにSQLデータベースのエントリを更新させて、そのWebページを読み取らせることです。アプリケーションのランタイムをWebサイトに送信する場合は、これは最善の方法ではありませんが、アプリがまだ遠隔地から実行されていることを知るために毎分更新すれば、これはうまくいく可能性があります。