<%@ Language=VBScript %> <% ' PageId = 5 ' Position1: 215x125 Left ' Position2: 167x125 Right ' Path = images/uploadedimages ' How to get Unique File name: replace(replace(replace(Now," ",""),":",""),"/","") dim rs dim objConn dim Position1 dim Position2 dim Path Path = "images/uploadedimages/" set objConn = Server.CreateObject("ADODB.Connection") set rs = Server.CreateObject("ADODB.Recordset") objConn.ConnectionString = "DSN=pca;uid=sa;pwd=;" objConn.Open strSQL = "SELECT AllImages.FileName FROM AllImages WHERE (((AllImages.PageId)=5)) ORDER BY AllImages.ImagePosition;" set rs = objconn.Execute(strSQL) if not rs.EOF then if not isnull(rs(0)) then Position1 = Path & rs(0) end if rs.MoveNext if not isnull(rs(0)) then Position2 = Path & rs(0) end if end if %>
Group A is a small group of visual artists that has a long history of involvement with the Pittsburgh Center for the Arts. Originally formed in 1944 as The Abstract Group, Group A was one of the original guilds to combine their efforts and start the Pittsburgh Center for the Arts. Group A is committed to staging selective, quality art exhibitions in the Pittsburgh area.

As an association of artists, Group A provides exhibition opportunities for its members in the Pittsburgh and surrounding areas, and fosters an active dialogue on the continuation of abstract concepts and practices.

Artists become members of Group A by either: 1) Screening into the Group by submitting slides and resume...screenings are held either once or twice a year, and are advertised in local periodicals such as the City Paper. 2) Invitation by an existing Group A member, who approaches an artist to submit work to exhibitions for jurying. If an artist is subsequently juried in two exhibits, they become a member.

back to guilds list
<% rs.Close objConn.Close set rs = nothing set objConn = nothing %>