%
set Category = Server.CreateObject("ADODB.Recordset")
Category.ActiveConnection = MM_photogallerymanager_STRING
Category.Source = "SELECT tblPhotoGalleryCategory.CategoryName, Count(tblPhotoGallery.ItemID) AS CountOfItemID, tblPhotoGalleryCategory.CategoryID FROM tblPhotoGallery INNER JOIN tblPhotoGalleryCategory ON tblPhotoGallery.CategoryID = tblPhotoGalleryCategory.CategoryID WHERE tblPhotoGallery.Activated = 'True' GROUP BY tblPhotoGalleryCategory.CategoryName, tblPhotoGalleryCategory.CategoryID"
Category.CursorType = 0
Category.CursorLocation = 2
Category.LockType = 3
Category.Open()
Category_numRows = 0
%>
<%
Dim photogallery_list__MMColParam1
photogallery_list__MMColParam1 = "%"
If (Request.Form("search") <> "") Then
photogallery_list__MMColParam1 = Request.Form("search")
End If
%>
<%
Dim photogallery_list__MMColParam2
photogallery_list__MMColParam2 = "%"
If (Request.QueryString("cid") <> "") Then
photogallery_list__MMColParam2 = Request.QueryString("cid")
End If
%>
<%
set photogallery_list = Server.CreateObject("ADODB.Recordset")
photogallery_list.ActiveConnection = MM_photogallerymanager_STRING
photogallery_list.Source = "SELECT tblPhotoGallery.*, tblPhotoGalleryCategory.CategoryName FROM tblPhotoGallery INNER JOIN tblPhotoGalleryCategory ON tblPhotoGallery.CategoryID = tblPhotoGalleryCategory.CategoryID WHERE tblPhotoGallery.Activated = 'True' AND tblPhotoGalleryCategory.CategoryID Like '" + Replace(photogallery_list__MMColParam2, "'", "''") + "' AND (tblPhotoGallery.ItemDesc Like '%" + Replace(photogallery_list__MMColParam1, "'", "''") + "%' OR tblPhotoGallery.ItemName Like '%" + Replace(photogallery_list__MMColParam1, "'", "''") + "%') ORDER BY tblPhotoGalleryCategory.CategoryID"
photogallery_list.CursorType = 0
photogallery_list.CursorLocation = 2
photogallery_list.LockType = 3
photogallery_list.Open()
photogallery_list_numRows = 0
%>
<%
Dim photogallery_detail__MMColParam2
photogallery_detail__MMColParam2 = "%"
If (Request.QueryString("ItemID") <> "") Then
photogallery_detail__MMColParam2 = Request.QueryString("ItemID")
End If
%>
<%
Dim photogallery_detail__MMColParam3
photogallery_detail__MMColParam3 = "%"
If (Request.QueryString("cid") <> "") Then
photogallery_detail__MMColParam3 = Request.QueryString("cid")
End If
%>
<%
set photogallery_detail = Server.CreateObject("ADODB.Recordset")
photogallery_detail.ActiveConnection = MM_photogallerymanager_STRING
photogallery_detail.Source = "SELECT tblPhotoGallery.*, tblPhotoGalleryCategory.CategoryName FROM tblPhotoGallery INNER JOIN tblPhotoGalleryCategory ON tblPhotoGallery.CategoryID = tblPhotoGalleryCategory.CategoryID WHERE tblPhotoGallery.Activated = 'True' AND tblPhotoGallery.ItemID Like '" + Replace(photogallery_detail__MMColParam2, "'", "''") + "' AND tblPhotoGallery.CategoryID Like '" + Replace(photogallery_detail__MMColParam3, "'", "''") + "' ORDER BY tblPhotoGalleryCategory.CategoryID"
photogallery_detail.CursorType = 0
photogallery_detail.CursorLocation = 2
photogallery_detail.LockType = 3
photogallery_detail.Open()
photogallery_detail_numRows = 0
%>
<%
Dim HLooper1__numRows
HLooper1__numRows = -2
Dim HLooper1__index
HLooper1__index = 0
photogallery_list_numRows = photogallery_list_numRows + HLooper1__numRows
%>
Ackermann and Johnson art gallery
How to reach us
We are located opposite the Carlton Towers Hotel, on the corner
of Cadogan Place, just off Sloane Street.
Nearest Underground stations
From Knightsbridge Tube station it is a three minute walk. Take
the Sloane Street/Brompton Road exit, turn right down Sloane Street
and left into Cadogan Place.
From Sloane Square tube station it is an eight minute walk.
Walk across Sloane Square and turn right up Sloane Street. Turn
right off Sloane Street into Cadogan Place.
Nearest buses
19 Finsbury Park-Battersea Bridge alight Sloane Street
22 Putney Common-Piccadilly Circus alight Sloane Street
137 Streatham Hill-Oxford Circus alight Sloane Street
Airports
Airports: - Heathrow - 15 miles - 40 minutes by car.
Gatwick - 30 miles - 30 minutes by train (Gatwick Express to Victoria
station).
City Airport - 14 miles - 40 minutes by car.
Train stations
Victoria - 10 minutes by taxi or 20 minutes by Tube
Waterloo, Eurostar terminal - 15 minutes by taxi.
© Arthur Ackermann & Peter Johnson Ltd - 27 Lowndes
Street - London SW1 - 020 7235 6464
<%
Category.Close()
Set Category = Nothing
%>
<%
photogallery_list.Close()
Set photogallery_list = Nothing
%>
<%
photogallery_detail.Close()
Set photogallery_detail = Nothing
%>