Databaser & SQLur Databashanterare & SQL
8 svar · 253 visningar · startad av LR^evil.sid
Tjena! Jag tänkte göra en arkiveringsprocedur men har kört fast. Frågar därför er om ni har någon lösning och om min tanke är rätt angående proceduren.
sql = "select count(*) from tabell"
Set rs = con.Execute(sql)
If Int(rs(0) - 100) > 0 Then
sql = "insert into arkiv select * from tabell order by id desc limit "&rs(0) - 100
Set rs = con.execute(sql)
[b]line 27[/b] While Not rs.eof
sql = "delete from tabell where id = "&rs(0)
con.execute(sql)
rs.MoveNext
WEnd
End If
Felmeddelande
ADODB.Recordset fel '800a0e78'
Åtgärden är inte tillåten när objektet är stängt.
/pagin/index.asp, line 27
Det här borde nog gå bättre:
sql = "select count(*) from tabell"
Set rs = con.Execute(sql)
If Int(rs(0) - 100) > 0 Then
sql = "insert into arkiv select * from tabell order by id desc limit "&rs(0) - 100
con.execute(sql)
Set rs2 = con.execute("select * from tabell order by id desc limit "&rs(0) - 100)
While Not rs2.eof
sql = "delete from tabell where id = "&rs2("id")
con.execute(sql)
rs.MoveNext
WEnd
End If
Testas på egen risk! ;)
Jag måsta alltså använda två recordset för att göra detta?
Eftersom jag inte riktigt fattar vad du ska göra vet jag inte, men när jag kollade på din kod såg det ut som om det var sådär du ville göra det. :)
Hoppsan! Måste varit trött när jag skrev denna fråga.
Vad jag vill göra är att plocka ut alla poster efter de första hundra, placera dem i en annan tabell och sedan ta bort posterna från ursprungstabellen.
Funkar koden jag skrev innan eller är det något fel i den? (Skulle vara bra att veta om man ska skriva om den ;))
Jo, visst fungerar den. Jag tänkte bara om det gick att göra det utan två recordset eftersom du i insert into redan skrivit select * from
LR^evil.sid skrev:
Jo, visst fungerar den. Jag tänkte bara om det gick att göra det utan två recordset eftersom du i insert into redan skrivit select * from
Jo, men det är en "version" av INSERT INTO, inte en SELECT-sats. :)
Ok, tack för hjälpen.