<% Dim sSiteSection sSiteSection = "Home" %>

CDNX is now TSX Venture Exchange. Information for TSX Venture Exchange can be found on the TSX Group web site. You are being redirected to the new site now. If this redirection does not take place within 30 seconds, please click here to access the site.

<% Function FormatTime() if CInt((Hour(Now()))) >24 then d= FormatInteger(Day(Now()+1)) m= MonthName(Month(Now()+1)) y= Year(Now()+1) h= FormatInteger(CInt(Hour(Now()))-24) i= FormatInteger(Minute(Now())) else d= FormatInteger(Day(Now())) m= MonthName(Month(Now())) y= Year(Now()) h= FormatInteger(CInt(Hour(Now()))) i= FormatInteger(Minute(Now())) end if FormatTime = d&" "&m&" "&y&" "&h&":"&i&" ET" End Function Function FormatInteger(i) if CInt(i) < 10 then FormatInteger = "0" & CStr(i) else FormatInteger = i end if End Function %>