1) DotNet_CreateObject.au3 453 B

1234567891011121314
  1. #include "..\..\Includes\DotNet.au3"
  2. Opt( "MustDeclareVars", 1 )
  3. Example()
  4. Func Example()
  5. Local $oCode = DotNet_LoadVBcode( FileRead( "CodeVB.vb" ), "System.Windows.Forms.dll" )
  6. If @error Then Return ConsoleWrite( "DotNet_LoadVBcode ERR" & @CRLF )
  7. ConsoleWrite( "DotNet_LoadVBcode OK" & @CRLF )
  8. ; Creates an object as an instance of the "Foo" class
  9. Local $oFoo = DotNet_CreateObject( $oCode, "Foo" )
  10. If IsObj( $oFoo ) Then $oFoo.Test()
  11. EndFunc