使用方法
OraBlob.CopyToFile "blob.bmp" amount,offset,chunksize OraClob.CopyToFile "clob.txt" amount,offset,chunksize OraBfile.CopyToFile "bfile.bmp" amount,offset,chunksize
引数
このメソッドの引数は、次のとおりです。
引数 | 説明 |
---|---|
[in ] filename |
書込み先ファイルの絶対パスとファイル名を指定する文字列。
|
[in ] [オプション] amount |
コピーする最大数を指定するInteger で、OraBLOB /OraBFILE の場合はバイト数、OraCLOB の場合は文字数を示します。デフォルト値は、LOBまたはBFILE のサイズです。 |
[in ] [オプション] offset |
このインスタンスのLOBまたはBFILE 値の絶対オフセットを指定するためのInteger で、OraBLOB /OraBFILE の場合はバイト数、OraCLOB の場合は文字数を示します。デフォルト値は1 です。 |
[in ] [オプション] chunksize |
各書込み操作に対するサイズをバイト数で指定するためのInteger 。chunksize パラメータが設定されていないか0 の場合、amount 引数の値が使用され、その量すべてが1つのチャンクで転送されます。 |
例
例: CopyToFileメソッドの使用方法
この例では、CopyToFile
メソッドの使用方法を示します。
データベースにPART
表があり、その表に有効なLOBデータが含まれていることを確認してください。また、「LOBデータ型の例で使用されているスキーマ・オブジェクト」の説明に従ってOraLOBスキーマ・オブジェクトをインストールしていることを確認してください。
Dim OraSession As OraSession Dim OraDatabase As OraDatabase Dim PartDesc as OraCLOB 'Create the OraSession Object. Set OraSession = CreateObject("OracleInProcServer.XOraSession") 'Create the OraDatabase Object by opening a connection to Oracle. Set OraDatabase = OraSession.OpenDatabase("ExampleDb", "scott/tiger", 0& 'Create a Dynaset containing a BLOB and a CLOB column set part = OraDatabase.CreateDynaset ("select * from part where" & _ "part_id = 1234",0) set PartDesc = part.Fields("part_desc").Value 'Copy the entire LOB content to partdesc.txt file PartDesc.CopyToFile "partdesc.txt"