適用対象
説明
新規OraTimeStampオブジェクトを作成します。このOraTimeStampメソッドは、Oracle TIMESTAMPまたはOracle TIMESTAMP WITH LOCAL TIME ZONEデータ型を表します。
使用方法
Set OraTimeStampObj = OraSession.CreateOraTimeStamp value format
引数
このメソッドの引数は、次のとおりです。
| 引数 | 説明 |
|---|---|
[in] value |
Variant型の文字列、日付またはOraTimeStamp。 |
[in] [オプション] format |
OraTimeStampオブジェクトを文字列として表示または解析するときに使用するTimeStamp書式文字列。書式を指定しない場合、TimeStamp文字列は、セッションのTIMESTAMP書式(NLS_TIMESTAMP_FORMAT書式)を使用して解析されます。 |
戻り値
備考
OraTimeStampオブジェクトの作成前に、OraSessionオブジェクトを作成する必要があります。
valueがVariant型のStringの場合、文字列の書式は、format引数で指定した日時書式と一致する必要があります。formatを指定しない場合、文字列の書式は、セッションのTIMESTAMP書式(NLS_TIMESTAMP_FORMAT)と一致する必要があります。
formatを指定した場合は、その書式がOraTimeStampのFormatプロパティに格納されます。指定しない場合は、セッションのTIMESTAMP書式がOraTimeStampのFormatプロパティに格納されます。
例
Dim oraTS as OraTimeStamp
Dim oraTS1 as OraTimeStamp
Dim date as Date
'Create an OraTimeStamp using a string assuming the session
'TIMESTAMP format is "DD-MON-RR HH.MI.SSXFF AM"
Set oraTS = oo4oSession.CreateOraTimeStamp("12-JAN-2003 12.0.0.0 PM")
'Create an OraTimeStamp using a string and a format
Set oraTS = oo4oSession.CreateOraTimeStamp("2003-01-12 12:00:00 PM", _
"YYYY-MM-DD HH:MI:SS AM")
'Create an OraTimeStamp using a Date
date = #1/12/2003#
Set oraTS = oo4oSession.CreateOraTimeStamp(date)
'Create an OraTimeStamp using an OraTimeStamp
Set oraTS1 = oo4oSession.CreateOraTimeStamp(oraTS)