こんばんは。
VB2005にてCSVファイルをテーブルへ、インポートする処理を作成しています。ネットで調べたコードを試しています。デバックは通るのですが、処理結果がテーブルへ出力されません。
(TESTdataset内にTable1を作成しています。)
何か解決案がありましたらご教示をお願いいたします。
また、
※1の'DataGridView1の文なのですが、コメントを外すと
宣言がされていない旨のメッセージが出てきてしまいます。
もし此方も解決案が御座いましたらご教示をお願いいたします。
--------------------------------------------------------------
以下コードです
--------------------------------------------------------------
Imports System.Data
Imports System.Data.OleDb
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Const csvPath As String = "c:\DB\"
Const csvFile As String = "TEST.csv"
Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & csvPath _
& ";" & "Extended Properties='text;FMT=Delimited'"
Dim objConn As New OleDbConnection(sConnectionString)
objConn.Open()
Dim objCmdSelect As New OleDbCommand("SELECT * FROM " & csvFile, objConn)
Dim objAdapter1 As New OleDbDataAdapter()
objAdapter1.SelectCommand = objCmdSelect
Dim objDataset1 As New DataSet()
Dim objTable As DataTable
Dim Col As DataColumn
objDataset1 = New DataSet("TEST")
objTable = New DataTable("Table1")
Col = New DataColumn("No")
Col.DataType = Type.GetType("System.Int16")
objTable.Columns.Add(Col)
Col = New DataColumn("Name")
Col.DataType = Type.GetType("System.String")
objTable.Columns.Add(Col)
Col = New DataColumn("出身")
Col.DataType = Type.GetType("System.String")
objTable.Columns.Add(Col)
objDataset1.Tables.Add(objTable)
objAdapter1.Fill(objDataset1.Tables(0))
※1'DataGridView1.DataSource = objDataset1.Tables(0).DefaultView
objConn.Close()
End Sub
End Class
---------------------------------------------------------
※お礼が遅れる場合がありますが、必ずしますので、その時は少々お待ちください。
No.1ベストアンサー
- 回答日時:
CSVの中身は
-----------------
No,Name,出身
1,Aさん,北海道
2,Bさん,沖縄
-----------------
っていうような感じですよね?
単に、
>DataGridView1.DataSource = objDataset1.Tables(0).DefaultView
が通らないのは、フォームに「DataGridView1」が存在していないだけです。
フォームのデザインで、コマンドボタンを貼り付けるようにDataGridViewを作成しましょう。
ツールボックスの中の「コモンコントロール」タブにコマンドボタンはありますが、DataGridViewは「データ」タブにあります。
そこから作成してあげるだけで、結果が表示されると思うのですが、、、、
それと、
>処理結果がテーブルへ出力されません
読み取った値を表示する以外に、「処理」とよべる処理が見当たらないのですが、、、
テーブルへの出力とは、どういった事を意味するかが、質問から読み取ることができませんでした。
上記内容で解決でなければ、補足を願います。
この回答への補足
こんにちは。
ネットや参考書を参照してなんとかなりそうです。
くだらない?事で悩んでしまいました^^
ご回答有難う御座いました。
こんばんは。
Fillメソッドの使い方を勘違いしていたようですTT
とても良いヒントになったと思います。
もっともっとBV精進せねばいけませんね。
もう暫く苦しんでみたいとおもいます^^;
ご回答有難う御座いました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る バッチからEXEの結果を受け取りたいのですが、 下記のバッ 1 2023/07/04 15:13
- Excel(エクセル) VBA フォルダ見える化のコードについて 2 2023/06/19 15:04
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- その他(プログラミング・Web制作) seleniumbasic chrome操作について 1 2023/03/29 15:40
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る EXEの実行内容の結果によって、戻り値を0か1かで返したい 1 2023/07/04 16:40
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルからアクセスにインポ...
-
グループ単位にCSVファイル...
-
ACCESS テーブルに2行目から取...
-
C#でaccdbファイルのテーブルの...
-
DataGridViewでの変更保存
-
アクセスマクロで、csv データ...
-
AccessからExcelファイルのデー...
-
(ACCESS)複数mdbからのデータ...
-
他ファイルのテーブルの情報を...
-
VBSのデータベース操作で、複数...
-
データを削除しても表領域の使...
-
Viewにインデックスは張れ...
-
Access レコードを追加できませ...
-
異なるスキーマからデータを抽...
-
datapumpの実行方法について
-
テーブルからのselectにおいて...
-
postgreSQLのint型は桁数指定が...
-
ORA-00959: 表領域'****'は...
-
Data Pump で大量データインポ...
-
DELETE文でFROM句を省略した場合
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルからアクセスにインポ...
-
C#でaccdbファイルのテーブルの...
-
ACCESS テーブルに2行目から取...
-
(ACCESS)複数mdbからのデータ...
-
テーブルのリンク(ACCESS)
-
他ファイルのテーブルの情報を...
-
Accessでボタンを押したらエク...
-
画面から入力した値がDBに登録...
-
アクセスマクロで、csv データ...
-
データ読込時のタイムアウト
-
jspのプログラムについて
-
csvをSQLiteに取り込むと文字化...
-
ACCESSとエクセルのリン...
-
ACCESSのVBAを利用して、Excel...
-
Access2019でフォームから入力...
-
リソースファイルとロケールに...
-
VBでCSVデータをMDB
-
グループ単位にCSVファイル...
-
アクセス初心者に注意点を教え...
-
ACCESS 2003では、テーブルのリ...
おすすめ情報