Asptrubbel

Jag får följande felmeddelande när jag lägger till desc efter 2 i Order By 2. Utan det funkar det men sorterar helt fel:

Feltyp:
(0x80020009)
Undantag inträffade.
/gruvsjo/fun/bildgalleri/index.asp, line 160

Den raden är:

Set ReS=Conn.Execute("Select Top 1 * From bilder Where namn='" & RecSet("namn") & "' and visa=True Order By datum desc")

Man kan säkert bygga ihop de båda sql strängarna eftersom de plockar från samma tabell men jag lyckas inte! :(

-------------------------------------------------------------------------------

Hela koden:
<%Set RS = Conn.Execute("Select namn, Max(datum) As datum FROM bilder Group By namn Order By 2 desc")

If RS.EOF Then%>
<tr>
<td width="100" valign="top" nowrap>
<img src="pics/tom.gif" width="90" border="1">
</td>
<td valign="top" width="5" background="bilder/dot.gif"> </td>
<td valign="top" width="345">
<b>Inget i databasen</b><br>
Inlagd av: Inget i databasen<br>
Upplagd: Inget i databasen<br>
<br><b>Info om kategori:</b><br>
Tomt i databasen!
</td>
</tr>
<%Else
x=0
Do Until RS.EOF Or x=4
Set RecSet=Conn.Execute("Select * From galleri Where namn='" & RS("namn") & "' Order By datum desc")
Set ReS=Conn.Execute("Select Top 1 * From bilder Where namn='" & RecSet("namn") & "' and visa=True Order By datum desc")
Set Bilder=Conn.Execute("Select Count(*) As antal From bilder Where namn='" & RecSet("namn") & "'")%>
<tr>
<td width="100" valign="top" nowrap>
<a href="default.asp?part=fun&upart=5&visa=bild1&id=<%=RecSet("namn")%>"><img src="bilder/pics/<%=ReS("Bild")%>" width="90" border="1"></a>
</td>
<td valign="top" width="5" background="bilder/dot.gif"> </td>
<td valign="top" width="345">
<b><a href="default.asp?part=fun&upart=5&visa=bild1&id=<%=RecSet("namn")%>" class="rub"><%=RecSet("namn")%></a></b> <font color="#800000">(<i><%=Bilder("Antal")%> <%If Bilder("Antal") = 1 Then%> bild<%Else%> bilder<%End If%></i>)</font><br>
Uppdaterat: <%=Day(ReS("datum")) & " " & MonthName(Month(ReS("datum"))) & " " & Year(ReS("datum")) & " kl: " & FormatDateTime(ReS("datum"),4)%><br>
<br><br><b>Info om kategorin:</b><br>
<%If Len(RecSet("info")) > 60 Then%><%= Left(Replace(RecSet("info"), vbCrLf, "<br>" ),60)%>..<%Else%><%=Replace(RecSet("info"), vbCrLf, "<br>" )%><%End If%>
</td>
</tr>
<tr>
<td colspan="3" height="10"><img src="bilder/dot2.gif"></td>
</tr>
<%x=x+1
RS.MoveNext
Loop
End If%>

Vad är namn för datatyp? Om det är MEMO/PM så kan du inte använda det hur som helst. Det måste ligga sist i select-listan och du kan bara referera det en gång i recordsetet. Lägg värdet i en lokal variabel.

Om det är PM/Memo så verkar det onödigt mycket. 255 tecken borde väl räcka för ett namn.

Det går nog att skriva om dina sql-satser så att du inte behöver så många. Kan du beskriva hur dina tabeller ser ut och vilka data du vill ha fram?

Det är text men funkar inte iallafall!

Tabellen bilder innehåller följande:

id - räknare
namn - text
bild - text
datum - datum/tid
v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,summa,totalt,snitt - tal
visa - Ja/Nej

galleri:

Id - räknare
Namn - text
Info - text
datum - datum/tid
Sort - text

----------------------------------------------------------

Jag vill hämta med koden jag skrivit de 4 kategorierna ifrån galleri (där namn är kategori) där man senast lagt in en bild i.

Mysko! Nu funkade det! :)

relevant eller inte...

av egna erfarenheter har jag ibland märkt att en *.ldb fil ligger kvar typ som en temporär fil efter att jag stängt databasen och då fungerar inga sql- kommandon. yterliggare har jag märkt att databasen inte får vara öppen medan jag ska påvärka den på något vis. detta gäller då access-databaser.