INSERT文を使ってカンマがあるデータをＤＢに登録するにはどうしたらよいですか (ID:101525)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

> 例えばfd2の項目にカンマデータがありますと桁がずれます。
桁ズレは、データの入出力方法の問題では無いでしょうか。
Oracle を使っているかどうかは、関係の無い話かと思います。

また、最初の質問文にあるカンマというのは、
全角「，」であって(ＣＯ．，ＬＴＤ)、
半角「,」では無かったはずです。

何が問題になっているのか、質問内容を整理しなおしてみてください。

> 例えばfd2の項目にカンマデータがありますと桁がずれます。
当方環境ではずれません。ファイルの作成方法を確認してください。

-------------------
Dim a As String, b As String, c As String, d As Long, e As Date
a = "ＣＯ．，ＬＴＤ"
b = "CO.,LTD."
c = "12,345"
d = 12345
e = Now()

Open "C:\sample.txt" For Output As #100
Write #100, a, b, c, d, e
Close #100

Dim fd1 As String, fd2 As String, fd3 As String, fd4 As Long, fd5 As Date
Open "C:\sample.txt" For Input As #200
Input #200, fd1, fd2, fd3, fd4, fd5
Close #200

Debug.Print "fd1=[" & fd1 & "]"      'fd1=[ＣＯ．，ＬＴＤ]
Debug.Print "fd2=[" & fd2 & "]"      'fd2=[CO.,LTD.]
Debug.Print "fd3=[" & fd3 & "]"      'fd3=[12,345]
Debug.Print "fd4=[" & fd4 & "]"      'fd4=[12345]
Debug.Print "fd5=[" & fd5 & "]"      'fd5=[2009/02/02 11:06:01]

'『"12,345",12345,"ＣＯ．，ＬＴＤ","CO.,LTD.",#2009-02-02 11:06:01#
'』
Shell "notepad.exe C:\sample.txt", vbNormalFocus
-------------------

ちなみに、Input # ステートメントというのは、Write # ステートメントで
出力したデータの読み込みに使うものであって、Print # ステートメントで
書きこんだ物や、CSV ファイルの読み込みに使う物では無い事にも注意が必要です。

←解決時は質問者本人がここをチェックしてください。

戻る