From ee1d4ac1c341aa9cdecbab89933c0658228d38c4 Mon Sep 17 00:00:00 2001
From: fcolin
Date: Thu, 1 Feb 2007 13:13:23 +0000
Subject:  Utilisateur : Fcolin       Date : 18/04/03   Heure : 15:43 Archivé
 dans $/Bus/comIvy Commentaire: ajout GetDomain (vss 2)

---
 comIvy/Expression.cpp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'comIvy')

diff --git a/comIvy/Expression.cpp b/comIvy/Expression.cpp
index 468a431..9a856a7 100644
--- a/comIvy/Expression.cpp
+++ b/comIvy/Expression.cpp
@@ -28,7 +28,7 @@ void CExpression::OnMessage(IvyApplication * app, int argc, const char ** argv)
 	BSTR appname = ConvCSTR( app->GetName() );
     SAFEARRAY *pArrayVal = NULL;
     HRESULT hr = S_OK;
- 
+	// pour assurer la compatibilite avec VBSCript pouah horreur
     //Create the safe array for the arguments string.
     pArrayVal = SafeArrayCreateVector( VT_VARIANT, 0, argc );
     
@@ -43,12 +43,13 @@ void CExpression::OnMessage(IvyApplication * app, int argc, const char ** argv)
     }
  	VARIANT args;
 	args.vt = VT_ARRAY | VT_VARIANT;
-	args.parray = pArrayVal;
+	V_ARRAY(&args) = pArrayVal;
 
 	Received( appname, args );
 
 	SafeArrayDestroy(pArrayVal);
 }
+
 // CExpression
 CExpression::CExpression()
 {
-- 
cgit v1.1