Test Foro de elhacker.net SMF 2.1

Hola pues necesito que cuando salte el error:

(http://img237.imageshack.us/img237/9337/dibujo18od.png)

Gracias

PD: le di al botón (http://foro.elhacker.net/Themes/default/images/spanish/search.gif) y no aparece nada.

Espero te ayude esto:



Const ERR_ESPERADO = 0

Sub Rutina()
   
   On Local Error Goto Controlar

   ' Codigo

   Exit Sub

Controlar:
   
   If Err.Number = ERR_ESPERADO then
       
         MsgBox "Mensaje personal"
         
         Resume Next
         
   End If

End Sub



Solo ajustas la constante al valor del error esperado.

saludos