VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/10/29(Wed) 17:22 |
| 投稿者 | ： トンヌラ |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： ADOを使ってCSVファイル読込 |
ADOを使ってCSVファイルを読み込むサンプルを改造しまして
グリッドでなくデザイナの中の仕入先マスタにおとしこみたいのですが
Microsoft ODBC TextDriver FROM句の構文エラーです となってしまいます
どこがおかしいのですか？
CommonDialog1.ShowOpen
DataFile = CommonDialog1.FileName
'データベースに接続するための情報を設定する
strProvider = "Provider=MSDASQL;Extended Properties="""
txtDRIVER = "DRIVER={Microsoft Text Driver (*.txt; *.csv)};DBQ="
CN.ConnectionString = strProvider & txtDRIVER & FolderName & """"
CN.Open 'コネクションをオープン
'Recordsetオブジェクトのオープン
strSQL = "Select * From " & DataFile
RS.Open strSQL, CN, adOpenStatic, adLockReadOnly, adCmdText 'ここでエラー
Set Buturyu.rs仕入先マスタ.DataSource = RS
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）