title image


Smiley Re: Wie kriege ich EOF als Zahl?


Hallo,

mach das mal am besten so:





Private Sub Form_Open(Cancel As Integer)



Dim xs As DAO.Recordset

Set xs = CurrentDb.OpenRecordset("tblVokabeln")



If xs.RecordCount > 0 Then

Do Until xs.EOF

xs.Edit

xs!DeinFeldname = False

xs.Update

xs.MoveNext

Loop

End If

xs.Close

Set xs = Nothing

End Sub





Mit Gruß gruscho





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: