<% Option Explicit on error resume next 'response.write Application("strDBConn") 'response.end Sub RenderMovies (category, table) Dim sql Dim movieset Dim link if Len(Trim(category)) = 0 or (isnull(category)) then sql="select movieid, title, length, director, '-unfiled-' from " & table & " where isnull(category) or len(trim(category))=0 order by title " else sql="select movieid, title, length, director, category from " & table & " where category='"&category&"' order by title" end if set movieset=Application("DBConn").Execute(sql) Do While movieset.eof = false if sYear <> "2005" then if category="������������ ������ ������" or category="������������ ������� ������" or category="����� ������������" or category="������������ ""������� MED WED"" ��� ���� ��������� ������" then link="popup2005gr.asp?Year=" + sYear else link="popup2005gr_small.asp?Year=" + sYear end if else link="popup2005gr.asp?Year=" + sYear end if %>

 
 
 

 

 

 

 

 


 
 ���������� '06  | '05 | '04
 
<%Do while rsCategories.eof=false%> <%Call RenderMovies (rsCategories("CATEGORY"), sTableName)%> <%rsCategories.MoveNext%>
  ����: �������� ��� ������������

� ����������� ������ ����: ��������� ��� ������������ ���-������������� ��� �� MedWet, ��� �������� ��� ������ ��� ��� ���������� ������������ ��������� ����������� ������������� �����������, ��������� �� �� ��������, ��� 20 ����� ��� 26 �������, ��� ������� ��������  ���� ��� �������.

� ����������� ��� �����-��������� ���� ��������� �� ���������� ��������� ��������� ��� ���� ��������. ��������� ��� ��� ���� �� ������ ����������  ������� ��� ������� �� ���� ��� ���� ������ ��� ���� ��� ��� �������� ��� �� ���������� ���� ������� �����.  ����� ������ � ������� ��� ���������� ��� ��������� ��� ��� ��������� ����� ��� ��������� ��������� ��� ������������ �������� ���, ���, ��� �����������  ������. ������� 100.000 ������ ��������� ������ �� ��� �������� ��������� ��� ����� ��� � �������� ���� ��������� �� �� ������ ����� ��� ���������.

����� �� ��������� 30 ������ ���� ��� �� ��� ����� ��� ��������� ��� ������������ ���� �����, ����� ���� ��������� �� ������������ ���� ��� ���� ���������. �� ��� ���������� ��� �������� ������ �� ���� ��� �� ���� ���������� to 2005 �� ������������ ����������� �� ����������� � ������� Hawr Al Hawizah ��� ���������� ���� ��� �����, �� ���������� �������� ��������. 

 ��� ������� ��� ����������� ��� ��� �������� ��� ��������� ��� ������������ ���� ������������� ��������  ��� ������ ��� �������� �����������.  �� ��� ���������� ��� �������� ������ ��� ��� ��������� ��� ��������� ������������ ��� ������ ��� �� ���� ��� �� ���� � ������� Hawr Al Hawizah �� ��������� �������� ��������.

������� ���� �������� ����������� �� ��������� ��� ������, ��� ������ ��� ���� ��� ����� ����, ���� ��� ����� ��� ��������� ��� �������� ���� �� �������� ��������� ��� ��������������� ��� �������� �� 2005. � ����������, ��������� ����� ���������� ���� �������� ��� ����������� ��� ������� ��� ������ - �������� ������������ ��� ���� ���������� (CIMI) ��� ���� ������������� �� ����� ��� ������������ ��� ���������.

�� ���������� ������ ��� �������� ����������� �� ����������� ��� ������. �� �������� ��� ��������� �� ����� �������� ��� ���� ������ �������� ��� �������� ��� ����� ��� ������� ���� ����� ���� ��� �����.

������� ��� ������� ����� � �������� ��� ������, ��� �� ���������� ��� ������������ �� MedWet, �������� Ecofilms ��� � �������� ������������.

 

σχεδιασμός n.n.

ecofilms.gr©2004