|
|
| |
Economic news in Archive
|
|
|
|
<%
Dim oConn, oRs, filePath, RCount, Index
' Map authors database to physical path
filePath = Server.MapPath("/News/News.mdb")
' Create ADO Connection Component to connect
' with sample database
set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
' Create ADO Recordset Component
Set oRs = Server.CreateObject("ADODB.Recordset")
Set oRs.ActiveConnection = oConn
oRs.PageSize = 12
' Get recordset
oRs.source = "SELECT WeekDateSecond, WeekDateFirst FROM WeeklyNews GROUP BY WeekDateSecond, WeekDateFirst"
' oRs.source = "SELECT * FROM WeeklyNews"
oRs.Open
RCount = 0
Index = 1
%>
|
|
| |
|
|
| |
|
|
| Agricultural,
Fishery, Livestock Products & Foodstuffs |
01
|
| Agriculture,
Irrigation, Flowers & Pants |
02
|
| Handicraft(s),
Carpets & Chandeliers |
03
|
| Chemicals,
Detergents, & Bleach |
04
|
| Civil
Works, Steel Structures, & Consulting Engineers |
05
|
| Construction
Materials |
06
|
| Cosmetic
& Hygienic Products |
07
|
| Dimensional
Stones, Minerals |
08
|
| Electric
& Electronic Products |
09
|
| Electronic
Consumer Products |
10
|
| Furniture,
Wood Products, Industries & Shelving Systems |
11
|
| Transport
Equipment, Parts & Accessories |
12
|
| Hardware,
Hand Tools, & Metal Products |
13
|
| Heavy
Duty Machinery, Parts, & Accessories |
14
|
| Household
Appliances |
15
|
| Infant
Sanitary, Toys, Stationery, & Teaching Aids |
16
|
| Information
Industry |
17
|
| Installations,
Air Conditioners, & Pneumatic Parts |
18
|
| Textiles,
Garments, Leather Products & Sport Equipment |
19
|
| Machinery,
Parts, & Tools |
20
|
| Medical,
Pharmaceutical, Laboratory Equipment & Services |
21
|
| Publishing,
Advertising, Printing & Packaging Industries |
22
|
| Petrochemicals,
Gas & Oil Industries |
23
|
| Plastic
& Rubber Industries |
24
|
| Services,
Banking, Insurance, Export & Import |
25
|
|
| |
Back Top 20 News
|
Economic
News
January