Discussion :

[Thumb down]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim sc As New MSScriptControl.ScriptControl 'C:\Users\..\VbScript\ClsVbScript.vb:ligne 28sc.Language = "VBScript"
sc.AddCode(VbScriptMacro(Macro))
sc.Run("Macro")

ce code fonctionne en Debug mais pas en release! erreur ce trouve sur la déclaration Dim sc As New MSScriptControl.ScriptControl
je suis sur Microsoft Visual Studio Community 2017

Code Fichier de log :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
ClsVbScript - (RunScript) - System.Runtime.InteropServices.COMException (0x80040154): La récupération de la fabrique de classes COM pour le composant avec le CLSID {0E59F1D5-1FBE-11D0-8FF2-00A0D10038BC} a échoué en raison de l'erreur suivante : 80040154 Classe non enregistrée (Exception de HRESULT : 0x80040154 (REGDB_E_CLASSNOTREG)).
   à System.RuntimeTypeHandle.CreateInstance(RuntimeType type, Boolean publicOnly, Boolean noCheck, Boolean& canBeCached, RuntimeMethodHandleInternal& ctor, Boolean& bNeedSecurityCheck)
   à System.RuntimeType.CreateInstanceSlow(Boolean publicOnly, Boolean skipCheckThis, Boolean fillCache, StackCrawlMark& stackMark)
   à System.Activator.CreateInstance(Type type, Boolean nonPublic)
   à System.Activator.CreateInstance(Type type)
   à ClsVbScript.RunScript(String Macro, Act Jbs) dans C:\Users\..\VbScript\ClsVbScript.vb:ligne 28

[Thumb down]

Rebonjour,
je me réponds à moi même!

il fallait cocher la case préférer 32bits dans la fenêtre compilation!

un grand merci pour la séance de psychanalyse!