<%
Dim rsIntroText, rsVinnare
Dim strIntroText, strKontaktText
Dim intRecordLoopCounter, intYear
Set rsIntroText = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT Intro_ackreditering, Kontakt_ackreditering From tblConfiguration;"
rsIntroText.Open strSQL, strCon, 2, 3
strIntroText = rsIntroText.Fields("Intro_ackreditering")
strKontaktText = rsIntroText.Fields("Kontakt_ackreditering")
%>
 |
| Get your Industry Accreditation |
|
<% =strIntroText %>
|