0

私はこれらの webrequests ループを実行しており、最初のリクエストから経過した時間 (UNIX 時間) を追跡する必要があります。例：

    Dim post1 String = "http://www.xxx.com/......" & UnixTimeNow1stCall & "......"
    Dim postReq1 As HttpWebRequest = DirectCast(WebRequest.Create(post1), HttpWebRequest)

    Dim post2 String = "http://www.xxx.com/......" & UnixTimeElasped1stCall& "......"
    Dim postReq2 As HttpWebRequest = DirectCast(WebRequest.Create(post2), HttpWebRequest)


    Dim post3 String = "http://www.xxx.com/......" & UnixTimeElasped1stCall& "......"
    Dim postReq3 As HttpWebRequest = DirectCast(WebRequest.Create(post3), HttpWebRequest)

*LOOP again*

等々。つまり、最初の呼び出しで現在の Unix 時間をロックする必要があり、後で (10 秒間隔で) 呼び出すたびに、この最初の呼び出しを参照する必要があります。

これを使用して、現在の Unix 時間を計算します。

Public Function UnixNow() As Long

    Dim _TimeSpan As TimeSpan = (DateTime.UtcNow - New DateTime(1970, 1, 1, 0, 0, 0))

    Return CLng(_TimeSpan.TotalSeconds)

End Function

UnixTime を呼び出すたびに現在の時刻が表示されるため、結果は常に 0 になります。何かヒントはありますか?

4

1 に答える 1

0

もちろん、UnixNow は常に現在時刻を表示します...

保存して差を計算する

Dim unixTimeFirstRequest Long = UnixNow()
Dim post1 String = "http://www.xxx.com/......" & unixTimeFirstRequest & "......"
Dim postReq1 As HttpWebRequest = DirectCast(WebRequest.Create(post1), HttpWebRequest)

Dim post2 String = "http://www.xxx.com/......" & UnixNow() - unixTimeFirstRequest & "......"
Dim postReq2 As HttpWebRequest = DirectCast(WebRequest.Create(post2), HttpWebRequest)


Dim post3 String = "http://www.xxx.com/......" & UnixNow() - unixTimeFirstRequest & "......"
Dim postReq3 As HttpWebRequest = DirectCast(WebRequest.Create(post3), HttpWebRequest)
于 2012-06-29T05:18:02.160 に答える