descricao de erros

razs · Dezembro 6, 2012

Boas pessoal, estou a tentar fazer um script de erro que me identifique os erros e envie por email e escreva num txt.

Isto funciona bem com excepcao da identificação dos erros. Alguem sabe porque?

<%On Error Resume Next

a=1/0  '---> ERRO!!!

if Err<>0 then
call checaerro
end if	





sub checaerro

dim objErr,msgerros,strCode
set objErr=Server.GetLastError

Thispage = "http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("URL")&"?"&Request.Querystring&Request.Form




	strRemoteAddr = Request.ServerVariables("REMOTE_ADDR")
       strRemoteHost = Request.ServerVariables("REMOTE_HOST")
       strLocalAddr = Request.ServerVariables("LOCAL_ADDR")
strbrowser = Server.HTMLEncode(Request.ServerVariables("HTTP_USER_AGENT"))


msgerros=" ASPCode= " & objErr.ASPCode&"<br>"
msgerros=msgerros+" ASPDescription= " & objErr.ASPDescription&"<br>"
msgerros=msgerros+" Category= " & objErr.Category&"<br>"
msgerros=msgerros+" Column= " & objErr.Column&"<br>"
msgerros=msgerros+" Description= " & Err.Description&"<br>"
msgerros=msgerros+" File= " & objErr.File&"<br>"
msgerros=msgerros+" Line= " & objErr.line&"<br>"
msgerros=msgerros+" Browser= "&strbrowser&"<br>"
msgerros=msgerros+" Number= " & Err.Number&"<br>"
msgerros=msgerros+" Remote Address= " & strRemoteAddr&"<br>"
msgerros=msgerros+" Remote Host= " & strRemoteHost&"<br>"
msgerros=msgerros+" Local Address= " & strLocalAddr&"<br><br><br><br><br>"


session("msgerros")="<br>URL: "&Thispage&"<br><br>"&msgerros

response.write session("msgerros")


end sub

berkowitz · Dezembro 6, 2012

É só tirar o "On Error Resume Next". Com ele declarado você basicamente diz ao ASP para nem ligar pro erro e continuar rodando. =)

razs · Dezembro 6, 2012

Obrigado mas assim nao reencaminhou para o script de erro apenas mostrou no fim da pagina o erro

Microsoft VBScript runtime error '800a000b'

Division by zero

/oct/4testing/index.asp, line 1030

xanburzum · Dezembro 6, 2012

olha este exemplo vê se ajuda:

<%@ Language=VBScript %>

<%Response.Buffer = True%>

<html>

<head><title>ASP 3.0 Error </title></head>

<% 'adovbs.inc %>

<!-- #include file = ./adovbs.inc -->

<body>

<%

On Error Resume Next



  set objError = Server.getLastError()

  strNumber = objError.AspCode

  strSource = objError.Category

  strPage = objError.File

  strDesc = objError.Description

  strCode = Server.HTMLEncode(objError.Source)

  If strCode = "" then strCode = "No code available"

  strLine = ObjError.Line

  strASPDesc = ObjError.ASPDescription





  strRemoteAddr = Request.ServerVariables("REMOTE_ADDR")

  strRemoteHost = Request.ServerVariables("REMOTE_HOST")

  strLocalAddr = Request.ServerVariables("LOCAL_ADDR")





  set rs = Server.CreateObject("ADODB.Recordset")

  set Conn = Server.CreateObject("ADODB.Connection")





  conn.ConnectionString = "Provider=SQLOLEDB.1;User id=;Password=;Initial Catalog=;Data Source=;"

  conn.open

  rs.Open "tblErrorDemo", conn, adOpenDynamic, adLockOptimistic, adCmdTable



  'Add Record

  rs.AddNew

   'The datetime is set on the backend as a default value.

   rs("er_number") = strNumber

   rs("er_source") = strSource

   rs("er_page") = strPage

   rs("er_desc") = strDesc + ". " + strASPDesc

   rs("er_code") = strCode

   rs("er_line") = strLine

   rs("er_remote_addr") = strRemoteAddr

   rs("er_remote_host") = strRemotehost

   rs("er_local_addr") = strLocalAddr

  rs.Update



  %>

  <table width="50%" align="center" cellspacing="0" cellpadding="0" border="1">

   <tr>

     <td width="200">Error Number:</td><td><%=strNumber%></td></tr>

   <tr>

     <td width="200">Source:</td><td><%=strSource%></td></tr>

   <tr>

     <td width="200">File:</td><td><%=strPage%></td></tr>

   <tr valign="top">

     <td width="200">Description:</td><td><%=strDesc + ". " + strASPDesc%></td></tr>

   <tr>

     <td width="200">Code:</td><td><%=strcode%></td></tr>

   <tr>

     <td width="200">Line:</td><td><%=strLine%></td></tr>

    <tr>

     <td width="200">Remote Address:</td><td><%=strRemoteAddr%></td></tr>

   <tr>

     <td width="200">Remote Host:</td><td><%=strRemoteHost%></td></tr>

   <tr>

     <td width="200">Local Address:</td><td><%=strLocalAddr%></td></tr>

  </table>

  <br>

  <b>Coloquei um link em cada código de erro que dá a equipe de desenvolvimento mais informações e instruções para cada tipo de erro.</b>

  <br>

  <br>

  <table width="100%" align="center" cellspacing="0" cellpadding="0" border="1">

   <tr bgcolor=#ffff00>

     <td align="center">Error Code</td><td align="center">Error Message</td><td align="center">Extended Information</td></tr>

   <tr>

     <td>ASP 0100</td><td>Out of memory</td><td>Unabled to allocate the required memory.</td></tr>

   <tr>

     <td>ASP 0101</td><td>Unexpected error</td><td>The function return exception_name.</td></tr>

   <tr>

     <td>ASP 0102</td><td>Expecting string input</td><td>None</td></tr>

   <tr>

     <td>ASP 0103</td><td>Expecting numeric input</td><td>None</td></tr>

   <tr>

     <td>ASP 0104</td><td>Operation not allowed</td><td>None</td></tr>

   <tr>

     <td>ASP 0105</td><td>Index out of range</td><td>An array index is out of range.</td></tr>

   <tr>

     <td>ASP 0106</td><td>Type Mismatch</td><td>A data type was encountered that cannot be handled.</td></tr>

   <tr>

     <td>ASP 0107</td><td>Stack Overflow</td><td>The quantity of data being processed is above the permitted limit.</td></tr>

   <tr>

     <td>ASP 0115</td><td>Unexpected Error</td><td>A trapple error occured in an external object.  The script cannot continue running.</td></tr>

   <tr>

     <td>ASP 0177</td><td>Server.CreateObject Failed</td><td>Invalid ProgId</td></tr>

  <tr>

     <td>ASP 0190</td><td>Unexpected error</td><td>A trapple error occurred while releasing an external object.</td></tr>

   <tr>

     <td>ASP 0191</td><td>Unexpected error</td><td>A trapple error occurred in the OnStartPage method of an external object.</td></tr>

   <tr>

     <td>ASP 0192</td><td>Unexpected error</td><td>A trapple error occurred in the OnEndPage method of an external object.</td></tr>

   <tr>

     <td>ASP 0193</td><td>OnStartPage Failed</td><td>An error occurred in the OnStartPage method of an external object.</td></tr>

   <tr>

     <td>ASP 0194</td><td>OnEndPage</td><td>An error occurred in the OnEndPage method of an external object.</td></tr>

   <tr>

     <td>ASP 0240</td><td>Script Engine Exception</td><td>A script engine threw exception.</td></tr>

   <tr>

     <td>ASP 0241</td><td>CreateObject Exception</td><td>The CreateObject caused an exception.</td></tr>

   <tr>

     <td>ASP 0242</td><td>Query OnStartPage Interface Exception</td><td>The querying object OnStartPage caused an exception.</td></tr>

  </table>   

</body>

</html>

<%    set rs = nothing

  set conn = nothing

  set objError = nothing

  Response.Write Err.description

  Response.End

%>

Agora vamos causar alguns erros. Carregue o arquivo error_demo.asp, ele deve causar um erro em um flash! Você vai então receber uma tela de erro bem formatado e muito detalhado.

<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%
bDebug = False
strProgrammer = "X@nBuRzUm"
set obj = Server.CreateObject("teste") %>
</BODY>
</HTML>

razs · Dezembro 7, 2012

Obrigado xan, mas nao mostra nada :s

continua a nao mostrar nada.

Sera que preciso configurar alguma coisa no servidor?

Vou postar o meu codigo todo, alguem pode testar para ver se o problema é do script ou do meu servidor?

erro.asp


<%
sub checaerro

Select Case Err.Number

Case 3

 msgerro= " Return sem GoSub"

Case 5

 msgerro= "Chamada de Procedimento Inválida"

Case 6

 msgerro= "Sobrecarga"

Case 7

 msgerro= "Sem Memória"

Case 9

 msgerro= "SubScript fora de área"

Case 10

 msgerro= "Este Array está fixo ou temporariamente travado"

Case 11

 msgerro= "Divisão Por Zero"

Case 13

 msgerro= "Tipos Incompatíveis"

Case 14

 msgerro= "Fora de Espaço de String"

Case 16

 msgerro= "Expressão muito Complexa"

Case 17

 msgerro= "Não pode recuperar a operação"

Case 18

 msgerro= "Interrupção do usuário ocorrida"

Case 20

 msgerro= "Resume Without Error"

Case 28

 msgerro= "Fora de Espaço de Pilha"

Case 35

 msgerro= "Sub ou Function não Definida"

Case 47

 msgerro= "Muitas DLL na aplicação cliente"

Case 48

 msgerro= "Erro carregando DLL"

Case 49

 msgerro= "DLL com problemas de chamada"

Case 51

 msgerro= "Erro Interno"

Case 52

 msgerro= "Nome ou número do arquivo errado"

Case 53

 msgerro= "Arquivo não Encontrado"

Case 54

 msgerro= "Modo de arquivo errado"

Case 55

 msgerro= "Arquivo já está Aberto"

Case 57

 msgerro= "Device I/O Error"

Case 58

 msgerro= "Arquivo jé existente"

Case 59

 msgerro= "Tamanho do registro errado"

Case 61

 msgerro= "Disco Cheio"

Case 62

 msgerro= "Entrada passa do final do arquivo"

Case 63

 msgerro= "Número de registros errados"

Case 67

 msgerro= "Muitos arquivos"

Case 68

 msgerro= "Ferramenta não disponível"

Case 70

 msgerro= "Permissão Negada"

Case 71

 msgerro= "Disco não Preparado"

Case 74

 msgerro= "Não posso renomear com discos diferentes"

Case 75

 msgerro= "Caminho/Arquivos Erro de acesso"

Case 76

 msgerro= "Caminho não encontrado"

Case 91

 msgerro= "Variável de objeto não definida"

Case 92

 msgerro= "Loop For não foi inicializado"

Case 94

 msgerro= "Uso inválido de Null"

Case 322

 msgerro= "Não posso criar Arquivos temporários nescessários"

Case 325

 msgerro= "Formato inválido no arquivo"

Case 380

 msgerro= "Valor da propriedade inválida"

Case 400

 msgerro= "ERRO HTTP 1.1 --- pedido ruim"

Case 401.1

 msgerro= "ERRO HTTP 1.1 --- não autorizado: falha no logon"

Case 401.2

 msgerro= "ERRO HTTP 1.1 --- não autorizado: falha no logon devido a configuração do servidor"

Case 401.3

 msgerro= "ERRO HTTP 1.1 --- não autorizado: não autorizado devido a ACL no recurso"

Case 401.4

 msgerro= "ERRO HTTP 1.1 --- não autorizado: falha na autorização pelo filtro"

Case 401.5

 msgerro= "ERRO HTTP 1.1 --- não autorizado: falha na autorização por ISAPI/CGI App"

Case 403.1

 msgerro= "ERRO HTTP 1.1 --- proibido: acesso a execução proibido"

Case 403.2

 msgerro= "ERRO HTTP 1.1 --- proibido: acesso de leitura proibido"

Case 403.3

 msgerro= "ERRO HTTP 1.1 --- proibido: acesso de escrever proibido"

Case 403.4

 msgerro= "ERRO HTTP 1.1 --- proibido: requer SSL"

Case 403.5

 msgerro= "ERRO HTTP 1.1 --- proibido: requer SSL 128"

Case 403.6

 msgerro= "ERRO HTTP 1.1 --- proibido: endereço de IP rejeitado"

Case 403.7

 msgerro= "ERRO HTTP 1.1 --- proibido: requer certificação do cliente"

Case 403.8

 msgerro= "ERRO HTTP 1.1 --- proibido: acesso ao site negado"

Case 403.9

 msgerro= "ERRO HTTP 1.1 --- acesso proibido: Muitos usuários estão conectados"

Case 403.10

 msgerro= "ERRO HTTP 1.1 --- acesso proibido: configuração inválida"

Case 403.11

 msgerro= "ERRO HTTP 1.1 --- acesso proibido: senha alterada"

Case 403.12

 msgerro= "ERRO HTTP 1.1 --- acesso proibido: negado acesso ao mapa"

Case 404

 msgerro= "ERRO HTTP 1.1 --- não encontrado"

Case 405

 msgerro= "ERRO HTTP 1.1 --- método não permitido"

Case 406

 msgerro= "ERRO HTTP 1.1 --- não aceitável"

Case 407

 msgerro= "ERRO HTTP 1.1 --- requer autenticação do Proxy"

Case 412

 msgerro= "ERRO HTTP 1.1 --- falha em pré condições"

Case 414

 msgerro= "ERRO HTTP 1.1 --- pedido - URI muito grande"

Case 423

 msgerro= "Propriedade ou metodo não encontrado"

Case 424

 msgerro= "Objeto Requerido"

Case 429

 msgerro= "OLE Automation não pode ser criado no servidor"

Case 430

 msgerro= "Classe não suportada pelo OLE Automation"

Case 432

 msgerro= "Nome do arquivo ou de classe nõ encontrado durante a operação OLE Automation"

Case 438

 msgerro= "Objeto não suporta esta propriedade ou método"

Case 440

 msgerro= "Erro na OLE Automation"

Case 442

 msgerro= "Connection to type library or object library for remote process has been lost. Press OK for dialog to remove reference"

Case 443

 msgerro= "Objeto OLE Automation não contém um valor padrão"

Case 445

 msgerro= "Objeto não suporta esta ação"

Case 446

 msgerro= "Objeto não suporta o nome do argumento"

Case 447

 msgerro= "Objeto não suporta a definição do local atual"

Case 448

 msgerro= "Nome de argumentos não encontrados"

Case 449

 msgerro= "Este argumento não é opcional"

Case 450

 msgerro= "Número de argumentos errado ou definição de propriedade inválida"

Case 451

 msgerro= "Objeto não é uma coleção"

Case 452

 msgerro= "Número ordinal inválido"

Case 453

 msgerro= "Função DLL especificada não foi encontrada"

Case 454

 msgerro= "código de origem não encontrado"

Case 455

 msgerro= "Erro de trava no código"

Case 457

 msgerro= "Esta chave já está associada a um elemento desta coleção"

Case 458

 msgerro= "Tipos de variáveis usadas na OLE Automation não são suportadas pelo Visual Basic"

Case 462

 msgerro= "A máquina do servidor remoto não existe ou não está disponível"

Case 481

 msgerro= "Figura Inválida"

Case 500

 msgerro= "Variável não definida"

Case 501

 msgerro= "Variável não pode ser atribuída"

Case 502

 msgerro= "Objeto não é seguro para script"

Case 503

 msgerro= "Objeto não é seguro para inicialização"

Case 504

 msgerro= "Objeto não é seguro para criação"

Case 505

 msgerro= "Referência inválida ou não qualificada"

Case 506

 msgerro= "Classe não definida"

Case 1001

 msgerro= "Sem memória"

Case 1002

 msgerro= "Erro de Sintaxe"

Case 1003

 msgerro= "Esperado ':'"

Case 1004

 msgerro= "Esperado ';'"

Case 1005

 msgerro= "Esperado '('"

Case 1006

 msgerro= "Esperado ')'"

Case 1007

 msgerro= "Esperado ']'"

Case 1008

 msgerro= "Esperado '{'"

Case 1009

 msgerro= "Esperado '}'"

Case 1010

 msgerro= "Esperado Identificador"

Case 1011

 msgerro= "Esperado '='"

Case 1012

 msgerro= "Esperado 'If'"

Case 1013

 msgerro= "Esperado 'To'"

Case 1014

 msgerro= "Esperado 'End'"

Case 1015

 msgerro= "Esperado 'Function'"

Case 1016

 msgerro= "Esperado 'Sub'"

Case 1017

 msgerro= "Esperado 'Then'"

Case 1018

 msgerro= "Esperado 'Wend'"

Case 1019

 msgerro= "Esperado 'Loop'"

Case 1020

 msgerro= "Esperado 'Next'"

Case 1021

 msgerro= "Esperado 'Case'"

Case 1022

 msgerro= "Esperado 'Select'"

Case 1023

 msgerro= "Esperado expressão"

Case 1024

 msgerro= "Esperado declaração"

Case 1025

 msgerro= "Esperado final da declaração"

Case 1026

 msgerro= "Esperado inteiro constante"

Case 1027

 msgerro= "Esperado 'While' , 'Until'"

Case 1028

 msgerro= "Esperado 'While' , 'Until' ou final de declaração"

Case 1029

 msgerro= "Esperado 'With'"

Case 1030

 msgerro= "Identificador Muito Longo"

Case 1031

 msgerro= "Número Inválido"

Case 1032

 msgerro= "Caracter Inválido"

Case 1033

 msgerro= "Constante de String não Terminada"

Case 1034

 msgerro= "Comentário não Terminado"

Case 1035

 msgerro= "Nested Comment"

Case 1036

 msgerro= "'Me' não pode ser usado como saída de rotina"

Case 1037

 msgerro= "Uso Inválido da Palavra Chave 'Me'"

Case 1038

 msgerro= "'Loop' sem 'Do'"

Case 1039

 msgerro= "Declaração 'Exit' Inválida"

Case 1040

 msgerro= "Variável de Controle de Loop 'for' Inválida"

Case 1041

 msgerro= "Variável Redefinida"

Case 1042

 msgerro= "Tem que ser a primeira declaração da linha"

Case 1043

 msgerro= "Não pode atribuir non-By Val para um argumento"

Case 1044

 msgerro= "Não pode usar parêntesis para chamar uma sub"

Case 1045

 msgerro= "Esperada Constante Literal"

Case 1046

 msgerro= "Esperado 'In'"

Case 1047

 msgerro= "Esperado 'Class'"

Case 1048

 msgerro= "Tem que ser definido dentro de uma Classe"

Case 1049

 msgerro= "Esperado Let ou Set ou Get na declaração de propriedade"

Case 1050

 msgerro= "Esperado 'Property'"

Case 1051

 msgerro= "Número de argumentos tem que ser consistente em especificações de propriedades"

Case 1052

 msgerro= "Não pode haver método/ propriedade padrão múltiplo em uma Classe"

Case 1053

 msgerro= "Class initialize ou terminate não tem argumentos"

Case 1054

 msgerro= "Propriedade Set ou Let tem que ter pelo menos um argumento"

Case 1055

 msgerro= "'Next' inesperado"

Case 1056

 msgerro= "'Default' pode ser especificado somente em 'Property' ou 'Function' ou 'Sub'"

Case 1057

 msgerro= "Especificação 'Default' precisa especificar também 'Public'"

Case 1058

 msgerro= "Especificação 'Default' só pode estar em Property Get"



Case 3000

 msgerro= "O provedor não concluiu a ação pedida"

Case 3001

 msgerro= "A aplicação está usando argumentos do tipo errado, estão fora do âmbito aceitável ou em conflito com alguma outra aplicação"

Case 3002

 msgerro= "Ocorreu um erro durante a abertura do arquivo pedido"

Case 3003

 msgerro= "Erro na leitura do arquivo especificado"

Case 3004

 msgerro= "Erro ao escrever no arquivo"

Case 3021

 msgerro= "BOF ou EOF é True ou o registro atual foi deletado. A operação pedido pela aplicação requer um registro atual"

Case 3219

 msgerro= "A operação pedida pela aplicação não é permitida neste contexto"

Case 3246

 msgerro= "A aplicação não pode fechar explicitamente um objeto connection no meio de uma transação"

Case 3251

 msgerro= "O provedor não oferece suporte a operação pedida pela aplicação"

Case 3265

 msgerro= "ADO não pode achar o objeto na coleção"

Case 3367

 msgerro= "Não é anexar, objeto já está na coleção"

Case 3420

 msgerro= "O objeto referenciado pela aplicação não aponta mais para um objeto válido"

Case 3421

 msgerro= "A aplicação está usando um valor do tipo errado para a aplicação atual"

Case 3704

 msgerro= "A operação pedida pela aplicação não é permitida se o objeto estiver fechado"

Case 3705

 msgerro= "A operação pedida pela aplicação não é permitida se o objeto estiver aberto"

Case 3706

 msgerro= "ADO não pode achar o provedor especificado"

Case 3707

 msgerro= "A aplicação não pode alterar a propriedade ActiveConnect de um objeto Recordset com um objeto Command como fonte"

Case 3708

 msgerro= "A aplicação definiu de modo impróprio um objeto Parameter"

Case 3709

 msgerro= "A aplicação pediu uma operação em um objeto com uma referência a um objeto Connection inválido ou fechado"

Case 3710

 msgerro= "A operação não é reentrante"

Case 3711

 msgerro= "A operação ainda está executando"

Case 3712

 msgerro= "Operação cancelada"

Case 3713

 msgerro= "A operação ainda está conectando"

Case 3714

 msgerro= "A transação é inválida"

Case 3715

 msgerro= "A operação não está sendo executada"

Case 3716

 msgerro= "A operação não é segura sob estas circunstâncias"

Case 3717

 msgerro= "A operação fez com que aparecesse uma caixa de diálogo"

Case 3718

 msgerro= "A operação fez com que aparecesse um cabeçalho de caixa de diálogo"

Case 3719

 msgerro= "A ação falhou devido a uma violação na integridade dos dados"

Case 3720

 msgerro= "O provedor não pode ser modificado"

Case 3721

 msgerro= "Dados longos demais para o tipo de dados apresentados"

Case 3722

 msgerro= "Ação causou uma violação do esquema"

Case 3723

 msgerro= "A expressão continha sinais não coincidentes"

Case 3724

 msgerro= "O valor não pode ser convertido"

Case 3725

 msgerro= "O recurso não pode ser criado"

Case 3726

 msgerro= "A coluna especificada não existe nesta fileira"

Case 3727

 msgerro= "O URL não existe"

Case 3728

 msgerro= "Você não tem permissão para ver a árvore do diretório"

Case 3729

 msgerro= "O URL apresentado é inválido"

Case 3730

 msgerro= "Recurso travado"

Case 3731

 msgerro= "Recurso já existente"

Case 3732

 msgerro= "A ação não pode ser concluída"

Case 3733

 msgerro= "O volume de arquivo não foi encontrado"

Case 3734

 msgerro= "Falha na operação porque o servidor não pode obter espaço suficiente para completar a operação"

Case 3735

 msgerro= "Recurso fora de âmbito"

Case 3736

 msgerro= "Comando não está disponível"

Case 3737

 msgerro= "O URL na fileira identificada não existe"

Case 3738

 msgerro= "O recurso não pode ser deletado porque está fora do escopo permitido"

Case 3739

 msgerro= "Esta propriedade é inválida para a coluna selecionada"

Case 3740

 msgerro= "Você apresentou uma opção inválida para esta propriedade"

Case 3741

 msgerro= "Você apresentou um valor inválido para esta propriedade"

Case 3742

 msgerro= "A definição desta propriedade causou um conflito com outras propriedades"

Case 3743

 msgerro= "Nem todas as propriedades podem ser definidas"

Case 3744

 msgerro= "A propriedade não foi definida"

Case 3745

 msgerro= "A propriedade não pode ser definida"

Case 3746

 msgerro= "A propriedade não tem suporte"

Case 3747

 msgerro= "A ação não pode ser concluída porque o catálogo não está definido"

Case 3748

 msgerro= "A conexão não pode ser alterada"

Case 3749

 msgerro= "O método Update da coleção Fields falhou"

Case 3750

 msgerro= "Não é possível definir permissão Deny porque o provedor não oferece suporte para tanto"

Case 3751

 msgerro= "o provedor não oferece suporte ao tipo de pedido Deny"

End Select


Thispage = "http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("URL")&"?"&Request.Querystring&Request.Form

dim objErr,msgerros,strbrowser

set objErr=Server.GetLastError

		strRemoteAddr = Request.ServerVariables("REMOTE_ADDR")
		strRemoteHost = Request.ServerVariables("REMOTE_HOST")
		strLocalAddr = Request.ServerVariables("LOCAL_ADDR")
		strbrowser = Server.HTMLEncode(Request.ServerVariables("HTTP_USER_AGENT"))

		strCode = Server.HTMLEncode(objError.Source)
		If strCode = "" then strCode = "No code available"	end if



	msgerros=" ASPCode= " & objErr.ASPCode &"<br>"
	msgerros=msgerros+" ASPDescription= " & objErr.ASPDescription &"<br>"
	msgerros=msgerros+" Category= " & objErr.Category &"<br>"
	msgerros=msgerros+" Column= " & objErr.Column &"<br>"
	msgerros=msgerros+" Description= " & Err.Description &"<br>"
	msgerros=msgerros+" File= " & objErr.File &"<br>"
	msgerros=msgerros+" Line= " & objErr.line &"<br>"
	msgerros=msgerros+" Browser= "& strbrowser &"<br>"
	msgerros=msgerros+" Number= " & Err.Number &"<br>"
	msgerros=msgerros+" Code= " & strCode &"<br>"
	msgerros=msgerros+" Remote Address= " & strRemoteAddr &"<br>"
	msgerros=msgerros+" Remote Host= " & strRemoteHost &"<br>"
	msgerros=msgerros+" Local Address= " & strLocalAddr &"<br><br><br><br><br>"

session("msgerros")="Error: "&msgerro&".<br><br>URL: "&Thispage&"<br><br>"&msgerros
session("thiserror")=Thispage
response.write session("msgerros")

'response.redirect "email.asp?actnow=gonow&var=erro"
End Sub

%>

Pagina de erro


<%On Error Resume Next%>
<!--#include file="erro.asp"-->
<%

a=1/0 'script funciona mas nao mostra os dados-


Response.Write && erro ' script nao funciona mostra erros em pagina standard do iis e nao corre o script.


if Err>0 then
call checaerro
end if
%>

xanburzum · Dezembro 7, 2012

estranho uso esse code que te passei

razs · Dezembro 7, 2012

Consegues usar o que postei para ver se funciona contigo?

Podera ser da configuração do servidor?

xanburzum · Dezembro 7, 2012

vou testar aqui

razs · Dezembro 10, 2012

Obrigado Xan, chegas-te a experimentar?

xanburzum · Dezembro 10, 2012

não tive tempo, rodo ele hoje a noite e ja posto em seguinda...

razs · Dezembro 11, 2012

Obrigado.

xanburzum · Dezembro 11, 2012

você testou ele no localhost ?

razs · Dezembro 11, 2012

sim, nao percebo porque nao mostra a informacao

razs · Dezembro 14, 2012

Viva Xan, numca mais disseste nada, eu testei no localhost e noutro pc por isso o problema nao sera dai.

Achas que convertendo para .net faz diferenca?

Obrigado

xanburzum · Dezembro 15, 2012

estranho pois uso o code que passei e funfa normal

razs · Dezembro 17, 2012

pois... sera que tenho de fazer alguma coisa na configuracao do iis?

xanburzum · Dezembro 17, 2012

veja se o IIS não esta ele mesmo tratando o error com uma page 404

razs · Dezembro 17, 2012

nao eu tenho um redirect para uma pagina minha

xanburzum · Dezembro 17, 2012

nesse caso as config. aparentemente estão normais.

razs · Dezembro 18, 2012

eu tenho aquilo a mostrar os erros apenas no lado do servidor. mas mesmo no lado do servidor nao aparece.

Arquivado

descricao de erros

Recommended Posts

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

berkowitz 2

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

razs 0