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

投稿日: 2005/05/27(Fri) 08:12
投稿者kara
Eメール
URL
タイトルSQLエラー

おはようございます
お世話になっておりますkaraです

SQL文をくんだのですが、下記のエラーがでます
色々調べてのですが今一つ分かりません。
ご指示ください。
よろしくお願いいたします。

ACCESS 2002 SP3
VB6.0 SP6



エラー
引数が間違った型、許容範囲外、または競合しています。


Private Sub Command1_Click()
Dim strSQL As String
    
    ' データベース接続を確立する
    Set cn = CreateObject("ADODB.Connection")
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "Data Source=c:\db1.mdb"
    
    ' SQLクエリーの設定
        
  strSQL = "SELECT テーブル1.住所, テーブル1.名前, テーブル1.役職 From テーブル1 WHERE
テー
ブル1.住所='東京'"

       ' レコードセットを取得する
    Set rs = cn.Execute(strSQL)
    
    ' レポートのデータソースを指定(レコードセットから情報を取得する)
    Set DataReport1.DataSource = rs
    
    ' レポートを表示(プレビュー)する
    DataReport1.Show


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

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

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