<%
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%>
Arab Paper and Hygienic Products Company- An Evaluation and
Valuation Study. July 2001.
This study had
two main objectives: first, to evaluate the operations of
the Arab Paper and Hygienic Products Company in Egypt,
determine its attractiveness as an investment opportunity,
and second, to determine the estimated value of the company
as a going concern.
|
|
