VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2006/02/20(Mon) 22:57
投稿者やまめ
Eメール
URL
タイトルCSVファイル内のデータの画面への表示

初歩的な質問で大変恥ずかしいですが、よろしくお願いします。

<やりたいこと>
CSVファイル内のデータをフォームに表形式で表示したい。
データを表上で編集や並び替えをする必要はないが、
外部信号にて、PLCから取り込んだデータを順に追加表示していきたい。
(同時にCSVにも書き込む)

<環境>
WindowsXP、VB6.0、Office2000

<試してみたこと>
まず、CSVファイルを表示するのをサンプル「ADOを使ってCSVファイルをMSHFlexGridに表示する
(284)」を使ってやってみようとしましたが、

(1)MSHFlexGrid1の貼り付け方が分からない・・・(初歩的で本当に恥ずかしいです。そもそも
MSFlexGrid1との違いもよくわかっていません。)

そこで、とりあえず、MSFlexGrid1に書き換えてやってみましたが、

(2)
  Set MSFlexGrid1.DataSource = RS    'MSHFlexGridにデータを代入

にて、「オブジェクト変数またはWithブロック変数が設定されていません。」となり、
うまくいきません。
この前の以下の設定に問題があるのでしょうか。

    'データベースに接続するための情報を設定する
    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


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -