Discussion :

[chouchou60]

Bonjour à tous,
J'ai un problème que je n'arrive pas a résoudre depuis plusieurs jours concernant des échange DDE entre ACCESS et une carte Modbus Plus qui récupère des valeurs venant d'automates programmable.
Pour aller lire une valeur dans cette carte, il faut que je fasse un échange DDE. Ca fonctionne très bien avec Excel en tapant dans une cellule le code:
=MBPLUS|BCE!'40077'

En ce qui concerne Access, j'ai créée un module avec le code:

Dim MonCanal As Long
Dim MaVariable As String
Dim MaMesure As Integer

MonCanal = DDEInitiate("MBPLUS", "BCE")

MaVariable = 40077
MaMesure = DDERequest(MonCanal, MaVariable)

le DDEInitiate fonctionne bien, par contre j'ai une erreur 285 avec le DDERequest.
Par contre DDEPoke fonctionne:

DDEPoke MonCanal, MaVariable, 12

Quelqu'un pourrait il m'aider ? Merci de vos réponses

[micniv]

une piste ...

en dehors de toute considération MB, tu déclares maVariable en String et tu l'initialises en numérique

bonne journée

[chouchou60]

en dehors de toute considération MB, tu déclares maVariable en String et tu l'initialises en numérique

Une erreur de ma part dans la recopie
MaVariable = "40077"

[=JBO=]

Bonjour,

Quel est le message d'erreur ?
Est-ce ce qui suit ?

error 285: "The other application can't perform the DDE function or retrieval you attempted."

[chouchou60]

Bonjour,

Quel est le message d'erreur ?
Est-ce ce qui suit ?

non, c'est:

Erreur d'execution '285'
L'autre application ne peut pas exécuter la fonction DDE ou la récupération que vous avez tentée.