<%@LANGUAGE="VBSCRIPT"%> <% Dim News_PT Dim News_PT_numRows Set News_PT = Server.CreateObject("ADODB.Recordset") News_PT.ActiveConnection = MM_MENSHENWEB_STRING News_PT.Source = "SELECT * FROM Noticias" News_PT.CursorType = 0 News_PT.CursorLocation = 2 News_PT.LockType = 1 News_PT.Open() News_PT_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 3 Repeat1__index = 0 News_PT_numRows = News_PT_numRows + Repeat1__numRows %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> MENSHEN - Consultoria | Formação | Sistemas de Redes | ON-LINE
MENSHEN - Consultoria, Formação, Sistemas de Redes   GOLD Partner da Microsoft    
Home Notícias & Eventos Contactos Suporte GO  
Consultoria, Formação, Sistemas de Redes Consultoria, Formação, Sistemas de Redes Consultoria, Formação, Sistemas de Redes  
Quem Somos Produtos e Serviços Clientes Nota Legal Mapa do Site  
Apresentação Consultoria
 
Missão & Valores Sistemas de Redes
Parceiros Licenciamento
Contactos Formação
 
 

A Menshen, Consultoria, Formação e Sistemas de Redes, lda., iniciou a sua actividade em 2002, disponibilizando serviços na área das tecnologias de informação, nomeadamente consultoria e auditoria, formação, licenciamento de software, implementação, gestão e suporte de sistemas de redes baseados em soluções Microsoft®.

Credenciados pela Microsoft®, e em colaboração com outras empresas de valor reconhecido a nível nacional e internacional, comprometemo-nos a prestar não apenas um serviço mas, também, em desenvolver uma relação de parceria com os nossos clientes.   

Licenciamos Software, desde soluções para pequenas empresas até acordos empresariais ou governamentais.

A gestão de sistemas informáticos é uma tarefa dispendiosa para as empresas. A Menshen, através de uma equipa experiente e certificada, presta um conjunto de serviços de valor acrescentado, no apoio ao desenvolvimento de novas soluções e na implementação de metodologias, libertando as empresas para a gestão dos seus negócios...

© Copyright, Design & Produção: MENSHEN 2007. Todos os direitos reservados!
Notícias  

MENSHEN e MICROSOFT
.
As mais recentes certificações alcançadas pela Menshen junto da Microsoft
.
Caros clientes: Gostariamos de vos actualizar sobre as mais recentes certificações alcançadas pela Menshen junto da Microsoft. Com as certificações abaixo, a Menshen, é membro integrante de um grupo restrito de empresas com competências reconhecidas pela Microsoft como estando habilitadas a prestar os mais elevados níveis de serviço com base nas suas plataformas tecnológicas. Complementarmente, este nível de certificação reconhece igualmente, a existência de profissionais qualificados dentro da estrutura da empresa, bem como, a experiência comprovada na área do Licenciamento.
<leia mais>...



Antivirus Giants Are Vulnerable
.
The most popular antivirus applications on the market are rendered useless by around 80 percent of new malware, according to AusCERT.
.
At a security breakfast hosted by e-mail security firm Messagelabs in Sydney on Wednesday, the general manager of the Australian Computer Emergency Response Team (AusCERT), Graham Ingram, told the audience that popular desktop antivirus applications "don't work".
<leia mais>...



 

 

 
 
 
 
<% News_PT.Close() Set News_PT = Nothing %>