|
error になりませんか?
ウオッチウインドウでは??
変数にString(文字列型) Dim strBUF As String
Single(単精度浮動小数点型) 例えばDim sngS As Single
を使って Rs("価格").Value代入するとどうなりますか?
▼kulolo さん:
>はじめまして。
>現在、RecordSetを利用してプログラムを開発しております。
>その中でデータベースで格納されている値と違う値が入ってくる事に悩んでおります。
>
>Postgresのnumeric型に「8.3」などの値が格納されています。
>これをRecordSetにて取得すると「8」として取得してしまいます。
>
>
>具体的なコードとしては下記の通りです。
>
>Dim Rs As New ADODB.Recordset
>
>Rs.Open "select 価格 from 商品情報", Cn
>Do Until Rs.EOF = True
> Debug.Print Rs("価格").Value
>Loop
>Rs.Close
>
>恐らく、データ型がInt型などで入ってきているような気がしますが、
>これをOpen時に型指定して読み込む方法が分かりません。
>
>大変申し訳ないのですが、有識者の皆様のご意見をお聞きしたいです。
|
|