Table des Matières
Publicité
If
argv.Length
m
= YModule.FindModule(argv(1)) REM
If (m.isOnline()) Then
If
argv.Length
If argv(2) =
If argv(2) =
End If
Console.WriteLine("serial:
Console.WriteLine("logical name: "
Console.WriteLine("luminosity:
Console.Write("beacon:
If (m.get_beacon() = Y_BEACON_ON) Then
Console.WriteLine("ON")
Else
Console.WriteLine("OFF")
End If
Console.WriteLine("upTime:
Console.WriteLine("USB current:
Console.WriteLine("Logs:")
Console.WriteLine(m.get_lastLogs())
Else
Console.WriteLine(argv(1) +
End If
YAPI.FreeAPI()
End Sub
End Module
Chaque propriété
xxx
propriétés qui se sont pas en lecture seule peuvent être modifiées à l'aide de la méthode
Pour plus de détails concernant ces fonctions utilisées, reportez-vous aux chapitre API
()
Modifications des réglages du module
Lorsque que vous souhaitez modifier les réglages d'un module, il suffit d'appeler la fonction
correspondante, cependant cette modification n'a lieu que dans la mémoire vive du
set_xxx()
module: si le module redémarre, les modifications seront perdues. Pour qu'elle soient mémorisées
de manière persistante, il est nécessaire de demander au module de sauvegarder sa configuration
courante dans sa mémoire non volatile. Pour cela il faut utiliser la méthode
Inversement il est possible de forcer le module à oublier ses réglages courants en utilisant la
méthode
revertFromFlash()
d'un module.
Module
Module1
Sub usage()
Console.WriteLine("usage: demo <serial or logical name> <new logical
End
End Sub
Sub Main()
Dim argv() As
Dim
errmsg
As
Dim
newname
As
Dim
m
As
YModule
If
(argv.Length
REM
Setup the API
If
YAPI.RegisterHub("usb",
Console.WriteLine("RegisterHub error: "
End
End If
m
= YModule.FindModule(argv(1)) REM
If m.isOnline() Then
newname
= argv(2)
If (Not YAPI.CheckLogicalName(newname)) Then
Console.WriteLine("Invalid name ("
www.yoctopuce.com
<
2
Then usage()
>
2
Then
"ON"
Then m.set_beacon(Y_BEACON_ON)
"OFF"
Then m.set_beacon(Y_BEACON_OFF)
")
" not connected (check identification and USB
du module peut être lue grâce à une méthode du type
. Ce petit exemple ci-dessous vous permet changer le nom logique
String
= System.Environment.GetCommandLineArgs()
String
=
""
String
<> 3) Then usage()
to
use local USB devices
errmsg) <>
18. Utilisation du Yocto-MaxiDisplay en VisualBasic .NET
use serial
or
logical name
"
+ m.get_serialNumber())
+ m.get_logicalName())
"
+ Str(m.get_luminosity()))
"
+ Str(m.get_upTime() / 1000) +
"
+ Str(m.get_usbCurrent()) +
YAPI_SUCCESS
Then
+ errmsg)
use serial
or
logical name
+
newname
+ ")")
"
sec")
"
mA")
cable)")
, et les
get_xxxx()
set_xxx
saveToFlash()
name>")
.
141
Publicité
Table des Matières
