c/s结构,为了确保数据日期的统一性!程序需要读取获得服务器的日期时间!高手请指教!在线急等!

Question

c/s结构,为了确保数据日期的统一性!程序需要读取获得服务器的日期时间!如何能获得服务器端的日期数据然后付给本地程序里的变量?
高手指教了!谢谢兄弟们的支持!

Answer 1

楼上的你的方面,不是要使用winsok控件了嘛?而且还要接收信息和发送信息!
我是希望能在客户端程序运行,进行操作的时候自动获取数据库服务器端的时间!

Answer 2

Public Function GetServerTime(FrmString As String) As String'FrmString参数描述
'Long:2004年5月21日
'Short:2004－05－21
'Time:　2004-05-01 23:23:34    Dim rst As ADODB.Recordset
    
    Dim sql As String
    sql = "select getdate() ServerDate"
    
    Set rst = CnnToData.Execute(sql)
    
    If FrmString = "long" Then
    
        GetServerTime = FormatDateTime(rst!serverdate, vbLongDate)
        
    ElseIf FrmString = "short" Then
    
        GetServerTime = FormatDateTime(rst!serverdate, vbShortDate)
        
    ElseIf FrmString = "time" Then
    
        GetServerTime = rst!serverdate
    Else
    
        GetServerTime = ""
    End If
    
    rst.Close
    
    Set rst = Nothing
    
End Function

Answer 3

楼上的这个VB的内部函数嘛?还是自定义函数?如果可能你能不能加我的QQ13646844

Answer 4

To wwdzshen(神) :
    DTWUJP(建平.net)是通过使用SQLSERVER的内部函数GETDATE()来获取SQLSERVER时间，
Public Function GetServerTime(FrmString As String) As String 是VB编写的函数，使用了ADO你可以将GetServerTime的源代码加入你的程序中，就可以直接调用GetServerTime了。