INFORMACIóN SOBRE NUESTRAS CAMADAS

<% Dim oConn,strSQL,objRS mix=0 Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open = "kokkan.info.camadas_kokkan" strSQL = "SELECT * FROM camadas order by fecha desc" Set objRS = oConn.Execute(strSQL) objRS.MoveFirst Response.Write "" do while not objRS.Eof Response.Write "" Response.Write "" Response.Write "" objRS.MoveNext 'mix=mix+1 loop objRS.MoveFirst 'envio=envio&"&xop1="&objRS("padre") 'objRS.MoveNext 'envio=envio&"&xop2="&objRS("padre") 'objRS.MoveNext 'envio=envio&"&xop3="&objRS("padre") Response.Write "

." Response.Write ""&objRS("fecha")&"     " Response.Write "" Response.Write "PADRE: "&objRS("padre")&" " Response.Write "Curriculum: "&objRS("curri_padre")&" " Response.Write "MADRE: "&objRS("madre")&" " Response.Write "Curriculum: "&objRS("curri_madre")&" " Response.Write "Num. de cachorros: "&objRS("cachorros")&" " Response.Write "Detalles: "&objRS("detalles")&" " Response.Write "Observaciones: "&objRS("observaciones")&" " Response.Write "    " Response.Write "

" oConn.Close set objRS = nothing set oConn = nothing %>

Si necesitas mas información sobre nuestras camadas, por favor contacta con nosotros en la siguiente direccion de correo electrónico: info@kokkan.info