<%@LANGUAGE="VBSCRIPT"%> <% Dim medicos Dim medicos_numRows Set medicos = Server.CreateObject("ADODB.Recordset") medicos.ActiveConnection = MM_CostaCnx_STRING medicos.Source = "SELECT * FROM especialidad ORDER BY especialidad" medicos.CursorType = 0 medicos.CursorLocation = 2 medicos.LockType = 1 medicos.Open() medicos_numRows = 0 %> <% Dim resul__espec resul__espec = "%" If (Request.QueryString("myespecialidad") <> "") Then resul__espec = Request.QueryString("myespecialidad") End If %> <% Dim resul Dim resul_numRows Set resul = Server.CreateObject("ADODB.Recordset") resul.ActiveConnection = MM_CostaCnx_STRING resul.Source = "SELECT DISTINCT medico, recepcion, especialidad FROM medico WHERE especialidad LIKE '" + Replace(resul__espec, "'", "''") + "' ORDER BY medico" resul.CursorType = 0 resul.CursorLocation = 2 resul.LockType = 1 resul.Open() resul_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 resul_numRows = resul_numRows + Repeat1__numRows %> LA COSTA | Centro Médico
Turno
Contactos
Msn
 
 
Búsqueda General:



 

 
Floreria

Regalar flores es una excelente manera de expresar lo que hay en nuestro interior. Para agasajar un nacimiento, desear mejoría a un ser querido o simplemente hacer un obsequio haciendo vivas sus emociones, La Costa Floreria le ofrece arreglos, ramos y obsequios originales y exclusivos. 

Los puede encargar desde la comodidad de su habitación, o desde su oficina o domicilio y ya lo encuentra listo cuando viene a realizar su visita o acompañar el recibimiento de un recién nacido.
Encargue sus pedidos al 223 579 o al interno 1001 si se encuentra dentro del sanatorio.  También lo puede hacer al Email: floreria@lacosta.com.py o desde nuestro sitio web www.lacosta.com.py o simplemente nos puede visitar y elegir usted mismo su obsequio en el sub suelo 1 del sanatorio.
floreria
Floreria
Floreria
Floreria
 
<% medicos.Close() Set medicos = Nothing %> <% resul.Close() Set resul = Nothing %>