Notifikationer

Markér alle som læst Log ud

rsa Nybegynder

19. oktober 2002 - 15:50 Der er 9 kommentarer og
1 løsning

Test på EOF

Eksempel:
Do While Not rec3.EOF
If år = 2003 Then
rec3.Delete
rec3.MoveNext
Else
Rec3.MoveNext
End If
Loop

Hvis der ingen posteringer er i rec3, fungerer denne test ikke. De 2 foranliggende test til rec1 og rec2 bliver ligeledes ikke accepteret, selvom disse indeholder records. Fejlmeddelelse:
No items.
Hvorfor?

Synes godt om

kabbak Professor

19. oktober 2002 - 16:44 #1

prøv at bytte om sådan, men jeg har ikke testet det

Do
If år = 2003 Then
rec3.Delete
rec3.MoveNext
Else
Rec3.MoveNext
End If
Loop until EOF

Synes godt om

mikker Nybegynder

19. oktober 2002 - 17:30 #2

Hvad mener du med den ikke fungerer? Hvad er det du gerne vil have programmet til at gøre hvis der ikke er nogle posteringer i rec3 ?

Har du prøvet med en .MoveFirst ?

- Mikker

Synes godt om

martin_moth Mester

19. oktober 2002 - 17:31 #3

Start med en movefirst - ellers tjekker du ikke recordsættet fra toppen :o)
altså:

Rec3.MoveFirst '<--- Ny linie
Do While Not rec3.EOF
If år = 2003 Then
rec3.Delete
rec3.MoveNext
Else
Rec3.MoveNext
End If
Loop

Synes godt om

martin_moth Mester

19. oktober 2002 - 17:32 #4

Øv - jeg kom 86 sekunder for sent med mit svar - mikker kom før mig ;o)

Synes godt om

rsa Nybegynder

19. oktober 2002 - 17:56 #5

Movefirst er ingen løsning. Det starter jeg altid med.
Jeg er i gang med at undersøge test på BOF, som jeg tror er løsningen.
Så jeg mener at kabbak er på sporet.

Synes godt om

kabbak Professor

19. oktober 2002 - 21:34 #6

Der er jo også LOF længde på filen,
hvis du ved hvor neget hver data fylder,
kan du regne ud hvor mange data der er.

Synes godt om

mikker Nybegynder

19. oktober 2002 - 22:56 #7

Kan stadig ikke se hvordan det skal reagere, hvis der ikke er nogle records...

with rec3
If .recordcount > 0 then
.movefirst
Do While Not .EOF
If år = 2003 Then
.Delete
.MoveNext
Else
.MoveNext
End If
Loop
end if

- Mikker

Synes godt om

mikker Nybegynder

19. oktober 2002 - 22:57 #8

Eller:

if !år = 2003 then ...

Hvor kommer år fra?

- Mikker

Synes godt om

ocp Nybegynder

20. oktober 2002 - 00:23 #9

Det er ikke fordi du tilfældigvis laver en delete på sidste post i databasen og derefter en movenext?

Synes godt om

kabbak Professor

01. februar 2004 - 00:22 #10

er det ikke tid til at få lukket. ?

Synes godt om

Ny bruger Nybegynder

Din løsning...

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic	5	29/08/202512:28	04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic	0	05/08/202510:10	-
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic	0	16/05/202512:31	-
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic	1	22/04/202514:55	25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS