Måske det har kan gøre det? har ikke testet det så er ikke helt sikker
sql = "SELECT navn, kategori FROM tbl ORDER BY kategori,navn asc"
oldKategori = "" for x=0 to ubound(dbArr,2) if dbArr(1,x) <> oldKategori then response.write dbArr(1,x)&"<br>" end if response.write dbArr(0,x)&"<br>" oldKategori = dbArr(1,x) next
set objConn = Server.CreateObject ("ADODB.Connection") set objRec = Server.CreateObject ("ADODB.Recordset")
sql = "SELECT navn, kategori FROM tbl ORDER BY kategori,navn asc" With objRec .CursorLocation = 3 .CursorType = 2 .LockType = 3 .ActiveConnection = objConn .Open sql End With
coursesfound=0 if objRec.recordcount>0 then courseArray = objRec.getRows coursesfound=1 End if
oldKategori = "" for x=0 to ubound(dbArr,2) if dbArr(1,x) <> oldKategori then response.write dbArr(1,x)&"<br>" <-- her udskrives kategori end if response.write dbArr(0,x)&"<br>" <-- her udskrives navn oldKategori = dbArr(1,x) next
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.