BASP

<%@LANGUAGE="VBSCRIPT"%> <% set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_baathparty_STRING Recordset1.Source = "SELECT * FROM en_news where main= 'yes' ORDER BY date DESC" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 3 Recordset1.Open() Recordset1_numRows = 0 %> <% set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_baathparty_STRING Recordset2.Source = "SELECT * FROM en_news where main= 'no' ORDER BY date DESC" Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 3 Recordset2.Open() Recordset2_numRows = 0 %> <% Dim Repeat2__numRows Repeat2__numRows = -1 Dim Repeat2__index Repeat2__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat2__numRows %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 Recordset2_numRows = Recordset2_numRows + Repeat1__numRows %> BASP

Year 2003 Archives


The Title	The Reference

The speech of Comrade Abdullah al-Ahmar Assistant Secretary General of the Party To the Magazine of Sport and Youth in Sudan
An open dialogue about the Great Middle East Project
Information about the Baath Arab Socialist Party
Cultural Invasion
Presentation of "The Arab Unity"		Culture and Party Preparation Bureau in The National Leadership of the Baath Party

Internal System | Constitution | Definition

<% Recordset1.Close() %> <% Recordset2.Close() %>