En htmltabell för varje kolumn.

Hej!

Jag har kört fast.
Jag vill skriva ut data från en Accessdb.

I databasen finns ett fält som innehåller en kolumn som är Namn.
Sen i samma fält följer 42 kolumner till (Ma1,Ti1,On1,To1,Fr1,Lo1,So1,Ma2,Ti2 osv ända fram till So6)

Nu använder jag följande kod för att visa Måndag v1:

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("db/schema.mdb")
strSQL = "SELECT * FROM Arbetsschema ORDER BY Ma1 ASC"
Set objRS = Connect.Execute(strSQL)

response.write "<table width=""150"">" &_
"<tr><td>" &_
"<table><tr><td></td><td><pre>Måndag v1</pre></td></tr><tr><td></td> "&_
"<td width=""100"" background=""gfx/px.gif"" width=""100""><img src=""gfx/tider.gif""></td></tr>"

Do While Not objrs.eof
if objrs("Ma1") = "0" Then
else
response.write "<tr><td width=""50"">"&objRs("Namn")&"</td>"
Response.write "<td><img src=""gfx/staplar/"&objrs("Ma1")&".gif""></td>"
response.write "</tr>" & VbCrLf
End if

objrs.MoveNext
Loop

response.write "</table></td></tr></table>"

objRS.Close
Set objRS = Nothing
Connect.Close
Set Connect = Nothing

Detta skapar en tabell, men finns det något att loopa alla kolumner så det visas från Måndag v1 till Söndag v6? Eller måste man skriva 42 likadana satser ovan? Kolumnen namn ska bara vara med en gång i tabellen längst till vänster.

Sen undrar jag också hur man kan sortera efter vilken tur som finns i respektive kolumn? Turerna som finns är A,AC,A3,A1,*A,*AC,*A3,*A1,C,C1,D. Nu sorterar den A först och sen A1. Jag vill ha ordningen jag skrev.