<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> Gallery | Αλέξανδρος Κυρίτσης <% 'gallery query Dim Recordset_gal Dim Recordset_gal_numRows Set Recordset_gal = Server.CreateObject("ADODB.Recordset") Recordset_gal.ActiveConnection = MM_conn_admin_STRING Recordset_gal.Source = "SELECT * FROM gallery order by gallery_priority ASC" 'Recordset_bio.Source = "SELECT * from articles WHERE article_id = "&Recordset_header1__MMColParam&" " Recordset_gal.CursorType = 0 Recordset_gal.CursorLocation = 2 Recordset_gal.LockType = 1 Recordset_gal.Open() Recordset_gal_numRows = 0 %>













<% Recordset_gal.Close() Set Recordset_gal = Nothing %>