掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
CSVファイルをデータグリッドに表示するには？ (ID：80099)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
データアクセスが違ってたんですね。ありがとうございます。 以下のようにすると、１行１項目のみですが表示されるように なりました。表示された後、「現在の行は使用できません」という メッセージが出ますが・・ Dim CN As New ADODB.Connection Dim RS As New ADODB.Recordset Dim Path As String Dim txtDRIVER As String Dim Data As String Dim strSQL As String Dim strProvider As String Path = "C:\Windows\System32\" Data = "カレンダー.csv" strProvider = "Provider=MSDASQL;Extended Properties=""" txtDRIVER = "DRIVER={Microsoft Text Driver (*.txt; *.csv)};DBQ=" CN.ConnectionString = strProvider & txtDRIVER & Path & """" CN.Open strSQL = "Select * From " & Data RS.Open strSQL, CN, adOpenStatic, adLockPessimistic Set DataGrid1.DataSource = RS RS.Close CN.Close Set RS = Nothing Set CN = Nothing
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.