投稿日	： 2002/10/04(Fri) 14:21
投稿者	： Honda
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^5: ＳＱＬについて

> 自分なりにもその方法でやってはいたのですが、
> 「パラメータが少なすぎます」と言われます。
> 以下にソースを展開しますので、間違いを指摘してもらえませんか？
>
> Private Sub DBList1_DblClick()
>     Dim DB As Database      'データベース
>     Dim TB As Recordset     'レコードセット
>     Dim strSQL As String    'ＳＱＬ文
>    
>     'ＳＱＬ文の作成
>     strSQL = "SELECT * "
>     strSQL = strSQL & "FROM 名簿 "
>     strSQL = strSQL & "WHERE "
>     strSQL = strSQL & "[氏名] = "
>     strSQL = strSQL & DBList1.Text
>
>     Set DB = DBEngine.OpenDatabase("C:\My Documents\名簿データ.mdb")
>     Set TB = DB.OpenRecordset(strSQL, dbOpenDynaset)
>      
>     Text1(0).Text = TB!ID
>     Text1(1).Text = TB!氏名
>     Text1(2).Text = TB!電話番号
>     Text1(3).Text = TB!都道府県
>     Text1(4).Text = TB!住所
>     Text1(5).Text = TB!趣味
>    
>     TB.Close
>     DB.Close
>    
> End Sub
strSQLが違います。
フィールドが文字型なら'で囲み日付型なら#で囲みます
     strSQL = "SELECT * "
     strSQL = strSQL & "FROM 名簿 "
     strSQL = strSQL & "WHERE "
     strSQL = strSQL & "[氏名] = '"
     strSQL = strSQL & DBList1.Text & "'"

★ - ＳＱＬについて - たま 10/04-11:27No.831
• Re: ＳＱＬについて - A221 10/04-11:39 No.832
  • Re^2: ＳＱＬについて - たま 10/04-11:45 No.834
    • Re^3: ＳＱＬについて - A221 10/04-12:35 No.835
      • Re^4: ＳＱＬについて - たま 10/04-13:29 No.839
        • Re^5: ＳＱＬについて - Honda 10/04-14:21 No.841
          • Re^6: ＳＱＬについて - たま 10/04-14:30 No.842