关于VB与Oracle数据库中的日期转换

　　在数据库的开发过程中，你可能会遇到ORACLE与VB的日期类型不匹配，无法直接比较的问题。而VB中又没有专门的函数可以转换ORACLE的日期，这个问题该如果解决呢？其实在ORACLE 的自带函数库里有一个很有用的函数TO_DATE（），它可以将日期字符串按照自己定义的格式转换为ORACLE格式的日期。示例代码如下：
　　
　　声明：Cn 为数据库链接对象
　　Dim datBirthday as Date 注释：出生日期
　　Dim strSql as String 注释：SQL语句
　　Dim rs as ADODB.Recordset 注释：结果集对象
　　
　　DatBirthday=# 10/1/1980 #
　　StrSql = "SELECT NAME FROM TABGROUP_2001" _
　　&" WHERE BIRTHDAY= TO_DATE(注释："&Cstr(DatBirthday) &"注释：，注释：yyyy-mm-dd注释：)
　　rs.open strSql
　　
　　注意函数后面的部分：YYYY-MM-DD，这是你提供的日期字符串的日期格式参数，ORACLE 将根据你的格式参数读取日期（表1中列出经常会用到的参数）。
　　如果要还原回来怎么办呢？没关系，我们还有另一个函数TO_CHAR(date)，它与To_DATE是一对反函数，使用的格式也与TO_DATE类似，这里也举一个简单的例子，假设我们要查询系统时间，那么格式如下：
　　SELECT TO_CHAR(SYSDATE,注释：DD-MON-YYYY HH24:MI:SS注释：) "Right Now"
　　From Dual;
　　结果显示：
　　Right Now
　　―――――――――――――――――――
　　16－Nov－2001 14：23：22
　　
　　对照下面的参数表，相信你很快就能够掌握这两个函数的应用的
　　日期格式参数 含义说明
　　D 一周中的星期几
　　DAY 天的名字，使用空格填充到9个字符
　　DD 月中的第几天
　　DDD 年中的第几天
　　DY 天的简写名
　　IW ISO标准的年中的第几周
　　IYYY ISO标准的四位年份
　　YYYY 四位年份
　　YYY,YY,Y 年份的最后三位，两位，一位
　　HH 小时，按12小时计
　　HH24 小时，按24小时计
　　MI 分
　　SS 秒
　　MM 月
　　Mon 月份的简写
　　Month 月份的全名
　　W 该月的第几个星期
　　WW 年中的第几个星

【责编:admin】

--------------------next---------------------