%@LANGUAGE="VBSCRIPT"%> <% Dim RecordsetEspecialidades Dim RecordsetEspecialidades_numRows Set RecordsetEspecialidades = Server.CreateObject("ADODB.Recordset") RecordsetEspecialidades.ActiveConnection = MM_paulista_STRING RecordsetEspecialidades.Source = "SELECT especialidade FROM [medico_ especialidades] GROUP BY especialidade ORDER BY especialidade" RecordsetEspecialidades.CursorType = 0 RecordsetEspecialidades.CursorLocation = 2 RecordsetEspecialidades.LockType = 1 RecordsetEspecialidades.Open() RecordsetEspecialidades_numRows = 0 %>
| |
|
||||||||||||||||||||
Contato|Localização| Privacidade © 2004 - Hospital Paulista Vila Clementino - São Paulo - SP Rua Dr. Diogo de Faria, 780 - Fone +55 11 5087 8700 |
||||||||||||||||||||