Datum between

	SQL="SELECT * FROM oplelist WHERE Ople_Start BETWEEN date() AND dateAdd("w",30,date()) ORDER BY Ople_Start ASC;"

SQL="SELECT * FROM oplelist WHERE Ople_Start BETWEEN date() AND dateAdd("w",30,date()) ORDER BY Ople_Start ASC;"

	<% 			
		SQL="SELECT * FROM oplelist WHERE Ople_Start BETWEEN "date()" AND "dateAdd("w",30,date())" ORDER BY Ople_Start ASC;"
		
		set RS=ConnBasis.execute(SQL)
		teller = 0
		
		'max 5 activiteietn tonen	
		do while not RS.EOF and not teller = 5
		
		if RS("Ople_ID")>0 then
			SQL2="select Ople_Name from Oplelist Where Ople_ID="&cstr(RS("Ople_ID"))
			set RS2=ConnBasis.execute(SQL2)
			if not RS2.eof then
				Ople_Name=RS2("Ople_naam")
			end if
			response.write SQL2
			RS2.Close
			set RS2=nothing
		elseif RS("Org_ID")>0 then
			SQL2="select User_BNaam from Userlist_org Where User_ID="&cstr(RS("Org_ID"))
			set RS2=ConnBasis.execute(SQL2)
			if not RS2.eof then
				Inst_Name=RS2("User_BNaam")
			end if
			RS2.Close
			set RS2=nothing
		end if
	%>

<% 			
		SQL="SELECT * FROM oplelist WHERE Ople_Start BETWEEN "date()" AND "dateAdd("w",30,date())" ORDER BY Ople_Start ASC;"
 
		set RS=ConnBasis.execute(SQL)
		teller = 0
 
		'max 5 activiteietn tonen	
		do while not RS.EOF and not teller = 5
 
		if RS("Ople_ID")>0 then
			SQL2="select Ople_Name from Oplelist Where Ople_ID="&cstr(RS("Ople_ID"))
			set RS2=ConnBasis.execute(SQL2)
			if not RS2.eof then
				Ople_Name=RS2("Ople_naam")
			end if
			response.write SQL2
			RS2.Close
			set RS2=nothing
		elseif RS("Org_ID")>0 then
			SQL2="select User_BNaam from Userlist_org Where User_ID="&cstr(RS("Org_ID"))
			set RS2=ConnBasis.execute(SQL2)
			if not RS2.eof then
				Inst_Name=RS2("User_BNaam")
			end if
			RS2.Close
			set RS2=nothing
		end if
	%>