Ler dados com o ADO.net

Neste simples exemplo, mostrarei como fazer, para substituir o ADO tradicional, pelo ADO.net para retornar os dados de uma base de dados, usando VB.net.

obs: uso a leitura e inserção dos dados num listbox, no evento load da página

Imports System.Data
' declaração de chamada necessária, para usar ado.net

Sub Page_Load  ' evento load (carregamento) da página
Dim conn as New System.DATA.OledbConnection(SUA STRING DE CONEXÃO AQUI)
Dim SQL as string = "SELECT * FROM tabela"
Dim comando as new OleDBCommand(SQL, conn)
conn.open

Dim leitor as OLEDbDataReader
Leitor = Command.ExecuteReader
' no .net não há o Set

' Abaixo o LOOP num listbox:
While Leitor.READ
List.Items.ADD Leitor.Item("campo")
End While

End sub

Esta matéria foi postada originalmente no ASP4Developers por Oscar Pires (BLADE) (site), que na época era "Desenvolvedor ASP e Visual Basic, desenvolve sites interativos e sistemas para empresas. ". Hoje, vai saber...

HOHOHO!

Hohoho! Feliz Natal!

Como prometido (ok, tardo, mas ardo), eis a nova versão do ASP4Developers, estreiando em seu novo endereço: www.ASP4Developers.com.br . Registrei o domínio e agora podemos ir esquecendo o lance do CJB.NET e seus banners escondidos.

Nesta nova versão do site, tentei remodelar um pouco a parte visual, para algo mais agradável e num formato que eu sempre quis fazer. O site usa alguma coisa de DirectX, CSS2 e foi testado com o IE6. Caso tenha algum problema com a visualização do mesmo, não deixe de notificar-me, ok ?

Muitas mudanças foram efetuadas, além do layout. Algum código incorreto/desatualizado na rotina de autenticação foi consertado; rouba... errr.. digo, implementamos um intercomunicador que não tem nada a ver com o do FatorX;criamos uma forma de comentar os artigos postados e a possibilidade de postar uma foto no formato SVG/SVGZ, que irá no final dos artigos dos autores. Mais profundamente, passamos a utilizar a MSXML4 para o processamento do banco de dados XML, que agora utiliza Schemas para verificar a integridade do banco de dados. Todas estas mudanças, e todas as outras que esqueci de documentar, refletem o amadurecimento do site e dos colaboradores do mesmo.

Gostaria de agradecer, do fundo do coração, à todos aqueles que não importam-se em ceder uma pequena fração de seu tempo para ajudar os iniciantes, iniciantes esses que todos nós já fomos um dia.

Seria arriscado citar todas as pessoas que colaboraram com o lançamento desta nova versão, por corrermos o risco de esquecermos alguém. Mas, assim mesmo, obrigado, Darkness, Al Bundy, Blade, Motoman, etc, etc, etc.

Sem mais delongas, bem vindo! Aproveita a estadia e

UM FELIZ NATAL!

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...

Merry XMas!

Você comeu os legumes, fez sua lição de casa, arrumou seu quarto, tirou boas notas e não bateu no seu irmão mais novo. Conversei com o Papai Noel e ele promoteu algumas surpresas para a noite de Natal. Fique atento!

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...

Connection Pooling com ODBC

Todos sabem o peso que têm as conexões com o banco de dados no tempo de resposta da execução de páginas dinâmicas e mesmos dos softwares cliente/servidor.

Uma solução para este problema é chamado de Connection Pooling. O C.P. é uma pool, um conjunto, de conexões já abertas com o banco de dados, evitando assim que toda nova requisição de conexão com o banco precise ser novamente criada, tomando tempo e recursos da máquina.

O Pool libera uma das conexões abertas para cada requisitante de conexão com o BD, que depois é liberada, mas não fechada.

Portanto, todos os usuários do sistema compartilhariam um pool de conexões em comum, ganhando performance de acesso. O número de conexões do pool pode ser delimitado, variando de acordo com o número de usuários e requisições por tempo.

Para ter mais informações sobre usar o Pool de Conexões implementado pelo ODBC 3.0 visite o link (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnmdac/html/pooling2.asp).

Esta matéria foi postada originalmente no ASP4Developers por Daniel Destro do Carmo (site), que na época era "Analista de Sistemas, Web Developer e Programador Java certificado pela Sun.". Hoje, vai saber...

Mascara para CNPJ 99.999.999-99

Após muita dor de cabeça e muitas tentativas, finalmente a função que formata CGC/CNPJ, aliás, formata muito mais coisa ... hhahaahh é só dar uma olhada q vc entende como funciona.

Por favor preservar os direitos do autor.

================================

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
 <title>Mascara CNPJ</title>
</head>

<body>
<form name=FormCpf>
<INPUT maxlength="14" size=25 name="cpf_cnpj" onkeypress="FormataCPF(document.FormCpf,'cpf_cnpj',11,8,5,2,event);">
</form>
<Script language="javascript">

//***************************
// ismael@admin.com.br
// se mudar, envia para que possamos ver.
// http://meuregistro.zardack.com.br
//***************************

function FormataCPF(pForm,pCampo,pTamMax,pPos1,pPos2,pPosTraco,pTeclaPres){
 var wTecla, wVr, wTam;
 
       // alert(pForm[pCampo].value);
  
 wTecla = pTeclaPres.keyCode;
 wVr = pForm[pCampo].value;
 wVr = wVr.toString().replace( "-", "" );
 wVr = wVr.toString().replace( ".", "" );
 wVr = wVr.toString().replace( ".", "" );
 wVr = wVr.toString().replace( "/", "" );
 wTam = wVr.length ;

 if (wTam < pTamMax && wTecla != 8) {
    wTam = wVr.length + 1 ;
 }

 if (wTecla == 8 ) {
    wTam = wTam - 1 ;
 }
   
 if ( wTecla == 8 || wTecla == 88 || wTecla >= 48 && wTecla <= 57 || wTecla >= 96 && wTecla <= 105 ){
  if ( wTam <= 2 ){
    pForm[pCampo].value = wVr ;
  }
  if (wTam > pPosTraco && wTam <= pTamMax) {
        wVr = wVr.substr(0, wTam - pPosTraco) + '-' + wVr.substr(wTam - pPosTraco, wTam);
  }
  if ( wTam == pTamMax){
        wVr = wVr.substr( 0, wTam - pPos1 ) + '.' + wVr.substr(wTam - pPos1, 3) + '.' + wVr.substr(wTam - pPos2, wTam);
  }
  pForm[pCampo].value = wVr;
 
 }

}
</script>
</body>
</html>

Esta matéria foi postada originalmente no ASP4Developers por Ismael Nobre (site), que na época era "Analista.
Quer me contratar ?
Cel. 96420687". Hoje, vai saber...

Evite que suas páginas fiquem no CASH da Máquina

Assim suas páginas não ficaram mas no CASH da sua máquina facilitando as suas atualizações...

<%
Response.addHeader "pragma", "no-cache"
Response.CacheControl = "Private"
Response.Expires = 0
%>

Esta matéria foi postada originalmente no ASP4Developers por Thiago Machado Souza (site), que na época era "Programador Desbravador, buscando quebrar todas as fronteiras além do horizonte da arte de programar !
www.thiagomachado.com.br". Hoje, vai saber...