<% SQL = "SELECT * FROM pages WHERE IDNum = "&PageID&";" Set RS = Conn.Execute(SQL) IF not RS.EOF THEN IF lang = 2 THEN rubrik = RS("en_rubrik") brodtext = RS("en_brodtext") ELSE rubrik = RS("rubrik") brodtext = RS("brodtext") END IF counter = RS("counter") + 1 END IF RS.Close SQL = "UPDATE pages SET counter = "&counter&" WHERE IDNum = "&pageID&";" Conn.Execute(SQL) %>
<%=rubrik%>

<%=brodtext%>