webForumDet fria alternativet

Ta bort nummer som finns

.NET

0 svar · 154 visningar · startad av saw

Medlem sedan mars 20011 880 inlägg
Frågan#1

Jag registrerar mina låtar som bl a ArrNo. Nu följer inte ArrNo kronologisk ordning, beroende om den är inspelad eller ej.
Så de kan vara registrerade som:
002
005
006
012
013
024
osv

Nu skulle det vara bra att få reda på vilka nummer som INTE är registrerade.
Så här har jag försökr:

con.CursorLocation = adUseClient
'Eftersom det finns några cover, och de börja på C så vill jag inte ha de med.
SQL = "select arrno from t_songtitlar where arrno not like 'c%' order by arrno"
Set rst = con.Execute(SQL)

'Här tar jag fram det högsta ArrNo
rst.MoveLast
If Not rst.EOF Then
stSista = CLng(rst(0))
End If

'och börjar ifrån början
rst.MoveFirst

For j = 1 To stSista
Do While Not rst.EOF
List2.RemoveItem CLng(j)
rst.MoveNext
Loop
Next j

På pappret så borde väll detta fungera, men det gör det inte.
Jag får inga felmedelanden, men fel ArrNo tars bort.
Vad gör jag för fel, eller kan man göra på ett annat sätt?

249 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
120 ms — deklarationer (db)
0 ms — hämta statistik (cache)
126 ms — hämta tråd, inlägg och bilagor (db)
116 ms — ändringar (db)