Categoria Dicas ASP - Criando uma simples rotina de erro

Posted by webmaster | ASP |

Esta página demonstra uma rotina básica para tentar interpretar alguns erros que podem ser de script ou de banco de dados. Aconselhamos sempre usar esse tipo de rotina em todos os arquivos ASP que fazem acesso a Banco de Dados.
<% on error resume next

Set Conn = Server.CreateObject(”ADODB.Connection”)

SQLstmt = “…”
Set RS = Conn.Execute(SQLStmt)
If err.number>0 then%>
Ocorreram Erros no Script:<P>
Número do erro=<%=err.number%><P>
Decrição do erro=<%=err.description%><P>
Help Context=<%=err.helpcontext%><P>”
Help Path=<%=err.helppath%><P>
Native Error=<%=err.nativeerror%><P>
Source=<%=err.source%><P>
SQLState=<%=err.sqlstate%><P>
<%else%>
Nenhum problema aconteceu!<p>
<%end if
IF conn.errors.count> 0 then%>
Ocorreram erros com o Database<P><%=SQLstmt%><P>
<%for counter= 0 to conn.errors.count%>
Erro #<%=conn.errors(counter).number%><P>
Descrição -><%=conn.errors(counter).description%><p>
<%next
else%>
Nenhum erro com o Database
<%end if
Conn.Close%>

Tags:

Categoria Dicas ASP - Um pouco sobre ASP

Posted by webmaster | ASP |

ASP é uma tecnologia de programação para Internet que possibilita a criação de páginas dinâmicas.

   O código ASP é interpretado e executado no servidor quando solicitado pelo cliente, sendo que este último recebe apenas o conteúdo HTML. Então, quando aplicações ASP são escritas usando apenas a tecnologia ASP e a linguagem HTML, todos os browser existentes no mercado podem acessar suas páginas.

   Como padrão a tecnologia ASP permite a programação em VBScript (Visual Basic Script Language) e JScript (Versão do JavaScript), mas existem plug-ins ActiveX para dar suporte para outras linguagens como PERL.

   Páginas ASP são capazes de guardar estados, que são mantidos durante toda uma sessão. Assim, dados fornecidos por um usuário podem ser visíveis a outras páginas ASP.

   Qualquer banco de dados compatível com ODBC (Open Data Base Connectivity), pode ser manipulado por aplicações ASP (ex: Access, SQL Server, Oracle, Sybase, Informix, DB2, …). Desta forma, aplicativos para manipular Banco de Dados podem ser desenvolvidos, proporcionando grande funcionalidade para sites na Web.

   Como esta tecnologia é parte integrante do IIS (Internet Information Server), que tem sua segurança integrada com o Windows NT Server, é fácil restringir o acesso a páginas ASP usando os esquemas de autenticação do IIS (senha básica na Web, senha no NT ou certificados de cliente). Também é possível dar segurança aos dados transmitidos usando SSL.

Tags: ,

Categoria Dicas ASP - Remova Acentos

Posted by webmaster | ASP |

Em pesquisa a Internet, encontrei este código, que creio ser bastante útil para você programador ASP.

Opções para utilização deste código:

Função TirarAcento : Troca as letras com acento para letras sem acento;
Função TrocaAcento : Troca as letras com acento para “_” (underline), sendo útil em consultas a Banco de Dados.

<%

Function TirarAcento(Palavra)
CAcento = “àáâãäèéêëìíîïòóôõöùúûüÀÁÂÃÄÈÉÊËÌÍÎÒÓÔÕÖÙÚÛÜçÇñÑ”
SAcento = “aaaaaeeeeiiiiooooouuuuAAAAAEEEEIIIOOOOOUUUUcCnN”
Texto = “”
If Palavra <> “” then
For X = 1 To Len(Palavra)
Letra = Mid(Palavra,X,1)
Pos_Acento = InStr(CAcento,Letra)
If Pos_Acento > 0 Then Letra = mid(SAcento,Pos_Acento,1)
Texto = Texto & Letra
Next
TirarAcento = Texto
End If
End Function
Function TrocarAcento(Palavra)
CAcento = “àáâãäèéêëìíîïòóôõöùúûüÀÁÂÃÄÈÉÊËÌÍÎÒÓÔÕÖÙÚÛÜçÇñÑ”
Texto = “”
If Palavra <> “” Then
For X = 1 to Len(Palavra)
Letra = Mid(Palavra,X,1)
Pos_Acento = InStr(CAcento,Letra)
If Pos_Acento > 0 Then Letra = “_”
Texto = Texto & Letra
Next
TrocarAcento = Texto
End If
End Function

%>

Para chamar a função utilize TirarAcento(”[STRING]“) ou TrocarAcento(”[STRING]“)

<% Response.Write(TirarAcento(”EXEMPLO”)) %>

Tags:
Page 2 of 6«12345»...Último