Error invoegen

[eeyk]

Ik maak een programma met VB6.0

Nu is het zo dat als hij een bestand niet vint of niet kan Openen

dat er een Alert staat met : Runtime Error '53'

is er een mannier om Dat te veranderen en er neer te zetten

Error 403 / 404 : bestand kan niet Worden Ge opent of Kan niet worden Ge lezen!


Kan iemand me helpen

 

[That Guy]

Public/Private Function/sub blabla(....) as blabla

on error goto errhandler


[COLOR="SeaGreen"]'(HIER AL JE CODE)[/COLOR]


errhandler:
if err.number = "53"
msgbox "blablabla"
end if

end function/sub

 

[eeyk]

bedankt ik heb wel iets toegevoegd anders werkte het niet

if err.number = "53" then


then was er niet bij