Skip to content

Fine Jewelry - Sale 2510 - Lot 55

 

Lot 55
Sterling Silver and Amethyst Bracelet, Horacio de la Parra, Mexico D.F., c. 1940s, the bracelet bezel-set with large amethyst cabochons within scrolling frames, joined by links with high relief dome motifs, signed; together with a pair of silver and amethyst earpendants, signed Farfan, Taxco.

Note: De la Parra supplied work for William Spratling and Hector Aguilar, and was active under his own name in the 1930s and 40s. He founded the firm Conquistador in 1946.
Estimate $250-350

Small dents to the domes. Interior circ. 6 3/4 in. earrings 1 1/2 in. Hallmark is HECHO EN MEXICO DF in a circle with 800 in the center, and PARRA in a rectangle. Earrings with HECHO EN MEXICO in a circle with FAR/FAN in the center and STERLING 925
Sold for $385
Inquiry Back to Search Results
rray( retvalImg ) Then loadImageFiles = retvalImg Exit Function End If loadImageFiles = Array() 'Otherwise just check the filesystem for the default image to handle real-time updates Dim path, fs path = s_folder & "\" & s_refno & ".jpg" set fs=Server.CreateObject("Scripting.FileSystemObject") If fs.FileExists(path) Then 'ReDim retvalImg(1) 'retvalImg(1) = s_refno & ".jpg" loadImageFiles = Array( s_refno & ".jpg" ) End If End Function ' 'Function loadImageFilesFromDb 'Check db for list of files for this refno 'We're doing this because Mosso disk access is painfully slow, and page load time > 5sec if we search the filesystem 'JJS 20090701 Function loadImageFilesFromDb( s_refno ) On Error Resume Next Dim refno refno = Trim(s_refno) If (refno= "") Then Exit Function End If Dim sql sql = "select filename from catalogue_images where filename like '" + refno +"%' AND (NOT filename like '%tn%') AND `deleted` =0 " Dim conn, cmd, rs, retval retval = "" Set conn = Server.CreateObject("ADODB.Connection") conn.open ( loggingDBConnectionString ) Set cmd = Server.CreateObject("ADODB.Command") cmd.ActiveConnection = conn cmd.CommandText= sql Set rs = cmd.Execute Dim rows Dim files(), r If rs.EOF Then Exit Function Else rows = rs.GetRows(,0,"filename") End If Redim files(UBound(rows, 2)) For r = 0 to UBound(rows, 2) files(r) = rows(0,r) Next loadImageFilesFromDb = files End Function %>