1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| // Chargement de la librairie
sNomDLL est une chaîne
//v1 est un entier
sNomDLL="C:\Users\Administrateur\Downloads\Pullsdk and Document\pullsdk and document\pullsdk20120111\plcommpro.dll"
HndlLib est un entier
HndlLib=ChargeDLL(sNomDLL)
SI HndlLib=0 ALORS
Info("La Librairie n'est pas chargée")
SINON
//Info("La Librairie est chargée")
params est une chaîne
params = "protocol=TCP,ipaddress='192.168.1.201',port=4370,timeout=5000,passwd="
AppelDLL32(sNomDLL,"Connect",params)
Trace(AppelDLL32(sNomDLL,"Connect",params))
// Décharge la librairie
DéchargeDLL(HndlLib)
FIN |
Partager