quarta-feira, 27 de agosto de 2003

0

Mostrar apenas uma prévia da Notícia. Semelhante à Agestado

Esta função é apenas para retirar a prévia para por exemplo uma notícia.


PRIVATE CONST TAMANHO = 200


Function Previa(vstrTexto)



Dim strPrevia


if Len(vstrTexto) > TAMANHO Then



strPrevia = Mid(vstrTexto, 1, TAMANHO)


strPrevia = Mid(strPrevia, 1, InStrRev(strPrevia, " ") - 1) & "..."


Else



strPrevia = vstrTexto


End If


Previa = strPrevia


End Function



Esta matéria foi postada originalmente no ASP4Developers por Marcos Felisberto (site), que na época era "Desenvolvedor, com conhecimentos sólidos em ASP, Visual Basic, SQL Server. Iniciante em C# e .Net

MSNmarcos_felis@hotmail.com". Hoje, vai saber...

terça-feira, 26 de agosto de 2003

0

Formatando Hora em tempo real.

<script language="JavaScript">


 


function FormataHora(campo,tammax, teclapres) {


 


numHora = 24;


var tecla = teclapres.keyCode;


vr = document.frm.hora.value;


vr = vr.replace( ":", "" );


 


tam = vr.length ;


 


if (tecla == 8 ) {


 tam = tam - 1 ;


}


 


alert(tam);


if (tam == 2) {


    document.frm.hora.value = vr.substr( 0, 2 ) + ':' +  vr.substr( 2, tam );


}


 


if (vr.substr( 0, 2 ) > 24 ) {


            alert('O limite de horas é 24.');


            document.frm.hora.value = "";


            document.frm.hora.focus();       


}


 


if (vr.substr( 2, 4 ) > 60 ) {


            alert('O limite de minutos é 60.');


            document.frm.hora.value = "";


            document.frm.hora.focus();


}


 


 


}


</script>


 


<body>


<form name="frm">


            <input type="text" name="hora" onKeyUp="FormataHora(this,4,event);" maxlength="5">


            <input type="text" name="aqualque">


</form>



Esta matéria foi postada originalmente no ASP4Developers por Allan Torres (site), que na época era "Analista de sistemas, trabalho com ASP, Oracle, PHP, C, Ferramentas Case e estudo Eng. Elétrica. Sempre as ordens! ]:)". Hoje, vai saber...

0

Evitando que mecanismos de busca cadastrem suas páginas

Mesmo que você não cadastre suas páginas em nenhum site de busca, alguns robôs podem fazer isso automaticamente e incluí-los em seus mecanismos de busca.


Para que, esses "robôs" não incluam seu site, utilizamos o arquivo robots.txt e colocamos ele no diretório raiz do site
http://www.minha-empresa.com.br/robots.txt


Aqui vão alguns exemplos para excluir o site todo ou alguns diretórios


User-agent: *
Disallow: /


usando o exemplo acima, impedimos que todos os robôs ( User-agent: * ) cadastrem o diretório raiz ( Disallow: / ) e todos os seu subdiretórios, ou o site todo.


Agora para impedirmos que os robôs não cadastrem a pasta admin, usamos assim:


User-agent: *
Disallow: /admin/


Para impedir outras pastas, devemos apenas inserir mais linhas Disallow


User-agent: *
Disallow: /admin/
Disallow: /cgi-bin/
Disallow: /images/


Para impedir que, apenas o Google, cadastre o site todo


User-agent: Googlebot
Disallow: /


E por último, para liberar para todos os robôs (sem maldade), deixamos "Disallow" vazio


User-agent: *
Disallow:


Agora se você quiser que apenas algumas páginas não sejam inseridas nos mecanismos de busca, podemos usar meta tags


<META NAME="ROBOTS" CONTENT="NOINDEX">


O problema é que alguns robôs não suportam essa tag.


Depois que você fazer o seu arquivo robots.txt e colocá-lo no diretório raiz de seu site, você pode verificar se ele está funcionando utilizando o site
http://www.searchengineworld.com/cgi-bin/robotcheck.cgi


Nesse site ainda tem alguns outros exemplos de como utilizar o arquivo robots.txt


Espero que seja de grande ajuda


[]'s



Esta matéria foi postada originalmente no ASP4Developers por Rogério César (Craz¥ Man) (site), que na época era "Analista de Sistemas, programador, web Designer.". Hoje, vai saber...

sexta-feira, 22 de agosto de 2003

0

Como desabilitar o botão salvar das imagens - Mais fácil!!!

Utilize os meta tags HTML:



<meta http-equiv="imagetoolbar" content="no">



Esta matéria foi postada originalmente no ASP4Developers por Marcos Felisberto (site), que na época era "Desenvolvedor, com conhecimentos sólidos em ASP, Visual Basic, SQL Server. Iniciante em C# e .Net

MSNmarcos_felis@hotmail.com". Hoje, vai saber...

terça-feira, 19 de agosto de 2003

0

Procurando texto em um select

Estava trabalhando com um banco de dados com muitas empresas e colocava-as em um campo <select>, mas depois para selecioná-las era um trabalhão. Então desenvolvi essa função para facilitar a navegação.


<SCRIPT language='javascript'><!--
function BuscaSelect(campo) {
   var1=campo.value;
   var1=var1.toUpperCase()
   var2=form1.id.length;
   for (i=0;i<var2;i++) {
      aux="form1.id.options["+i+"].text";
      aux2=eval(aux);
      if (aux2.indexOf(var1)==0) {
         form1.id.selectedIndex=i;
         i=var2; } } }
--></SCRIPT>


<!-- Exemplo -->


<form name="form1">
<input type='text' onkeyup="BuscaSelect(this);"><br>
<select class='form' name='id' SIZE='5'>
<option selected value='1'> AÇOUGUE VACA LOUCA
<option value='2'> BAR ANA MARIA
<option value='3'> BAR SAO JORGE
<option value='4'> CASA DE COLCHÕES BEDROCK
<option value='5'> COMERCIAL TRANCOZO
<option value='10'> DELBOUX LINGERIE
<option value='12'> EBOLA PRODUTOS MEDICOS
<option value='15'> FUNERARIA VIAGE FELIZ
<option value='11'> GUIA TURISTICO BAHIA
<option value='52'> HOLTEL NOSSA SENHORA APARECIDA
<option value='6'> INDUSTRIA DE MOVEIS SAO LUCAS
<option value='7'> INDUSTRIA QUIMICA FELIZ
<option value='15'> JAMELI ALVES E CIA LTDA
<option value='53'> KELLY MOTORS
<option value='51'> LAVA RAPIDO DO MIGUEL
<option value='50'> MOTEL GOZO FELIZ
<option value='59'> NATAL LEGAL
<option value='58'> ONG PRODUTOS PARA GARIMPEIROS
<option value='57'> PATO DONALD
<option value='56'> QUEIJO DE FURNAS
<option value='95'> ROBERVAL ESQUADRIAS
<option value='60'> SAPATOS KIKO
<option value='55'> TULIO REBOUÇAS
<option value='85'> UVAS GOIANIA
<option value='66'> VACA LOKA PRODUTOS VETERINARIOS
<option value='77'> XENA PRINCESA DA SELVA
<option value='99'> ZOOLOGICO ARCA DE NOE
</select>


Para testar digite o começo do nome da empresa no campo "text". Caso deseje que o script busque qualquer parte do nome da empresa, basta trocar if (aux2.indexOf(var1)==0) por if (aux2.indexOf(var1)!=-1).


Espero que ajude!



Esta matéria foi postada originalmente no ASP4Developers por Rogério César (Craz¥ Man) (site), que na época era "Analista de Sistemas, programador, web Designer.". Hoje, vai saber...

0

Reconstrução do ASP4Developers

Amigos e visitantes,

gostaria de comunicar-lhes os planos que tenho para o site no futuro próximo, e para pedir-lhe ajuda para conseguir concretizá-los.

Como você já deve saber, há diversas tecnologias emergindo para o desenvolvimento de aplicações para a internet. Estas tecnologias estão mudando nossa forma de desenvolver sistemas, e assim, necessitamos de ferramentas que nos ajudem a explorar o que há de melhor nestas novidades.

    Hoje, o formato e conteúdo do www.asp4developers.com.br está focado no desenvolvimento de aplicações usando o ASP 3.0 e tecnologias relacionadas. Tenho a intenção de ampliar a sua abrangência, tornando-o um centro de referência para o aprendizado de outras tecnologias e assuntos relacionados ao desenvolvimento de sites.

    Para tanto, gostaria de pedir opiniões, sugestões e críticas ao site atual, e outras formas que podemos estar estudando para conseguirmos satisfazer melhor a você e aos demais visitantes. Funcionalidades que estejam faltando, recursos com bugs, nome, design e formato do site estarão sendo cuidadosamente reavaliados. Tenha certeza que mesmo a indicação do menor detalhe que possa ser aperfeiçoado será altamente bem-vinda e benéfica para toda a grande comunidade de desenvolvedores envolvidos.

    Fico no aguardo do seu contato (basta clicar no item "Sugestões" no topo da página). E, desde já, muito obrigado por contribuir para o sucesso do ASP4Developers. Este sucesso também é seu !

Esta matéria foi postada originalmente no ASP4Developers por Rubens N. Farias (site), que na época era "pós-graduado em análise de sistemas orientados a objetos, MCP, MCSD, MCAD, MCSD.NET e consultor em TI, além de idealizador do projeto ASP4Developers. Desenvolve sistemas sob medida, focados na satisfação do usuário, com qualidade e custo realista.". Hoje, vai saber...

segunda-feira, 18 de agosto de 2003

0

Como desabilitar o botão salvar das imagens

Para desabilitar os botões salvar, imprimir, enviar, das imagens no Internet Explorer 6 faça uma chamada da imagem de um map inexistente ou vazio.


<img src="foto.jpg" usemap="#mapvazio"><map name="mapvazio"><area shape="default" nohref></map>



Esta matéria foi postada originalmente no ASP4Developers por Rogério César (Craz¥ Man) (site), que na época era "Analista de Sistemas, programador, web Designer.". Hoje, vai saber...

terça-feira, 12 de agosto de 2003

1

Tratamento de comandos SQL

Sinceramente, eu não gosto muito de utilizar o Objeto ADODB.Command, que faz a mesma coisa, só que de uma melhor maneira.


Mas para aqueles que não são adeptos do objeto command, podem utilizar a função abaixo.


Desenvolvi esta função com o intuito de minimizar o esforço de ficar digitando desta maneira:


sqlCmd = "select * from tb_andre where id= " & request("id") & " and nome like '" & Nome & "'"


Agora fica assim:


sqlCmd = TrataSQL("Select * from tb_andre where id = [request(""id"")] AND nome like '[nome]'")


Ele já vai retornar o comando SQL, pronto para ser executado, ai vai o código:


Public Function TrataSQL(sqlCommand)
sqlCommand = replace(sqlCommand, "[",""" & ")
sqlCommand = replace(sqlCommand,"]"," & """)
sqlCommand = "TrataSQL = """ & sqlCommand & """"
execute( sqlCommand )
End Function



Esta matéria foi postada originalmente no ASP4Developers por André Guergolet (site), que na época era "Desenvolvedor de aplicativos voltados a WEB à 3 anos. Atualmente trabalha com aplicativos de monitoração de redes utilizando .NET e outros recursos.". Hoje, vai saber...

0

Armazenando Connection String de forma segura no Web.Config

Uma dúvida muito comum em empresas, é se existe segurança de guardar a connection String no Web.Config.


Segue alguns links abaixo e mais alguns comentários meus:


Storing Database Connection Strings Securely
http://msdn.microsoft.com/vcsharp/downloads/samples/default.aspx?pull=/library/en-us/dnnetsec/html/secnetch12.asp?frame=true#storingdatabaseconnectionstrings

How To: Store an Encrypted Connection String in the Registry
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnnetsec/html/SecNetHT11.asp

de
Building Secure ASP.NET Applications
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnnetsec/html/secnetlpMSDN.asp


Caso seja um nível de segurança apenas para o usuário, não vejo problemas em
colocar as informações de conexão no Web.Config.
A não ser que descubram um meio de fazer download do Web.Config via browser,
assim como faziamos antigamente no IIS 4 com o Global.asa do servidor
(
http://www.endereco.com.br/global.asa+.htr).

Esse é um risco que devemos correr, mas se o seu SQL Server não permitir
conexões remotas (de fora do domínio/rede interna), não vejo problemas, pois
a dificuldade para se conectar ao seu SQL Server aumenta bastante já que a
pessoa teria que se autenticar em sua rede para utilizá-lo.

Como tudo é feito internamente dentro do servidor, também não seria possível
a monitoração de pacotes.


Caso o seu problema seja também com a segurança interna da empresa, ou seja,
usuários e/ou alguns desenvolvedores não podem ter acesso a essa senha, a
solução é criar um método que criptografe e descriptografe a senha dentro de
uma classe fechada e desenvolvida pelo responsável.

Outra forma, é utilizar um usuário sem permissões de drop, truncate e delete
no banco de dados.

Também poderíamos criar dois ambientes, desenvolvimento e o ambiente de
produção, onde, no ambiente de produção só alguns usuários teriam acesso de
leitura no diretório onde o Web.Config ficaria, e uma ou algumas pessoas
responsáveis teriam acesso a este diretório.



Esta matéria foi postada originalmente no ASP4Developers por André Guergolet (site), que na época era "Desenvolvedor de aplicativos voltados a WEB à 3 anos. Atualmente trabalha com aplicativos de monitoração de redes utilizando .NET e outros recursos.". Hoje, vai saber...