从Oracle数据库显示日期 [英] Show Date from Oracle database

查看:204
本文介绍了从Oracle数据库显示日期的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

你好,亲爱的,
根据以下代码,程序不显示"dat".
解决方法.
请尽快帮助我.

实际上,我无法将"dr.Item("End_Date").ToShortDateString()"分配为"dat"作为日期类型.

代码为:


Hello Dear,
According to following code program does not show ''dat''.
How to solve it.
Please help me soon.

Actually I cant assign ''dr.Item("End_Date").ToShortDateString()'' into ''dat'' as a date type.

Code As:


Dim dat As Date
cmd.Connection = conn
cmd.CommandText = "select End_Date from employee whereID='01'"
cmd.CommandType = CommandType.Text
Dim dr As OracleDataReader = cmd.ExecuteReader()
dat = dr.Item("End_Date").ToShortDateString()
If dr.Read() Then
    MessageBox.Show("Date is: " & dat)
End If

推荐答案

use

MessageBox.Show("Date is:"&dat.ToString());

或提供有关您的代码的更多详细信息.例如.它显示的内容(空,空字符串等)
use

MessageBox.Show("Date is:" & dat.ToString());

or give some more details regarding your code. eg. what it is showing (null, empty string etc.)


尝试一下

Try This

Try
            Dim dat As Date
            Dim conn As New OracleConnection
            Dim cmd As New OracleCommand
            cmd.Connection = conn
            cmd.CommandText = "select End_Date from employee whereID='01'"
            cmd.CommandType = CommandType.Text
            conn.Open()
            Dim dr As OracleDataReader = cmd.ExecuteReader()
            While dr.Read
                dat = dr.GetDateTime(0)
                MsgBox("Date is : " & dat.ToShortDateString)
            End While
            dr.Close()
        Catch ex As OracleException
            MsgBox("Database Error")
        Finally
            If conn.State = ConnectionState.Open then
               conn.Close
            End If
        End Try




快乐编码




Happy Coding


这篇关于从Oracle数据库显示日期的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆