10 svar · 448 visningar · startad av Calippo
Har ett lite problem när jag loopar ut rubriker ur en databas sorterat efter bokstavsordning.
När den kommer till bokstaven O så skriver den ut alla som börjar på Ö och fortsätter sen med P.
Måste man skriva nåt längst upp på sidan för att den ska tolka svenska tecken eller?
Välkommen till WF Calippo :birp :birp
Den här länken kommer att hjälpa dig.
http://msdn.microsoft.com/library/default.asp?ShowPane=false&URL=/library/psdk/sql/ts_ca-co_5ell.htm
Vilken databashanterare använder du?
Databasen är Access 97
Ok. Om jag ger ett exempel
SQL = "SELECT Efternamn FROM medlemmar " & _
"ORDER BY Efternamn collate SQL_Scandinavian_Cp850_CS_AS"
Collate finns inte i Access. Det skall finnas någon inställning i Access där man kan välja sorteringsordning.
Funkar inte.
Får felet:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access 97 Driver] Syntax error (missing operator) in query expression 'rubrik collate SQL_Scandinavian_Cp850_CS_AS'.
med koden:
sql = "SELECT rubrik FROM fragorsvar " & _
"ORDER BY rubrik collate SQL_Scandinavian_Cp850_CS_AS"
SET Rs = Conn.execute(sql)
Det finns en sorteringsfunktion i Access 97.
Under "Verktyg" > "Alternativ" > "Fliken Allmänt" > "Sorteringsordning för ny databas".
Den är inställd på Swedish/Finnish.
Detta är ett problem för mig också och ingen har under ca 1års tid kunna hjälpt mig att fixa detta. "Å" lägger sig före "A" osv. Det senaste jag hörde var att man måste ha en speciell dll-fil av ngt slag. :(
Det finns en sorteringsfunktion i Access 97.
Under "Verktyg" > "Alternativ" > "Fliken Allmänt" > "Sorteringsordning för ny databas".
Den är inställd på Swedish/Finnish
Jag vet, och det betyder INGENTING!
löste det så här så länge tills jag hittar ett bättre alternativ
sql = "Select fragorsvar.rubrik from fragorsvar ORDER BY fragorsvar.rubrik ASC"
SET Rs = Conn.execute(sql)
Do Until Rs.Eof
If NOT left(Rs("rubrik"),1)="Å" AND NOT left(Rs("rubrik"),1)="Ä" AND NOT left(Rs("rubrik"),1)="Ö" Then
%>
<TR>
<TD class="text"><%=Rs("rubrik")%></TD>
</TR>
<%
End If
Rs.MoveNext
Loop
Rs.MoveFirst
Do Until Rs.Eof
If left(Rs("rubrik"),1)="Å" Then
%>
<TR>
<TD class="text"><%=Rs("rubrik")%></TD>
</TR>
<%
End If
Rs.MoveNext
Loop
Rs.MoveFirst
Do Until Rs.Eof
If left(Rs("rubrik"),1)="Ä" Then
%>
<TR>
<TD class="text"><%=Rs("rubrik")%></TD>
</TR>
<%
End If
Rs.MoveNext
Loop
Rs.MoveFirst
Do Until Rs.Eof
If left(Rs("rubrik"),1)="Ö" Then
%>
<TR>
<TD class="text"><%=Rs("rubrik")%></TD>
</TR>
<%
End If
Rs.MoveNext
Loop
Set Rs=Nothing