<% Dim reclassenma Dim reclassenma_numRows Set reclassenma = Server.CreateObject("ADODB.Recordset") reclassenma.ActiveConnection = MM_Database1_STRING reclassenma.Source = "SELECT * FROM qryhildewebsite WHERE MomentShort='Ma (av)' AND (Afkorting='Buislasser' OR Afkorting='Gassmeltlas' OR Afkorting='MIG/MAG-Las' OR Afkorting='Tig-Las')" reclassenma.CursorType = 0 reclassenma.CursorLocation = 2 reclassenma.LockType = 1 reclassenma.Open() reclassenma_numRows = 0 %> <% Dim relassendi Dim relassendi_numRows Set relassendi = Server.CreateObject("ADODB.Recordset") relassendi.ActiveConnection = MM_Database1_STRING relassendi.Source = "SELECT * FROM qryhildewebsite WHERE MomentShort='Di (av)' AND (Afkorting='Buislasser' OR Afkorting='Gassmeltlas' OR Afkorting='MIG/MAG-Las' OR Afkorting='Tig-Las')" relassendi.CursorType = 0 relassendi.CursorLocation = 2 relassendi.LockType = 1 relassendi.Open() relassendi_numRows = 0 %> <% Dim reclassenwoe Dim reclassenwoe_numRows Set reclassenwoe = Server.CreateObject("ADODB.Recordset") reclassenwoe.ActiveConnection = MM_Database1_STRING reclassenwoe.Source = "SELECT * FROM qryhildewebsite WHERE MomentShort='Wo (av)' AND (Afkorting='Buislasser' OR Afkorting='Gassmeltlas' OR Afkorting='MIG/MAG-Las' OR Afkorting='Tig-Las')" reclassenwoe.CursorType = 0 reclassenwoe.CursorLocation = 2 reclassenwoe.LockType = 1 reclassenwoe.Open() reclassenwoe_numRows = 0 %> <% Dim reclassendo Dim reclassendo_numRows Set reclassendo = Server.CreateObject("ADODB.Recordset") reclassendo.ActiveConnection = MM_Database1_STRING reclassendo.Source = "SELECT * FROM qryhildewebsite WHERE MomentShort='Do (av)' AND (Afkorting='Buislasser' OR Afkorting='Gassmeltlas' OR Afkorting='MIG/MAG-Las' OR Afkorting='Tig-Las')" reclassendo.CursorType = 0 reclassendo.CursorLocation = 2 reclassendo.LockType = 1 reclassendo.Open() reclassendo_numRows = 0 %> <% Dim rssemester Dim rssemester_numRows Set rssemester = Server.CreateObject("ADODB.Recordset") rssemester.ActiveConnection = MM_Database1_STRING rssemester.Source = "SELECT Distinct Semester FROM qryhildewebsite WHERE (Afkorting='Buislasser' OR Afkorting='Gassmeltlas' OR Afkorting='MIG/MAG-Las' OR Afkorting='Tig-Las') " rssemester.CursorType = 0 rssemester.CursorLocation = 2 rssemester.LockType = 1 rssemester.Open() rssemester_numRows = 0 %> <% Dim rslassenalles Dim rslassenalles_numRows Set rslassenalles = Server.CreateObject("ADODB.Recordset") rslassenalles.ActiveConnection = MM_Database1_STRING rslassenalles.Source = "SELECT * FROM qryhildewebsite WHERE (Afkorting='Buislasser' OR Afkorting='Gassmeltlas' OR Afkorting='MIG/MAG-Las' OR Afkorting='Tig-Las')" rslassenalles.CursorType = 0 rslassenalles.CursorLocation = 2 rslassenalles.LockType = 1 rslassenalles.Open() rslassenalles_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 recautoma_numRows = recautoma_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 recautodi_numRows = recautodi_numRows + Repeat2__numRows %> <% Dim Repeat3__numRows Dim Repeat3__index Repeat3__numRows = -1 Repeat3__index = 0 recautowoe_numRows = recautowoe_numRows + Repeat3__numRows %> <% Dim Repeat23__numRows Dim Repeat23__index Repeat23__numRows = -1 Repeat23__index = 0 rechoutdon_numRows = rechoutdon_numRows + Repeat23__numRows %> <% Dim Repeat22__numRows Dim Repeat22__index Repeat22__numRows = -1 Repeat22__index = 0 rechoutdon_numRows = rechoutdon_numRows + Repeat22__numRows %> <% Dim Repeat21__numRows Dim Repeat21__index Repeat21__numRows = -1 Repeat21__index = 0 rechoutwoe_numRows = rechoutwoe_numRows + Repeat21__numRows %> <% Dim Repeat20__numRows Dim Repeat20__index Repeat20__numRows = -1 Repeat20__index = 0 rechoutdi_numRows = rechoutdi_numRows + Repeat20__numRows %> <% Dim Repeat19__numRows Dim Repeat19__index Repeat19__numRows = -1 Repeat19__index = 0 rechoutma_numRows = rechoutma_numRows + Repeat19__numRows %> <% Dim Repeat18__numRows Dim Repeat18__index Repeat18__numRows = -1 Repeat18__index = 0 recbouwdo_numRows = recbouwdo_numRows + Repeat18__numRows %> <% Dim Repeat17__numRows Dim Repeat17__index Repeat17__numRows = -1 Repeat17__index = 0 recbouwwoe_numRows = recbouwwoe_numRows + Repeat17__numRows %> <% Dim Repeat16__numRows Dim Repeat16__index Repeat16__numRows = -1 Repeat16__index = 0 recbouwdi_numRows = recbouwdi_numRows + Repeat16__numRows %> <% Dim Repeat15__numRows Dim Repeat15__index Repeat15__numRows = -1 Repeat15__index = 0 recbouwma_numRows = recbouwma_numRows + Repeat15__numRows %> <% Dim Repeat14__numRows Dim Repeat14__index Repeat14__numRows = -1 Repeat14__index = 0 reclassendo_numRows = reclassendo_numRows + Repeat14__numRows %> <% Dim Repeat13__numRows Dim Repeat13__index Repeat13__numRows = -1 Repeat13__index = 0 reclassenwoe_numRows = reclassenwoe_numRows + Repeat13__numRows %> <% Dim Repeat12__numRows Dim Repeat12__index Repeat12__numRows = -1 Repeat12__index = 0 reclassenwoe_numRows = reclassenwoe_numRows + Repeat12__numRows %> <% Dim Repeat11__numRows Dim Repeat11__index Repeat11__numRows = -1 Repeat11__index = 0 relassendi_numRows = relassendi_numRows + Repeat11__numRows %> <% Dim Repeat10__numRows Dim Repeat10__index Repeat10__numRows = -1 Repeat10__index = 0 reclassenma_numRows = reclassenma_numRows + Repeat10__numRows %> <% Dim Repeat9__numRows Dim Repeat9__index Repeat9__numRows = -1 Repeat9__index = 0 recelekdo_numRows = recelekdo_numRows + Repeat9__numRows %> <% Dim Repeat8__numRows Dim Repeat8__index Repeat8__numRows = -1 Repeat8__index = 0 recelekwoe_numRows = recelekwoe_numRows + Repeat8__numRows %> <% Dim Repeat7__numRows Dim Repeat7__index Repeat7__numRows = -1 Repeat7__index = 0 recelekdi_numRows = recelekdi_numRows + Repeat7__numRows %> <% Dim Repeat6__numRows Dim Repeat6__index Repeat6__numRows = -1 Repeat6__index = 0 recelekma_numRows = recelekma_numRows + Repeat6__numRows %> <% Dim Repeat5__numRows Dim Repeat5__index Repeat5__numRows = -1 Repeat5__index = 0 recautodo_numRows = recautodo_numRows + Repeat5__numRows %> <% Dim Repeat4__numRows Dim Repeat4__index Repeat4__numRows = -1 Repeat4__index = 0 recautowoe_numRows = recautowoe_numRows + Repeat4__numRows %>

Zoeken | RSS | Moodle | Webmail
Sint-Niklaas | Beveren | Sint-Gillis

  Centrum voor volwassenenonderwijs regio Waasland

U bevindt zich hier: Home > Lesroosters > Lesrooster Lassen
 

Lesrooster Lassen:  <% While ((Repeat1__numRows <> 0) AND (NOT rssemester.EOF)) %> <%=(rssemester.Fields.Item("Semester").Value)%> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rssemester.MoveNext() Wend %>

<% If rslassenalles.EOF And rslassenalles.BOF Then %>

Het lesrooster voor volgend semester is momenteel nog niet beschikbaar.

<% End If ' end rslassenalles.EOF And rslassenalles.BOF %> <% If Not rslassenalles.EOF Or Not rslassenalles.BOF Then %>

Alle cursussen hebben plaats in onze vestiging te Sint-Niklaas.

 
Maandag
Dinsdag
Woensdag
Donderdag
Avond <% While ((Repeat10__numRows <> 0) AND (NOT reclassenma.EOF)) %> <% Repeat10__index=Repeat10__index+1 Repeat10__numRows=Repeat10__numRows-1 reclassenma.MoveNext() Wend %>
<%=(reclassenma.Fields.Item("PraktijkNaam").Value)%>
<% While ((Repeat11__numRows <> 0) AND (NOT relassendi.EOF)) %> <% Repeat11__index=Repeat11__index+1 Repeat11__numRows=Repeat11__numRows-1 relassendi.MoveNext() Wend %>
<%=(relassendi.Fields.Item("PraktijkNaam").Value)%>
<% While ((Repeat13__numRows <> 0) AND (NOT reclassenwoe.EOF)) %> <% Repeat13__index=Repeat13__index+1 Repeat13__numRows=Repeat13__numRows-1 reclassenwoe.MoveNext() Wend %>
<%=(reclassenwoe.Fields.Item("PraktijkNaam").Value)%>
<% While ((Repeat14__numRows <> 0) AND (NOT reclassendo.EOF)) %> <% Repeat14__index=Repeat14__index+1 Repeat14__numRows=Repeat14__numRows-1 reclassendo.MoveNext() Wend %>
<%=(reclassendo.Fields.Item("PraktijkNaam").Value)%>

 

<% End If ' end Not rslassenalles.EOF Or NOT rslassenalles.BOF %>
 
Janitor, Centrum voor Volwassenenonderwijs van het Gemeenschapsonderwijs, Noordlaan 32, 9100 Sint-Niklaas
Tel: 03/760.96.00 Fax: 03/760.96.02 E-mail: info@janitor.be Website: http://www.janitor.be
 
<% rssemester.Close() Set rssemester = Nothing %> <% rslassenalles.Close() Set rslassenalles = Nothing %> <% reclassendo.Close() Set reclassendo = Nothing %> <% reclassenwoe.Close() Set reclassenwoe = Nothing %> <% relassendi.Close() Set relassendi = Nothing %> <% reclassenma.Close() Set reclassenma = Nothing %>