投稿日	： 2002/10/04(Fri) 13:29
投稿者	： たま
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^4: ＳＱＬについて

レスありがとうございます。

自分なりにもその方法でやってはいたのですが、
「パラメータが少なすぎます」と言われます。
以下にソースを展開しますので、間違いを指摘してもらえませんか？

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

★ - ＳＱＬについて - たま 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