エラーでつまってます・・・お助け下さい

解決済

質問者：THUBAN
質問日時：2005/04/21 16:04
回答数：6件

VS2003.NETで開発中の初心者です。
以下のコード（Form1.vb）を実行すると次のエラーがポップアップされ“oADP.Fill(oDS, "ROOT")”のラインで止まります。

＜エラー＞
'System.Data.OleDb.OleDbException' のハンドルされていない例外が system.data.dll で発生しました。

どこがおかしいのかわかりません。
詳しい方がいましたら、ご教授下さいませ。

----------------------------
Imports System.Data.OleDb

Public Class Form1
　Inherits System.Windows.Forms.Form
　Private oConn As OleDb.OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0" & ";Data Source=..\USER.mdb")

「Windows フォームデザイナで生成されたコード」

　　Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　　'--DataAdapterの設定
　　　Dim oADP As OleDb.OleDbDataAdapter
　　　oADP = New OleDb.OleDbDataAdapter("SELECT *FORM TALK WHERE Node=0 ORDER BY No", oConn)
　　　'--DataSetの設定

　　　Dim oDS As New DataSet
　　　oADP.Fill(oDS, "ROOT")
　　　　　　　・
　　　　　　　・
　　　　　　　・
----------------------------

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (6件)

ベストアンサー優先
最新から表示
回答順に表示

No.6ベストアンサー

回答者： AlexSuns
回答日時：2005/04/22 17:08

>"SELECT * FROM TALK WHERE Node=" & Node & "ORDER BY No"

・「ORDER」の前にスペースが入っていない

ヘルプで「SQL エディタ」「クエリデザイナ」を調べてみて下さい

あとデバックの仕方も覚えたほうがいいですよ
エラーが出るところでブレークポイントを設定して対象のSQLをクイックウォッチ等でコピーし、
アクセスのクエリに貼り付けて正常に動作することを確認するとか...

- 0
- 件

通報する

この回答へのお礼

そのとおりでした！
やってみたら正常動作で結果表示されました。
助かりました！

サンプルコードが書籍だったため、スペースの入り無しがわかりにくくて、スペースが入っていることにまったく気が付きませんでした。
ＳＱＬ文の勉強も必要ですね。

あと、デバッグ方法ですが、変数の値を見るくらいしか出来ていませんでしたが、教えていただいた方法で、今後やってみようと思います。

どうも、ありがとうございました！

通報する

お礼日時：2005/04/22 17:18

No.5

回答者： AlexSuns
回答日時：2005/04/22 15:05

>"SELECT * FROM TALK WHERE Node=" & Node & "ORDER BY No"

このSQLは正確ですか？

この回答への補足

はい、前回の例もあるので何度も見直しました。
ちなみにサンプルで載っていたコードそのままの記述なので、間違いないと思います。
もちろん、ＤＢやデータもそれに従って、ちゃんと用意しているので存在しています。
サンプルでは、これで動作するような説明になっています。
やはり、ＳＱＬ文のどこかに誤りがあるとしか考えられないのでしょうか？

補足日時：2005/04/22 15:55

通報する

- 0
- 件

通報する

No.4

回答者： pen_pen_pen
回答日時：2005/04/21 20:02

一応・・・。

>SELECT *FORM TALK WHERE Node=0 ORDER BY No"

「FROM」が「FORM」になってますけど、実物は大丈夫ですよね？

この回答への補足

大変失礼いたしました。
Private Sub Form1_Loadの方は、おっしゃるとおり、FROMのスペルミスでした。
修正したところ、通りました。

が・・・

Private Sub Form1_Load内で呼んでいる、Private Sub NodeGetでも、
oADP.Fill(oDS, "Node")の行で、同じエラーが出てしました。

これも、ＳＱＬ文がおかしいのでしょうか？
ちなみに、この部分の* FROMはスペルミスはしてなかったです。

（ＳＱＬ文の箇所は、VS2003.NETでは構文チェックしてくれないんですね・・）

----------------------------------------
Private Sub NodeGet(ByVal Node As String, ByVal Root As String, ByVal Kaiso As Integer)
　Dim oADP As OleDb.OleDbDataAdapter
　Dim KaisoText As String
　Dim IntLoop As Integer

　For IntLoop = 0 To Kaiso
　　KaisoText += ""
　Next

　KaisoText += "+"
　oADP = New OleDb.OleDbDataAdapter("SELECT * FROM TALK WHERE Node=" & Node & "ORDER BY No", oConn)
　Dim oDS As New DataSet

　oADP.Fill(oDS, "Node")
　　　　　・
　　　　　・
　　　　　・
----------------------------------------