Advertisement
2002C Databases/ Data Access/ DAO/ ADO #9208

Convert TimeStamp To String

Converts the timestamp data type of SQL server into a string that is then suitable for use in a where clause

AI

Riepilogo AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Codice sorgente
original-source
Public Function CvtTimeStamp(TimeSt As String) As String
' This function will recieve the eight byte string of binary data
' returned as the value of a timestamp column and convert it into
' as string in the format 0x000000000000000 suitable for the use in an sql statement
' where clause
Dim HexValue As String
Dim K As Integer
For K = 1 To 8
    HexValue = HexValue & Right$("00" & Hex(AscB(MidB(TimeSt, K, 1))), 2)
Next K
CvtTimeStamp = "0x" & HexValue
  
End Function
Commenti originali (3)
Recuperato da Wayback Machine