24. november 2006 - 11:38Der er
3 kommentarer og 1 løsning
Problemmer med movenext
Hej
Jeg har et problem med en movenext hvor den går fra ID = 750 til ID = 788 istedet for ID = 751. Tabellen har ID som primærnøgle og typen på feltet ID er autonummerering. Håber der er en der kan hjælpe mig.
mvh Flemming
Her er koden.
Set db = CurrentDb Set updatedate = db.OpenRecordset("TabelNavn")
updatedate.MoveFirst While Not updatedate.EOF If Left(updatedate.Fields!ipadresse, 3) = "200" Then tempdate = updatedate.Fields!ipadresse Else If Not (Left(updatedate.Fields!Time, 1) = "#") Then updatedate.edit updatedate.Fields!Date = tempdate updatedate.Update End If End If updatedate.MoveNext Wend
I need it because I import some logs into access from .txt. I need to loop through theese logs from the first to the last to identify some dates which i then update to the following records until I meet a new date.
Maybe not the best approach though but, it is a one time script and.... now it works :-)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
