Lompat ke konten Lompat ke sidebar Lompat ke footer

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

Posting Komentar untuk "Get Server DateTime Using SQLServer"