Resultat = Shell("C:\BOB\BOBLINK /CIE=01 /USR=AFM /MOD=CUSTOMER /MNF=COMPAN.DB /AUTOCLOSE", vbNormalFocus)