Onchange når værdi er selected på forhånd

Jeg har nedenstående select-menu + funktion som gør at hvis man skifter værdi i menuen, så viser eller fjerner funktionen nogle tilhørende felter (virker fint):

function select_kvalifikation1() {
  ty = document.registrering.kvalifikation1.value

  if (ty == "") {
      document.registrering.kvalifikation1startdato.value = '';
      document.registrering.kvalifikation1slutdato.value = '';
      document.all.id1.style.display = 'none';
      document.all.id2.style.display = 'none';
  }
  else {
      document.all.id1.style.display = 'block';
      document.all.id2.style.display = 'block';
      document.all.id11.style.display = 'block';
      document.all.id12.style.display = 'block';


  }
}



<SELECT NAME="kvalifikation1" onChange="select_kvalifikation1(this.selectedIndex)" >
<OPTION></OPTION>
<%
Dim recordSet1
Dim strSQL1

set recordSet1 = server.CreateObject("ADODB.Recordset")

strSQL1 = "SELECT Kvalid, Kvalifikation FROM Kva_stamdata ORDER BY Kvalifikation"
set recordSet1 = forbindelse.Execute (strSQL1)

do until recordSet1.eof

If kvalifikation(0) = recordSet1("Kvalid") Then

Response.Write "<option value=" & recordSet1("Kvalid") & " selected>" & recordSet1("Kvalifikation") & "</option>"
Else
Response.Write "<option value=" & recordSet1("Kvalid") & ">" & recordSet1("Kvalifikation") & "</option>"

  end if
recordSet1.movenext
loop
recordSet1.Close
Set recordSet1 = Nothing

%>
</SELECT>



Men hvordan gør jeg når select-menuen fra starten af (når siden kaldes) allerede har selected en værdi, så kommer det tilhørende visningsfelt ikke frem? Det er selvfølgelig fordi man ikke har lavet en Onchange i menuen som kalder funktionen. Men hvordan løses dette problem?