Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk
 - od firmy ARKANCE [www.cadforum.cz] ARKANCE | KONTAKT - CZ | SK | EN | DE
Již 10.000+ CAD tipů. Přes 118.000 registrovaných u nás, celkem 1.092.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků. Vyzkoušejte nový přesný Inženýrský kalkulátor. Kompletní příkazy AutoCADu a proměnné AutoCADu 2026.

CAD tip CAD tip # 10888:

Otázka

CAD 
 %  platforma  kategorie 
A
AutoCAD, LT, Inventor, Revit a další aplikace umožňují snadno získat informaci o login jménu aktuálního uživatele - např. pro použití v rohovém razítku nebo pro různé evidenční aplikace. Pokud ale potřebujete v textech nebo parametrech projektu automaticky použít/vyplnit další informace o právě přihlášeném uživateli (například jeho plné jméno), může být situace složitější.

V AutoCADu můžete plné jméno získat pomocí dynamického textového pole s proměnnou "Login" - kód:

%<\AcVar Login \f "%tc4">%

zadaný v textu či atributu zobrazí plné jméno uživatele:

Pokud potřebujete ve vlastní aplikaci nebo skriptu získat plné jméno uživatele, včetně dalších detailů z doménového záznamu (LDAP, Directory Services), můžete u počítačů přihlášených do firemní domény použít patřičné funkce VBA či .NET nástrojů a v případě LISPu pak utilitu CAD Studia - (getuserinfo). Ta vrací seznam obsahující detailní informace (jméno, e-mail adresu, město, číslo mobilního telefonu, firmu, oddělení, pracovní pozici) o aktuálním doménovém uživateli - např.:

("Jan Novák" "jan.novak@firma.cz" "České Budějovice" "+420 602 123 456" "FKDV a.s." "Konstrukce" "CAD manažer")

Pak například volání funkce "(nth 1 (getuserinfo))" vrátí e-mail adresu. Zdrojový kód utility getuserinfo si můžete stáhnout z Helpdesku.

Pro získání plného doménového jména uživatele (DisplayName) nebo telefonu např. v Inventoru můžete použít kód iLogic pravidla:

'Toto musí být na začátku pravidla
AddReference "System.DirectoryServices.AccountManagement.dll"

Dim displayName = System.DirectoryServices.AccountManagement.UserPrincipal.Current.DisplayName
MsgBox(displayName)
Dim Phone = System.DirectoryServices.AccountManagement.UserPrincipal.Current.VoiceTelephoneNumber
MsgBox(Phone)

Samozřejmě podmínkou je, aby byl daný uživatel přihlášen do domény (a ne jenom např. na lokální účet na domácím počítači).

ACADInv
100% *CAD
6.5.2016 2468× Expert
atribut autocad ilogic inventor proměnná revit text účet
 
Související CAD produkty:
platí pro: AutoCAD · Inventor ·

Zpět    Všechny další tipy



Pomohl vám tento tip? Provoz služby CADForum.cz podpoříte i nákupem produktů Autodesk u provozovatele tohoto serveru a Platinum partnera Autodesku, firmy ARKANCE.
Můžete si také přidat odkaz na vaše stránky: CAD Fórum - diskuze, tipy, bloky a utility
CAD: 
OS: 
Kateg: 
Text:
 FAQ
  






Tipy a triky prosím využívejte na vlastní zodpovědnost.
Provozovatel (Arkance Systems CZ s.r.o.) nenese odpovědnost za případné potíže vzniklé v souvislosti s použitím kteréhokoliv z uvedených tipů.
Pro plné zvládnutí dané aplikace doporučujeme absolvování některého z nabízených CAD školení.
Další publikování obsahu je dovoleno jen se souhlasem autora.
TOPlist