Appel d'une procédure dans une DLL activex VB depuis un VBScript avec des paramè [Résolu]

Messages postés
6
Date d'inscription
mercredi 3 décembre 2003
Dernière intervention
19 novembre 2004
- 19 nov. 2004 à 10:50 - Dernière réponse :
Messages postés
6
Date d'inscription
mercredi 3 décembre 2003
Dernière intervention
19 novembre 2004
- 19 nov. 2004 à 11:36
Bonjour,

L'appel d'une procédure dans une DLL activex VB depuis un VBScript avec des paramètres ByRef ne semble pas fonctionner!

J'ai un message Type Mismatch : Test lorsque je lance mon vbscript.

Voici la fonction :
Public Function Test( _
ByVal insId As String, _
ByRef outsBarCode As String) As Boolean

MsgBox insIdentification
outsBarCode = "CD0001"
End Function

Si je remplace le ByRef par un ByVal je n'ai plus de message d'erreur mais je souhaite laisser le ByRef...

Voici mon script:

Option Explicit
Dim oMyObject
Dim insPhase
Dim outsBarCode
Dim bResult

Set oMyObject = CreateObject("MYDLL.ClaTest")

insPhase = "Phase de test"
outsBarCode = ""
bResult = oMyObject.Test (insPhase, outsBarCode)

MsgBox outsBarCode
Set oDspy = Nothing

Merci pour votre aide
8-)
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
17308
Date d'inscription
mercredi 2 janvier 2002
Dernière intervention
22 août 2018
- 19 nov. 2004 à 10:59
3
Merci
Ne mets pas de type dans ta Dll..... ils passeront en Variant et ca devrai aller...

bien vu le outsBarCode = "" pour forcer VBS a le considerer comme un String ;-)

Amusez-vous ! ;)
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 88 internautes ce mois-ci

Messages postés
6
Date d'inscription
mercredi 3 décembre 2003
Dernière intervention
19 novembre 2004
- 19 nov. 2004 à 11:36
0
Merci
Merci beaucoup pour la réponse rapide!

Je vais faire des tests maintenant avec des paramètres objet.

A+ :big)
8-)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.