Advertisement
C_Volume2 Databases/ Data Access/ DAO/ ADO #72973

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

AI Summary: 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.

Source Code
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
Original Comments (3)
Recovered from Wayback Machine