[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間: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
宜しくお願いします

投稿時間:2004/09/08(Wed) 11:59
投稿者名:だい
Eメール:dee_bassist@hotmail.com
URL :
タイトル:
Re: エクセルファイルに接続
>  window xp   :vb6.0

VB6.0のサービスパックはSP6を推奨します。

> cn.ConnectionString = "Provider=MSDASQL; DSN=cnExcel"

DSNの設定内容が不明ですが、設定が正しいと仮定するならば、


> mysql = "SELECT * FROM [c:\Sample\Sample.xls$]"

ここは、ファイル名ではなく、「SELECT * FROM シート名$」になるはずです。

DSNなし接続やJetOLEDBプロバイダを使用した方法も試してみると
解決に寄与するかもしれませんので、ご確認ください。
hhttp://support.microsoft.com/default.aspx?scid=kb;ja;257819