<%
sql= "SELECT ID,type,sub_type,des_type,title,sub_title,des_title,email,enter_date FROM [content] Where type='Team of Consultants' ;"
Set rs = Server.CreateObject("ADODB.Recordset")
mdbfilepath = Server.MapPath("mcs.mdb")
rs.Open sql,"Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath &";", 3, 3
%>
<%
' Loop through our records and ouput 1 row per record
Do While Not rs.EOF
For I = 1 To 1
response.write ""
if rs(3)<>"" then
response.write "| " & rs(3) & " | "
else
response.write "" & rs(4) & "
"
response.write "" & rs(5) & " "
if rs(6)<>"" then
response.write " more... | "
else
response.write ""
end if
end if
response.write " "
rs.MoveNext
Next 'I
' Increment the number of records we've shown
' Can't forget to move to the next record!
Loop
' All done - close table
' Close DB objects and free variables
rs.Close
Set rs = Nothing%>
Several Studies for the Jericho Mineral
Water Factory. Aug. 1996- Aug. 1998
Contractor: Jericho
Mineral Water Factory.
MCS has undertook several studies for the
Jericho Mineral Water Factory during the period from
1996-1998. These studies included a full feasibility
study to establish the factory, a market analysis
study, an organizational structure study, and a cost
analysis and evaluation study. |
|
|
