Mengambil Tanggal Database SQL Server VB.Net

Pada saat kita membuat sebuah program transaksional, maka kita harus mempertimbangkan bagaimana caranya agar user tidak nakal dalam memasukkan data. Salah satu celahnya adalah dengan bermain tanggal. Sesuai sifatnya transaksional, maka pengerjaannya harus pada saat itu juga. Bila ada yang ketinggal pada hari sebelumnya, maka harus sepengetahuan supervisornya.
Untuk mengatasi hal itu, dibawah ini saya sajikan sintaks untuk mengambil tanggal dari database SQL server

        Dim conn As New Data.Odbc.OdbcConnection
        Dim connectionString As String
        connectionString = "DSN=PO;UID=SA;Pwd="
        conn = New Odbc.OdbcConnection(connectionString)
        Dim da As Odbc.OdbcDataAdapter = New Odbc.OdbcDataAdapter
        Dim query As String
        query = "select getdate() as tglserver"
        Dim ds As New DataSet
        da.SelectCommand = New Odbc.OdbcCommand(query, conn)
        Try
            If conn.State = ConnectionState.Closed Then conn.Open()
            da.Fill(ds, "test")
            Return (ds.Tables("test").Rows(0).Item(0).ToString())
        Catch ex As Exception
            MsgBox("Tidak Data Yang ditemukan!", MsgBoxStyle.Exclamation)
        End Try
        conn.Close()

Asumsi :
DBConnString adalah sebuah koneksi string menuju database SQL Server