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

投稿日： 2004/10/12(Tue) 10:34
投稿者： yuta
Ｅメール：
ＵＲＬ：
タイトル： 日付を条件にしてデータを抽出する方法

はじめまして、早速ですが質問をさせていただきます。

今、VBとAccessを使ってスケジューラを作成しています。
SQLステートメントを使って、日付とその他の条件で、必要なデータをデータグリッドに出力させようとしているのですが、うまくいきません。

現在、下の通りにコードを記述しています。

--------------------------------------------------------------------------------------------
VB6.0,Access2000,ADOデータコントロールは2.5を使用しています。

T_Master,T_Sub,T_Work,T_Basyoの4つのテーブルがあります。

txtMotherDayで、抽出する日付が記入されています。フォーマットは、mm/dd/yyyyです。

'データグリッドの抽出

Dim mySQL As String     '抽出条件を代入するSQLステートメント

mySQL = "SELECT T_Sub.日付, T_Sub.連番, T_Sub.作業番号, T_Work.作業, T_Sub.場所番号," _
      & "T_Basyo.場所, T_Sub.詳細情報" _
      & "FROM T_Sub, T_Work, T_Basyo" _
      & "WHERE (((T_Sub.日付) = " & txtMotherDay.Text & "))" _
      & "AND (T_Work.作業番号 = T_Sub.作業番号)" _
      & "AND (T_Basyo.場所番号 = T_Sub.場所番号)" _
      & "ORDER BY 連番"

以下接続処理
--------------------------------------------------------------------------------------------

このときに、(((T_Sub.日付) = " & txtMotherDay.Text & "))" の部分を、
　　　　　　(((T_Sub.日付) = #10/01/2004#))"
のように直接日付を指定するとうまく抽出されるのですが、上のような記述になると、抽出されません。

どうすればよいのかご教授よろしくお願いします。

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

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