投稿日 | : 2004/09/07(Tue) 14:05 |
投稿者 | : anax |
Eメール | : kouichi_anazawa@nbs.nyk.jp |
URL | : |
タイトル | : エクセルファイルに接続 |
市販の本のリストを入力したが、「操作が取り消されました(80040e4e)」が表示され
打ち切られた。
原因、わからず。教えを請いたい。
window xp :vb6.0 : データソースの作成(ODBCの MICROSOFT EXCEL DRIVERセット済み)
フォーム上に、Datagrid 表示。windowsとVBのセッティングで何か抜けているのではと疑われている?
------------------------------
Private Sub Form_Load()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim mysql As String
cn.ConnectionString = "Provider=MSDASQL; DSN=cnExcel"
cn.Open
mysql = "SELECT * FROM [c:\Sample\Sample.xls$]"
rs.Open mysql, cn, adOpenStatic
Set DataGrid1.DataSource = rs
End Sub
宜しくお願いします