<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Option Explicit Dim cnnLogin Dim rstLogin Dim strSQL Dim adoConAdmin Dim rsLogin Dim strSQLAdmin Dim lngRecordNoAdmin lngRecordNoAdmin = CLng(Request.QueryString("id")) Set adoConAdmin = Server.CreateObject("ADODB.Connection") adoConAdmin.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("libs/db/bccdb.mdb") Set rsLogin = Server.CreateObject("ADODB.Recordset") strSQLAdmin = "SELECT * FROM projects WHERE id =" & lngRecordNoAdmin rsLogin.Open strSQLAdmin, adoConAdmin %> <% ' Define variables dim recordsonpage, requestrecords, offset, allrecords, hiddenrecords, showrecords, lastrecord, recordcounter, pagelist, pagelistcounter, sConnection, rs ' DB connection dim Conn Set Conn = Server.CreateObject("ADODB.Connection") sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & Server.MapPath("libs/db/bccdb.mdb") & ";" & _ "Persist Security Info=True" Conn.Open(sConnection) ' records per page recordsonpage = 8 ' count all records allrecords = -1 set rs = conn.Execute("SELECT * FROM projects") do until rs.EOF allrecords = allrecords + 1 rs.movenext loop ' if offset is zero then the first page will be loaded offset = request.querystring("offset") if offset = 0 OR offset = "" then requestrecords = 0 else requestrecords = requestrecords + offset end if ' opens database set rs = conn.Execute("SELECT * FROM projects, news ORDER BY id DESC, nid DESC") ' reads first records (offset) without showing them (can't find another solution!) hiddenrecords = requestrecords do until hiddenrecords = 0 OR rs.EOF hiddenrecords = hiddenrecords - 1 rs.movenext if rs.EOF then lastrecord = 1 end if loop %> Construction, Logistics, Transportation projets done by BCC Group, Afghanistan
bcc group of companies Afghanistan projects
 
<% ' prints records in the table showrecords = recordsonpage recordcounter = requestrecords do until showrecords = 0 OR rs.EOF recordcounter = recordcounter + 1 %> <% showrecords = showrecords - 1 rs.movenext if rs.EOF then lastrecord = 1 end if loop %>
<% = recordcounter %> • PROJECT NAME <%=rs("NameofProject")%>
Location / Country <%=rs("LocationCountry")%>
Client <%=rs("Client")%>
Status <%=rs("Status")%>
 
<% if requestrecords <> 0 then %> Prev Page <% else %> Prev Page <% end if %> <% pagelist = 0 pagelistcounter = 0 do until pagelist > allrecords pagelistcounter = pagelistcounter + 1 %> <% = pagelistcounter %> <% pagelist = pagelist + recordsonpage loop %> <% if lastrecord <> 1 then %> Next Page <% else %> Next Page <% end if %>

BCC Group General manager Message

Bakhtarzameen Construction Co’ was established in 2007.  From the company’s first project on the for US Air Force  on Bagram Airebase in 2008, BakhtarZameen  grew and became an established force in the construction industry of Afghanistan.  In late 2009, BZC took a giant step forward with the formation of BCC Group of Companies and established a superior Construction, Logistics and Transportation company dedicated to rebuilding Afghanistan.
BCC Group vision
The objective of BCC Group of Companies is to be the leading Afghan National construction, logistics and transportation group engaged in the reconstruction of Afghanistan. In pursuit of this objective, BCC Group performs to International Standards of Integrity, Quality, Cost and timeliness in the execution of its contracts.
BCC Group work environement
The Company provides its workers with a safe and progressive work environment, allowing them to grow professionally and achieve financial success for themselves and their families. BCC encourages its employees to take the initiative and be creative -- and take ownership of their projects so as to provide consistent and quality results.
All Rights Reserved By BCC Group of Companies, Kabul - Afghanistan Copyright © 2010 -
Website Designed, Developed By BeOnline Web Solutions (SMC-PVT.) Limited
Afghanistan construction company, Construction Company Kabul, Afghanistan, no.1 Construction Co, construction contractor Kabul, Afghanistan, Roads construction company, Afghanistan, Bridges construction, Buildings, Schools, Hospitals, Afghanistan Logistics Company BCC Group, Transportation, Kabul Logistic Company, Kabul Transportation Company, Kandahar, Kunduz, Jalalabad, Mazar, Kunduz, Herat, Bakhtarzameen Construction Co, BCC Group of Companies, Kabul - Afghanistan, BCC Transportation Co, BCC Logistics Co, BCC Construction Co
<% rs.close Conn.close %>