Identificar procedure do erro

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Identificar procedure do erro

JDBasic

SIMÃO DIAS
SE - BRASIL

Postada em 03/11/2004 12:35 hs

Boa-tarde pessoal, gostaria de saber se é possível capturar o nome da procedure que gerou um determinado erro, ou seja tenho um tratamento de erro onde aparecem:

O número e a descrição do erro, exemplo:

Erro número: 3021

Descrição : Nenhum registro atual!

Procedure :????????????

Obs.: Não é a propriedade source do err, é o nome da função ou sub etc...

Rochª

RIO DE JANEIRO
RJ - BRASIL

Postada em 03/11/2004 13:38 hs

Um jeito de resolver é criar uma variavel global e a cada entrada em uma sub colocar o nome dela nesta variavel. Se ocorrer o erro é so ver o que tem dentro dela.

Assim

Global nome_sub as string

Sub rot1()

nome_sub = "sub1"

blabla.....

end sub

Sub rot2()

nome_sub = "sub2"

blabla.....

end sub

.... na erro

msgbox "Erro na Rotina " & nome_sub