 |
|
 |
 |
| |
|
|
<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
'Dim MM_saude_STRING
'MM_saude_STRING = "driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("dados/planos.mdb")
'MM_saude_STRING = "driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../../cwdweb/djatlantis/dados/planos.mdb")
MM_saude_STRING = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=d:\www\vhosts\cwdweb\djatlantis\dados\planos.mdb;"
%>
<%
Dim Rslistar
Dim Rslistar_numRows
Set Rslistar = Server.CreateObject("ADODB.Recordset")
Rslistar.ActiveConnection = MM_saude_STRING
Rslistar.Source = "SELECT * FROM planos"
Rslistar.CursorType = 0
Rslistar.CursorLocation = 2
Rslistar.LockType = 1
Rslistar.Open()
Rslistar_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
Rslistar_numRows = Rslistar_numRows + Repeat1__numRows
%>
A Center Vida trabalha somente com empresas idôneas e com o devido registro na ANS, o qual é exigido de todas as empresas que comercializam planos de saúde no Brasil. Os planos de saúde, igualmente, têm que ser registrados na ANS.
Verifique sempre se a sua operadora ou aquela que você deseja contratar está devidamente registrada na Agência Nacional de Saúde Suplementar.
Para verificar as tabelas e principais caracteristicas dos planos de cada operadora, clique no link ao lado, em caso de dúvidas, ligue ou solicite nossa visita.
Atenção, solicite nossa visita para planos empresariais, possuímos excelentes oportunidades para sua empresa não importando a quantidade de funcionários que ela possua.
<% While ((Repeat1__numRows <> 0) AND (NOT Rslistar.EOF)) %>
|
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Rslistar.MoveNext()
Wend
%>
<%
Rslistar.Close()
Set Rslistar = Nothing
%>
|
|
|
 |