Helpz

[Denis_Rave]

é o seguinte

estou com uma conexao DATA ligada a um DB em Access

ai tem um codigo q é assim

   If Not Data1.Recordset.RecordCount = 0 Then
       Data1.Recordset.MoveFirst
   While Data1.Recordset.EOF = False
       Form1.List1.AddItem Data1.Recordset!Nome
       Data1.Recordset.MoveNext
   Wend
      Form1.Show
   End If

esse codigo é pra jogar o itens de um campo da tabela numa list em otro form.... ai na list do otro form ta assim

   frmanimesdb.Data1.Recordset.FindFirst ("Nome=") & List1.Text
   Unload Me

que é pra quando clika no nome ele abri no otro form os dados.....só q da um erro......dizendo q o Jet não consegue identificar sei la o q

alguém me ajuda??

vlw..........

[Graymalkin]

A linha...

frmanimesdb.Data1.Recordset.FindFirst ("Nome=") & List1.Text

... deveria ser:

frmanimesdb.Data1.Recordset.FindFirst "Nome='" & List1.Text & "'"

Assim como no VB temos que colocar strings (textos) entre aspas duplas ("), em uma SQL devemos colocar os textos em aspas simples (') (também é possível colocar aspas duplas, mas como isso já é usado no VB não fica nada prático).

Abraços,

Graymalkin

[Denis_Rave]

ahhh.....vo ve aki.....

[Denis_Rave]

é isso mesmo

Vlw cara.....