Le nom de l'ordinateur :

lpbuffer est une chaine asciiz de 32
size est un entier=31

si AppelDLL32("kernel32","GetComputerNameA" , &lpBuffer,&size) alors
  info("Nom de l'ordinateur : "+lpbuffer)
fin

Pour modifier le nom de l'ordinateur (reboot obligatoire) :

lpbuffer est une chaine asciiz de 32="Nouveau_Nom"

si appeldll32("kernel32","SetComputerNameA", &lpbuffer)
  info("Changement effectué, vous devez redémarrer l'ordinateur.")
fin

L'utilisateur en cours :

lpbuffer est une chaine asciiz de 256
size est un entier=255

si AppelDLL32("advapi32.dll","GetUserNameA" , &lpBuffer, &Size) alors
  info("L'utilisateur en cours est : "+lpbuffer)
fin