我想要获取Oracle服务器时间,服务器IP192.168.1.1,用户名USER,密码USER,要把得到的时间传到label1.caption
用click事件触发
Private Sub Command3_Click()End Sub
谢谢

解决方案 »

  1.   

    给你sql,其他自己写,别懒
     
       S_Sql = "Select To_Char(SYSDATE,'yyyy-mm-dd') " & _
                "     , To_Char(SYSDATE,'hh24:mi:ss') " & _
                "  From Dual                          "
      

  2.   

    看下 SQL 语句里有没有获得时间的函数  这样省事情
      

  3.   

    看下 SQL 语句里有没有获得时间的函数  这样省事情
      

  4.   

    看下 SQL 语句里有没有获得时间的函数  这样省事情
      

  5.   

    Private Sub Command3_Click()
    Dim cnn    As ADODB.Connection
        Dim rst    As ADODB.Recordset
        
        Set cnn = New ADODB.Connection
         cnn.ConnectionString = "Provider=MSDAORA.1;Data Source=new;User ID=user;Password=user;Persist Security Info=True"
        cnn.Open
        
       
        
        Set rst = cnn.Execute("select getdate()")
        
        Label1.Caption = FormatDateTime(rst.Fields(0).Value)
        
        
        Set rst = Nothing
        
        cnn.Close
        
        Set cnn = Nothing
    End Sub这样写会在Set rst = cnn.Execute("select getdate()")报错“找不到from关键字
    但select getdate()这个我在SQL 服务器上用的很好,但到聊ORACLE服务器就会报错
    请高手赐教~~
      

  6.   

    在VB里面写C代码 VB能编译吗? 那 在ORACLE上执行 SQL SERVER的函数  呢????
      

  7.   


    这个是oracle的sql
    可改成
    Select To_Char(SYSDATE,'yyyy-mm-dd') || ' ' || To_Char(SYSDATE,'hh24:mi:ss') From Dual
      

  8.   


    select getdate()
    换成:
    select sysdate from dual
    如 :jhone99 所言。