Get Server DateTime Using SQLServer

Salah satu permasalah yang banyak terjadi pada aplikasi Client Server adalah masalah datetime, terkadang datetime client dan server tidak sama, hal ini disebabkan mungkin setiap komputer mempunyai seting-an masing masing, atau bisa juga karena batre cmos komputer client sudah rusak sehingga datetime nya selalu balik lagi ke awal. Hal ini dapat menyebabkan masalah dalam penyimpanan data transaksi, karena tahun bulan hari menit detik adalah hal yang sangat penting dan harus diperhatikan. Sebenarnya banyak cara untuk men-Syncronisasi DateTime Client Server (synchronization), Untuk kasus aplikasi yang berbasis database SQLServer, kita bisa gunakan perintah "GETDATE()".
Nah getdate ini kita simpan saja pada aplikasi / program client, sehingga semua client akan selalu mendapatkan datetime yang sama dengan server. Saya sudah buatkan function-nya.

Ini untuk VB.NET :

    Function GetDateTimeServer() As String

        Dim con As New Odbc.OdbcConnection("dsn=server")

        con.Open()

        Dim cmd As New Odbc.OdbcCommand("SELECT GETDATE() AS ServerDateTime", con)

        Return cmd.ExecuteScalar

    End Function

Ini untuk VB.6 :

    Function GetDateTimeServer() As String

        Dim con As New ADODB.Connection

        con.CursorLocation = adUseClient

        con.Open "dsn=server"

        Dim rec As New ADODB.Recordset

        Set rec = con.Execute("SELECT GETDATE() AS ServerDateTime")

        GetDateTimeServer = rec.Fields(0).Value

    End Function


Tags:
get datetime server, client server,get time server, get computer server time, current datetime, get server time, using servertime, sql server, getdate(), syncronize datetime server cilent