9月 072013
 

注意:下記のコードはVB 6.0に適応する
目的:CSVファイルをデータソースとして、読み込むこと
[vb]Me.Adodc1.ConnectionString = "Driver={Microsoft Text Driver (*.txt; *.csv)};DefaultDir=" & App.Path
Me.Adodc1.RecordSource = "select * from outputtemp.csv"
Me.Adodc1.Refresh
Set Me.DataGrid1.DataSource = Me.Adodc1.Recordset
[/vb]

 Tagged with: