details of knitting exhibition

<%@LANGUAGE="VBSCRIPT"%> <% e_id=request.querystring("e_id") set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_kworld_STRING Recordset2.Source = "SELECT exhibitions.e_title, exhibitions.e_notes, exhibitions.e_datestart, exhibitions.e_dateend,exhibitions.m_id,exhibitions.g_id,exhibitions.e_website, members.m_familyname, members.m_firstname,members.m_id,galleries.g_name,galleries.g_street,galleries.g_address,galleries.g_town, galleries.g_county,galleries.g_postcode,galleries.g_country,galleries.g_contact,galleries.g_email,galleries.g_telephone,galleries.g_fax,galleries.g_website FROM exhibitions, members,galleries WHERE exhibitions.m_id= members.m_id AND exhibitions.g_id=galleries.g_id AND e_id=" & e_id 'response.write(Recordset2.Source) Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 3 Recordset2.Open() Recordset2_numRows = 0 if NOT Recordset2.EOF then g_name=Recordset2.Fields.Item("g_name").Value e_title=Recordset2.Fields.Item("e_title").Value e_notes=Recordset2.Fields.Item("e_notes").Value e_datestart=Recordset2.Fields.Item("e_datestart").Value e_dateend=Recordset2.Fields.Item("e_dateend").Value s_array=Split (e_datestart,"/") d_day=s_array(1) d_month=s_array(0) d_year=s_array(2) e_datestart= d_day & "/" & d_month & "/" & d_year s_array=Split (e_dateend,"/") d_day=s_array(1) d_month=s_array(0) d_year=s_array(2) e_dateend= d_day & "/" & d_month & "/" & d_year e_website=Recordset2.Fields.Item("e_website").Value if e_website="" then e_website="not known" end if g_street=Recordset2.Fields.Item("g_street").Value address=g_street & ",
" g_address=Recordset2.Fields.Item("g_address").Value if g_address<>"" then address=address & g_address & ",
" end if g_town=Recordset2.Fields.Item("g_town").Value if g_town<>"" then address=address & g_town & ",
" end if g_county=Recordset2.Fields.Item("g_county").Value if g_county<>"" then address=address & g_county & ",
" end if g_country=Recordset2.Fields.Item("g_country").Value if g_country<>"" then address=address & g_country & ",

" end if g_postcode=Recordset2.Fields.Item("g_postcode").Value if g_postcode<>"" then address=address & g_postcode & ",

" end if g_telephone=Recordset2.Fields.Item("g_telephone").Value if g_telephone<>"" then address=address & "Tel: " & g_telephone & ",
" end if g_fax=Recordset2.Fields.Item("g_fax").Value if g_fax<>"" then address=address & "Fax: " & g_fax & ",
" end if g_website=Recordset2.Fields.Item("g_website").Value if g_website<>"" then address=address & "Gallery web site: " & g_website & ",

" end if g_contact=Recordset2.Fields.Item("g_contact").Value if g_contact<>"" then address=address & "Gallery conact name: " & g_contact & ",
" end if g_email=Recordset2.Fields.Item("g_email").Value if g_email<>"" then address=address & "Gallery email: " & g_email & ",
" end if m_firstname=Recordset2.Fields.Item("m_firstname").Value if m_firstname<>"" then artists=M_firstname & " " end if m_familyname=Recordset2.Fields.Item("m_familyname").Value m_id=Recordset2.Fields.Item("m_id").Value if m_familyname<>"" then artists=artists & m_familyname & " (details)
" end if end if Recordset2.Close() set Recordset2=Nothing set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_kworld_STRING Recordset2.Source = "SELECT members.m_id,members.m_familyname, members.m_firstname FROM group_exhibs,members WHERE group_exhibs.m_id= members.m_id AND group_exhibs.e_id=" & e_id 'response.write(Recordset2.Source) Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 3 Recordset2.Open() Recordset2_numRows = 0 do while NOT Recordset2.EOF m_familyname=Recordset2.Fields.Item("m_familyname").Value m_firstname=Recordset2.Fields.Item("m_firstname").Value m_id=Recordset2.Fields.Item("m_id").Value artists=artists & m_firstname & " " & m_familyname & " (details)
" Recordset2.MoveNext loop %> details of knitting exhibition

KnitJapan.co.uk

	Details:

	Title:	<%=e_title%>
	Gallery	<%=g_name%>
	Date:	<%=e_datestart%> to <%=e_dateend%>
	Address	<%=address%>
	About the show:	<%=e_notes%>
	Artist(s)	<%=artists%>
	web site:	<% if e_website <> "not known" then response.write ("" & e_website & "") else response.write("not known") end if %>