vb.net 同步服务器时间

                'claOpt是我自定义的一个数据库连接读取类

　　　　　''提示同步服务器时间。Modify By Liu Sg On 2010-07-06
                Dim sql As String = "select ServerDateTime=getdate() "
                Dim sServerDT As String = claOpt.ExecSqlScalar(sql)       '得到数据库服务器时间
                Dim sLocalDT As String = Now.ToString                            '得到本地时间
                If sServerDT.Trim <> sLocalDT.Trim Then      &