Introduksjon til faget politikk og menneskerettigheter     P     R     O     S         ------------ Alfabetisk oversikt ------------ O     R     E     R     P       Valgkanalen: styringsorganer, partier og velgere   R     E     G     D     I           D     S     J     G     L   Valgkanalen: nærmere fokus på styringsorganer T     F     E     E     Å     L     I     O     N     R     T     Andre kanaler for innflytelse og påvirkning     L     R     T     I     E     F           K     A     N     R Internasjonal politikk og utenrikspolitikk   A     D     L     S     G           G     R     A     J     E   Internasjonale statlige organisasjoner       L     Ø     R     O     R           E     F     I     N     Fokus på internasjonale spørsmål           N     T     N     E                 K     I     G     R Menneskerettighetene               E     N     E                       R     G     R

ab cd e f gh ij k lm no pq r s tu vw...øå <% Dim objDBF, objR Set objDBF = Server.CreateObject("ADODB.Connection") objDBF.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};" & _ "DBQ=D:\Websites\LocalUser\w199597\www\db\politikk.mdb" objDBF.Open 'kopierer innholdet i tabellen medlemmer til objR Set objR = Server.CreateObject("ADODB.Recordset") objR.Open "Select * FROM politikk order by navn", objDBF Response.Write(" ") Set objR = objDBF.Execute("Select navn, tekst from politikk where tekst not like '.' and alfabet like 'k' order by navn") Do While Not objR.EOF Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") objR.MoveNext() Loop Response.Write(" " & objR("navn") & " " & objR("tekst") & " ") %>