2012-08-03 46 views
0

我正嘗試在VB.NET中重新創建PHP的microtime(true)以創建microtime(1344004866.8658),儘管我沒有太多運氣!PHP的Microtime(true)等價於VB.NET?

我已經在網上搜索了所有&似乎無法找到任何幫助!

我使用下面的函數來創建一個標準的Unix時間戳:

Public Function TimeToUnix(ByVal dteDate As Date) As String 
     If dteDate.IsDaylightSavingTime = True Then 
      dteDate = DateAdd(DateInterval.Hour, -1, dteDate) 
     End If 
     TimeToUnix = DateDiff(DateInterval.Second, #1/1/1970#, dteDate) 
    End Function 

雖然我完全失去了作爲我將如何改變這個函數創建一個microtime中!

任何幫助將非常appretiated :-)

回答

0

啊,終於找到了& ammended它夏令這幫助:

Public Function GetUnixMicroTime(ByVal dates As DateTime) As String 
     If dates.IsDaylightSavingTime = True Then 
      dates = DateAdd(DateInterval.Hour, -1, dates) 
     End If 
     Dim origin As DateTime = New DateTime(1970, 1, 1, 0, 0, 0, 0) 
     Dim diff As TimeSpan = dates - origin 
     Return CStr(diff.TotalSeconds) 
    End Function