Tennis Club Kordin (TCK)

<% @Language = VBScript %> Tennis Club Kordin (TCK) - Malta <% Dim bPrint, bgCol bPrint = false bgCol = "#1A5F79" If Request("printfriendly")=1 Then bPrint = true bgCol = "#FFFFFF" End If %> <% Dim strURL, iPos, Pages, iPage, i Dim MenuOn, MenuOff, MenuLink, MenuName, TableWidth, cellPad If bPrint Then TableWidth = 595 cellPad = 10 Else TableWidth = 750 cellPad = 0 End If strURL = UCase(Request.ServerVariables("URL")) iPos = InStrRev(strURL, "/") If iPos>0 Then strURL = Mid(strURL, iPos + 1) strURL = Left(strURL, Len(strURL)-4) iPage = 0 strOnLoad="" For i=0 To UBound(Pages) If StrComp(strURL, Pages(i))=0 Then iPage = i+1 if i>0 Then strOnLoad = strOnLoad & "," strOnLoad = strOnLoad & "'../wwwroot" & MenuOn(i) & "','../wwwroot" & MenuOff(i) & "'" Next strOnLoad="MM_preloadImages(" & strOnLoad & ")" %> <% If Not bPrint Then %> <% End If %> <% If Not bPrint Then %> <% End If %>

<% For i=0 To UBound(MenuOff) %> <% Next %>

<% If iPage<>i+1 Then %>

<% Else %>

<% End If %>

Latest News

FINAL

Sunday, 1st June, 2008

TEAM D (VELLA) vs TEAM F (CASSAR)
TIME COURT	EVENT	PLAYERS	SCORE
TIME COURT	EVENT	PLAYERS	SETS	GAMES
17.00 CRT 1	MEN "B"	GERALD BRINCAT / JOE CALLUS vs PAUL XUEREB / PAUL FENECH	2 - 0	6 - 4 6 - 2
17.00 CRT 2	LAD "C"	YETTE RUTTER / SARAH VELLA vs PAULA DIFESA / PAULINE CAMILLERI	1 - 1	6 - 3 1 - 6 (T/B 3-7)
18.15 CRT 1	MEN "C"	NEVILLE SCIRIHA / ANTHONY COLEIRO vs CHARLES MICALLEF / JUAN DEBONO	1 - 1	3 - 6 6 - 1
18.15 CRT 2	MEN "D"	ANTOINE MUSCAT / RAYMOND MUSCAT vs PHILIP MUSCAT / LAWRENCE MICALLEF	0 - 2	5 - 7 6 - 7
18.15 CRT 3	LAD "B"	MONICA GRECH / MONICA MUSCAT vs MARYCLAIRE VELLA/ SILVANA PORTELLI	1 - 1	6 - 1 3 - 6
19.30 CRT 1	MEN "A"	RICHARD MAGRI / ROBERT ATTARD vs MANUEL BONELLO / MARC VELLA BONNICI	2 - 0	6 - 4 6 - 2
19.30 CRT 2	LAD "A"	CHARMAINE MIFSUD / ANNA VELLA BONNICI vs ALEXIA CARABOTT / CHRISTINE PISCOPO	1 - 1	3 - 6 6 - 3
		TOTAL (D - F)	8 - 6

<% End If %>

<% Dim Link, Desc, Query Link = "http://" & Request.ServerVariables("SERVER_NAME") & Request.ServerVariables("URL") Query = Request.ServerVariables("QUERY_STRING") If Not bPrint Then If Query="" Then Link = Link & "?" Else Link = Link & "?" & Query & "&" End If Link = Link & "printfriendly=1" Desc = "Click here for a printer-friendly version of this page" Else Query = Replace(Query, "&printfriendly=1", "", 1) // at end of qs Query = Replace(Query, "printfriendly=1&", "", 1) Query = Replace(Query, "printfriendly=1", "", 1) If Query<>"" Then Link = Link & "?" & Query Desc = "Click here to return to the full version of this page" End If %> <%=Desc%> <% If bPrint Then %>
For best printouts select A4 as paper size in Page Setup.
To print background and table colours and textures go to Internet Explorer Menu:
Tools->Internet Options->Advanced and select: "Print Background Colours and Images". <% End If %>