<%@LANGUAGE="VBSCRIPT"%> <% Dim categoriaventas Dim categoriaventas_numRows Set categoriaventas = Server.CreateObject("ADODB.Recordset") categoriaventas.ActiveConnection = MM_agropecuaria_STRING categoriaventas.Source = "SELECT * FROM dbo.categoriaventas ORDER BY tabulador ASC" categoriaventas.CursorType = 0 categoriaventas.CursorLocation = 2 categoriaventas.LockType = 1 categoriaventas.Open() categoriaventas_numRows = 0 %> <% Dim categoriadirectorio Dim categoriadirectorio_numRows Set categoriadirectorio = Server.CreateObject("ADODB.Recordset") categoriadirectorio.ActiveConnection = MM_agropecuaria_STRING categoriadirectorio.Source = "SELECT * FROM dbo.categoriadirectorio ORDER BY categoria ASC" categoriadirectorio.CursorType = 0 categoriadirectorio.CursorLocation = 2 categoriadirectorio.LockType = 1 categoriadirectorio.Open() categoriadirectorio_numRows = 0 %> <% Dim noticias Dim noticias_numRows Set noticias = Server.CreateObject("ADODB.Recordset") noticias.ActiveConnection = MM_noticias_STRING noticias.Source = "SELECT * FROM news ORDER BY newsID DESC" noticias.CursorType = 0 noticias.CursorLocation = 2 noticias.LockType = 1 noticias.Open() noticias_numRows = 0 %> <% Dim eventos Dim eventos_numRows Set eventos = Server.CreateObject("ADODB.Recordset") eventos.ActiveConnection = MM_eventos_STRING eventos.Source = "SELECT * FROM news ORDER BY newsDate asc" eventos.CursorType = 0 eventos.CursorLocation = 2 eventos.LockType = 1 eventos.Open() eventos_numRows = 0 %> <% Dim directorio__MMColParam directorio__MMColParam = "2" If (Request("MM_EmptyValue") <> "") Then directorio__MMColParam = Request("MM_EmptyValue") End If %> <% Dim directorio Dim directorio_numRows Set directorio = Server.CreateObject("ADODB.Recordset") directorio.ActiveConnection = MM_agropecuaria_STRING directorio.Source = "SELECT * FROM dbo.directorio WHERE destacados = " + Replace(directorio__MMColParam, "'", "''") + " and status=1 and categoria = 6 ORDER BY idregistro DESC" directorio.CursorType = 0 directorio.CursorLocation = 2 directorio.LockType = 1 directorio.Open() directorio_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 categoriaventas_numRows = categoriaventas_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 categoriadirectorio_numRows = categoriadirectorio_numRows + Repeat2__numRows %> <% Dim Repeat3__numRows Dim Repeat3__index Repeat3__numRows = 3 Repeat3__index = 0 noticias_numRows = noticias_numRows + Repeat3__numRows %> <% Dim Repeat6__numRows Dim Repeat6__index Repeat6__numRows = 4 Repeat6__index = 0 compras_numRows = compras_numRows + Repeat6__numRows %> <% Dim Repeat5__numRows Dim Repeat5__index Repeat5__numRows = 6 Repeat5__index = 0 directorio_numRows = directorio_numRows + Repeat5__numRows %> <% Dim Repeat4__numRows Dim Repeat4__index Repeat4__numRows = 4 Repeat4__index = 0 eventos_numRows = eventos_numRows + Repeat4__numRows %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> miagropecuaria.com :: BIENVENIDOS ::
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
INSCRIPCIONES
PEDIGREE
CUTTING
Registro Usuario
Usuarios
Contactos

Ganadores de la 2da Copa www.miagropecuaria.com

Valencia se lleno de los mejores Vaqueros Venezolanos, el evento culmino con éxito y una organización total, se efectuaron modalidades de encierro de ganado, corte y aparte, barriles, lazo, exposición de caballos con opción a compra y exhibición de las mejores fincas y padrillos, los ganadores fueron.

CORTE Y APARTE


1er Lugar
Juan Rengel de Vaqueros Venezolanos en Duallin With Yerry
     


2do Lugar empatados 
Jose Francisco Sigala de Barquisimeto en Ler Playboys Diamond

  


2do Lugar empatados 
Juan Rengel de Vaqueros Venezolanos en Dulces Instant
     

4to Lugar
Ramiro Ramos de Mirandita Ranch en Tanquerai Quixote
  

5to Lugar
Julio Ruisanches de Agropecuaria 5j en San Tari Olena
El corte y aparte arranca con esta competencia una clasificatoria para La NCHA de Venezuela, la asociacion de venezolana de corte y aparte respaldada por la asociacion mas importante de los estados unidos NCHA.

Ganadora Corte y Aparte Infantil

Valeria Celis en Lanet Olena
Encierro de Ganado Abierto
1 Los de ultima Hora (Orencio Marante, Roberto Marante y Roberto Di Nardo)
2 Alimentos La Caridad (Jose Diaz, Ramiro Ramos y Johnny Curbelo)
3 Team Plumrose (Jesus Mendoza, Andrez Romer y Alexander Romer)
Encierro de Ganado Infantil


1er lugar

 
 
 
Lazo

1er Lugar Alexander Romer de Team Plumrose
 

Barriles Infantil

  1. Mariant Macias en Lady Time.
  2. Santiago Merino

Barriles Juvenil

  1. Luis Gerardo Gullo en Negra Matea
  2. Astrid Alexandra Chacon en Kodachromed

Barriles Adulto

  1. Jose Gregorio Rodriguez en Tentacion
  2. Bertha de Lopez

Barriles Abierto 

  1. Luis Gerardo Gullo en Negra Matea
  2. Mariant Macias en Lady Time

Durante el evento se expusieron los mejores padrillos de Venezuela, donde cada criador como Agropecuaria 5j, Centro Ecuestre La Alegria, Alamo Ranch, Hermanos Lynch, Mirandita Ranch, Manuel Curbelo, Oswaldo Celis, Empujeca, Truki Ranch, Bongo Ranch, Rancho 5L, RO Ranch, Centro Ecuestre Alvarez y Paci, Agropecuaria Catanese, hacienda el Amparo y Ezequiel Nastari, demostraron la calidad y genetica que tenemos en nuestro pais. VER LOS PADRILLOS QUE ESTUVIERON PRESENTE

 
Exposicion de caballos con Opcion a Compra, total exito mas de 500 personas
 
     
 

 

  

 

Gracias a los Patrocinantes
A todas aquellas personas, amigos, compañias y compañeros que
confiaron y me apoyaron, sin ustedes no hubiese logrado un exito total en la 2da copa.



Si tienes fotos del evento enviala y la publicamos
Trofeos del evento
     
     
     
     
 
Oleo Sobre Cuero Pintora: Marianela Mendoza Osio (Marioch) 04123468223


  Western  
 Noticias
Eventos
Registro
Contactos
Usuarios
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Ayuda | Mapa web | Información general | Publicidad | Condiciones Legales | Información Corporativa
© copyright: Miagropecuaria.com

<% categoriaventas.Close() Set categoriaventas = Nothing %> <% categoriadirectorio.Close() Set categoriadirectorio = Nothing %> <% noticias.Close() Set noticias = Nothing %> <% eventos.Close() Set eventos = Nothing %> <% directorio.Close() Set directorio = Nothing %>