Jeg vil slet ikke smelte den sammen med det pladder, gør sådan her istedet: Skift: Set rsBooks = Server.CreateObject(\"ADODB.Recordset\") rsBooks.Open strSQL, dbBooks, 3
ud med: Set rsBooks = dbBooks.Execute(strSQL)
og fortsæt med det her............ arrBooks = rsBooks.Getrows rsBooks.Close
if not rs.books.eof Randomize() intMaxarr = ubound(arrBooks, 1) ranBook = Int((intMaxarr+1) * Rnd) response.write arrBooks(2, ranBook) end if -------------- der er absolut ingen grund til at lave et recordset, du skal jo ikke kunne bladre vel :O) PS: Lad være med at bruge alle de columns hvis du kun skal bruge en bogtitel eller hvad ved jeg!, indskrænk din select til kun at omhandle det du skal bruge - er du med??
Jeg går udfra at du selv kan rette op på dit sidste indlæg mht. dbBooks og dbMDBooks :O)
Jeg har allerede indskrænket min select, såe... :•)
et par smårettelser (rs.books.eof, +then, +cut’n paste) til dit udemærkede forslag og svineriet kører som det skal...
Grunden til at jeg havde lavet et recordset var at jeg samtidigt talte alle forekomne nyheder..
Nok om det – tak for hjælpen Mvh/M!chael
Synes godt om
Ny brugerNybegynder
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.
