%
currDate = date()
Set rsNewsCount=Conn.Execute("Select count(*) as totCount from news where cnc=1")
Set rsExhibCount=Conn.Execute("Select count(*) as totCount from exhibitions where cnc=1 and evedatefrm > '"&currDate&"'")
%>
Anjani’s commitment to doing its
best for the safety and security
of the nation has been the key
motivation for Anjani to develop
new products. Rotary wing VTOL
UAVs (Vertical Take Off and
Landing Unmanned Aerial Vehicle)
are the latest offerings from
Anjani to serve the security
needs of our law enforcement and
security organizations.
learn more
<%
Set rsNews=Conn.Execute("Select top 2* from news where cnc=1 order by news_date desc")
x = 0
%>
<%
If not rsNews.Eof then
While not rsNews.Eof
x = x + 1
news_date=rsNews("news_date")
location=rsNews("location")
title=rsNews("title")
introtext=rsNews("introtext")
newstype=rsNews("newstype")
newsday=rsNews("newsday")
newsmonth=rsNews("newsmonth")
newsyear=rsNews("newsyear")
url=rsNews("url")
image=rsNews("image")
pdf=rsNews("pdf")
%>
<%=newsday%>.<%=Month(news_date)%>.<%=newsyear%> <%=title%>
<%if introtext <> "" then%><%=introtext%><%end if%>
<%if newstype = 0 then%>
">
more »
<%elseif newstype = 1 then%>
more »
<%elseif newstype = 2 then%>
more »
<%elseif newstype = 3 then%>
more »
<%end if%>
<%if x = 1 then%>
<%end if%>
<%
if x = 1 then
x = 0
%>
<%
end if
rsNews.MoveNext
Wend
else
%>
Currently there are
no updates.
Please check again
soon!