3 svar · 201 visningar · startad av CatZ
SQL = "SELECT NrAr, NrManad FROM Nyheter"_
& " WHERE NOT ((NrManad = " & datepart("m", date) & ")"_
& " AND (NrAr = " & datepart("yyyy", date) &"))"
set rs = dbCom.Execute(SQL)
for iAntal = 1 to iTotalt step -1
response.write "<a href=nyheter.asp?cmd=vm&ar=" & rs("NrAr") & "manad=" & rs("NrManad") & ">" & getmonthlong(rs("NrManad")) & ", " & rs("NrAr")
next
Detta fungerar, men jag får ut dubbletter på allt 
hur gör jag för att varje månad bara ska komma upp en gång ? Count(NrManad) eller nåt ?
Vet inte om jag är ute o cyklar men så här kanske:
xTmp =""
Do until rs.EOF
If xTmp <> rs("NrManad") Then
response.write "<a href=nyheter.asp?cmd=vm&ar=" & rs("NrAr") & "manad=" & rs("NrManad") & ">" & getmonthlong(rs("NrManad")) & ", " & rs("NrAr")
xTmp = rs("NrManad")
End If
rs.MoveNext
Loop
Ja det fungerade utmärkt jimpa tack så mycket 
SQL = "SELECT distinct NrAr, NrManad FROM Nyheter"_
& " WHERE NOT ((NrManad = " & datepart("m", date) & ")"_
& " AND (NrAr = " & datepart("yyyy", date) &"))"
så tar man bort duplikat direkt i sql-frågan.