<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_Portal_STRING Recordset1.Source = "SELECT * FROM Atividade ORDER BY DescAtiv ASC" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Recordset2 Dim Recordset2_numRows Set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_Portal_STRING Recordset2.Source = "SELECT * FROM AAtuacao ORDER BY DescAtuacao ASC" Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 1 Recordset2.Open() Recordset2_numRows = 0 %> <% Dim Recordset3 Dim Recordset3_numRows Set Recordset3 = Server.CreateObject("ADODB.Recordset") Recordset3.ActiveConnection = MM_Portal_STRING Recordset3.Source = "SELECT * FROM Estado ORDER BY Estado ASC" Recordset3.CursorType = 0 Recordset3.CursorLocation = 2 Recordset3.LockType = 1 Recordset3.Open() Recordset3_numRows = 0 %> <% Dim Recordset4 Dim Recordset4_numRows Set Recordset4 = Server.CreateObject("ADODB.Recordset") Recordset4.ActiveConnection = MM_Portal_STRING Recordset4.Source = "SELECT * FROM Empregos" Recordset4.CursorType = 0 Recordset4.CursorLocation = 2 Recordset4.LockType = 1 Recordset4.Open() Recordset4_numRows = 0 %> <% Dim Recordset5 Dim Recordset5_numRows Set Recordset5 = Server.CreateObject("ADODB.Recordset") Recordset5.ActiveConnection = MM_Portal_STRING Recordset5.Source = "SELECT * FROM Clientes" Recordset5.CursorType = 0 Recordset5.CursorLocation = 2 Recordset5.LockType = 1 Recordset5.Open() Recordset5_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset4_numRows = Recordset4_numRows + Repeat1__numRows %> <% ' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables Dim Recordset4_total Dim Recordset4_first Dim Recordset4_last ' set the record count Recordset4_total = Recordset4.RecordCount ' set the number of rows displayed on this page If (Recordset4_numRows < 0) Then Recordset4_numRows = Recordset4_total Elseif (Recordset4_numRows = 0) Then Recordset4_numRows = 1 End If ' set the first and last displayed record Recordset4_first = 1 Recordset4_last = Recordset4_first + Recordset4_numRows - 1 ' if we have the correct record count, check the other stats If (Recordset4_total <> -1) Then If (Recordset4_first > Recordset4_total) Then Recordset4_first = Recordset4_total End If If (Recordset4_last > Recordset4_total) Then Recordset4_last = Recordset4_total End If If (Recordset4_numRows > Recordset4_total) Then Recordset4_numRows = Recordset4_total End If End If %> <% ' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables Dim Recordset5_total Dim Recordset5_first Dim Recordset5_last ' set the record count Recordset5_total = Recordset5.RecordCount ' set the number of rows displayed on this page If (Recordset5_numRows < 0) Then Recordset5_numRows = Recordset5_total Elseif (Recordset5_numRows = 0) Then Recordset5_numRows = 1 End If ' set the first and last displayed record Recordset5_first = 1 Recordset5_last = Recordset5_first + Recordset5_numRows - 1 ' if we have the correct record count, check the other stats If (Recordset5_total <> -1) Then If (Recordset5_first > Recordset5_total) Then Recordset5_first = Recordset5_total End If If (Recordset5_last > Recordset5_total) Then Recordset5_last = Recordset5_total End If If (Recordset5_numRows > Recordset5_total) Then Recordset5_numRows = Recordset5_total End If End If %> <% ' *** Recordset Stats: if we don't know the record count, manually count them If (Recordset4_total = -1) Then ' count the total records by iterating through the recordset Recordset4_total=0 While (Not Recordset4.EOF) Recordset4_total = Recordset4_total + 1 Recordset4.MoveNext Wend ' reset the cursor to the beginning If (Recordset4.CursorType > 0) Then Recordset4.MoveFirst Else Recordset4.Requery End If ' set the number of rows displayed on this page If (Recordset4_numRows < 0 Or Recordset4_numRows > Recordset4_total) Then Recordset4_numRows = Recordset4_total End If ' set the first and last displayed record Recordset4_first = 1 Recordset4_last = Recordset4_first + Recordset4_numRows - 1 If (Recordset4_first > Recordset4_total) Then Recordset4_first = Recordset4_total End If If (Recordset4_last > Recordset4_total) Then Recordset4_last = Recordset4_total End If End If %> <% ' *** Recordset Stats: if we don't know the record count, manually count them If (Recordset5_total = -1) Then ' count the total records by iterating through the recordset Recordset5_total=0 While (Not Recordset5.EOF) Recordset5_total = Recordset5_total + 1 Recordset5.MoveNext Wend ' reset the cursor to the beginning If (Recordset5.CursorType > 0) Then Recordset5.MoveFirst Else Recordset5.Requery End If ' set the number of rows displayed on this page If (Recordset5_numRows < 0 Or Recordset5_numRows > Recordset5_total) Then Recordset5_numRows = Recordset5_total End If ' set the first and last displayed record Recordset5_first = 1 Recordset5_last = Recordset5_first + Recordset5_numRows - 1 If (Recordset5_first > Recordset5_total) Then Recordset5_first = Recordset5_total End If If (Recordset5_last > Recordset5_total) Then Recordset5_last = Recordset5_total End If End If %> Portal do Taboão da Serra - Trânsito
Taboão da Serra 

portal@portaldotaboaodaserra.com.br / portaldotaboaodaserra@hotmail.com


PORTAL
Página Inicial
Quem Somos
Fale Conosco
Anuncie
Divulgação de Eventos
TABOÃO DA SERRA
Prefeitura
Câmara Municipal
Portal da Transparência
Previsão do Tempo
Receita Federal
CLASSIFICADOS
Classificados
Classificados Imóveis
Empresas e Serviços
COLETA SELETIVA- LIXO
Postos de Coleta
Lâmpadas Fluorescentes
Lixo Eletrônico
Descarte de Remédios
EMPREGOS & VAGAS
Área de Atuação - Pesquisa
Candidatos - Cadastro
Candidatos - Listagem Geral
Cargos - Pesquisa
Divulgação de Vagas-Gratuito
Portal do Trabalho
Vagas Disponíveis
EMPRESAS & SERVIÇOS
Autônomos
Empresas
Serviços
Pesquisa
INFORMÁTICA
Aulas Particulares
Criação Web Sites
Designer Gráfico
Hospedagem Sites
PHPM Informática
JORNAIS
Jornais - Brasil
Jornais - Exterior 
VEÍCULOS & TRÂNSITO
Ciretrans Paulistas
Detran-São Paulo
Inspeção Veicular
Trânsito
TRÂNSITO
LINKS
Código de Trânsito
Consulta de Multas
Pesquisa de Pontuação-CNH
Legislação
Notícias
eDetranSP
Endereços SP e Gde SP
Inspeção Veicular
CNHs Notificadas
CIRETRANS SP
Eletrônicos - Submarino.com.br

BOATOS NA INTERNET GERAM FALSA CARTILHA DO TRÂNSITO EM SP

Fonte de Pesquisa: www.globo.com - G1 Globo SP dia 18/04/2011
Clique aqui e veja a máteria na íntegra.

A falsa cartilha do trânsito

Falso Verdadeiro
Guard rail  (Foto: Roney Domingos/ G1)

Radares escondidos

Não existem equipamentos de fiscalização embutidos em guard-rails ou em vigas de muro de cimento em São Paulo, até porque isso seria totalmente improdutivo, haja vista a obrigatoriedade em sinalizar com antecedência a existência dos equipamentos de fiscalização. A tese é difundida na internet, mas a CET afirma que as imagens são montadas e incoerentes. As imagens e informações não possuem origem oficial e são repassadas via "spam".

shopping (Foto: Roney Domingos/ G1)

Lei obriga shoopings a isentar clientes

A lei 13.819, de 2009, determina que ficam dispensados do pagamento das taxas referentes ao uso de estacionamento, cobradas por shopping centers instalados no estado de São Paulo, os clientes que comprovarem despesa correspondente a pelo menos dez vezes o valor da referida taxa. Mas a Associação Brasileira de Shopping Centers obteve liminar para suspender a eficácia da lei até decisão final da ação direta de inconstitucionalidade em 15 de dezembro de 2009.

corredor de ônibus  (Foto: Roney Domingos/ G1)

Andar na faixa de ônibus não dá multa

Invadir a faixa exclusiva de ônibus é infração de trânsito grave, com perda de cinco pontos na carteira de habilitação e multa de R$ 127,69. Veículos de passeio podem usar os corredores de ônibus apenas em horários ociosos: nos fins de semana (das 15h de sábado às 4h de segunda), feriados (das 0h às 4h do dia seguinte) e, diariamente, durante as madrugadas (das 23 às 4h).

 

carro fora do rodizio (Foto: Roney Domingos/ G1)

Rodízio municipal de veículos perdoa

 Segundo a CET, mesmo que o motorista esteja com o carro quebrado ou socorrendo uma pessoa doente, ele pode ficar sujeito à multa se for flagrado desobedecendo o rodízio. Mesmo assim, o motorista que se sentir prejudicado tem o direito de contestar a autuação interpondo recurso administrativo junto ao Departamento de Operação do Sistema Viário (DSV).

Carro da CET (Foto: Roney Domingos/ G1)

É possível ligar para a CET para obter isenção

Segundo a CET, essa mensagem distribuída pela internet não tem fundamento. A fiscalização e autuação do cumprimento do rodízio continuam as mesmas desde sua implantação, em 1997, e as multas aplicadas por circulação em horário proibido são processadas normalmente. Os atendentes do 156 e 1188 também foram orientados a informar  que esse tipo de procedimento não existe. Portanto, nenhum protocolo foi fornecido e não foi registrado no DSV nenhum tipo de recurso com esse argumento.

Semáforo (Foto: Roney Domingos/ G1)

Furar semáforo vermelho à noite não dá multa

A CET  esclarece que os motoristas que avançam semáforo vermelho no período noturno também são autuados.  Além dos 2.450 agentes de trânsito e dos policiais militares do Comando de Policiamento de Trânsito (CPTran), a fiscalização aos motoristas que cometem esse tipo de infração é realizada por 111 equipamentos eletrônicos (radares). Todos eles estão ligados 24 horas. Avançar semáforo vermelho é uma infração considerada gravíssima, com multa de R$ 191,54 e perda de sete pontos na carteira de habilitação.

 

<% Recordset1.Close() Set Recordset1 = Nothing %> <% Recordset2.Close() Set Recordset2 = Nothing %> <% Recordset3.Close() Set Recordset3 = Nothing %> <% Recordset4.Close() Set Recordset4 = Nothing %> <% Recordset5.Close() Set Recordset5 = Nothing %>