Fórum pro uživatele kancelářského balíku OpenOffice | LibreOffice
 

#1 11. 1. 2018 20:44:41

ludviktrnka
Člen
Registrace: 9. 7. 2009
Příspěvků: 711

Zjistit jméno počítače PARÁDNĚ VYŘEŠENO

Nevíte náhodou někdo zda lze v LibreOffice nějak zjistit název počítače? Ať už přímo nebo v Basicu?

Editoval ludviktrnka (12. 1. 2018 22:12:10)


LibreOffice 5.4.

Offline

#2 11. 1. 2018 21:40:42

neutr
Člen
Registrace: 8. 3. 2007
Příspěvků: 3,468

Re: Zjistit jméno počítače PARÁDNĚ VYŘEŠENO

Tohle myslím přímo nejde. Máte ale nastavení z instalace takže z Lo přímo jen co je zadáno. Existuje ale cesta. Dá se zavolat pomocí shell (bash) například souborový manažer který to načíst umí.
     Pokud by se jednalo o určitou potřebu testovat připojení pak to jde udělat javascriptem. Ten umí zapsat vše z připojení - i HW konfiguraci, připojení, název stroje a podobně. Běžně se to dá zjistit pomocí rozšíření WordPressu, nebo i jiných redakčních systémů. Funkce se nazývá "whois". Takže to lze udělat i pro svojí konfiguraci. Musí to být ale přes server na který se přihlásíte jako klient.
     Existují Apache instalace pro PHP na vlastním stroji a podobná udělátka kde lze spustit JavaScript. JavaScript je možné použít i v Libre Office. Takže teotericky by to mělo jít nepřímo přes protokol HTTP který se spustí jako script LibreOffice. To jsem ale ještě nedělal.


     Četl jsem dotaz na to, že uživatel neumí nastavit do LO (AOO už nevím) knihovnu JSON, ale mělo by jít i JQuery a Ajax. Takže nástroje by měly být k dispozici - měly by se spouštět z IDE UNO, nebo i Basicem přes shell (bash u linuxu) a nebo přímo internetovými nástroji přes přímý přístup na internet.
     Koketuju sice s JavaScriptem ale kvůli jiným účelům. Technicky lze postavit ve StarBasicu jednorázovou stránku s dotazem a odeslat to přes síť - dotaz podobně jako na XML - které posíláte do banky. I/O by měl vrátit konfiguraci vaší, nebo propojeného stroje. Stačí málo ale musí se to prošlapat, nebo doGooglit - určitě to už někdo dělal.

Editoval neutr (11. 1. 2018 21:44:51)


Moje e-mailová adresa
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte orientaci při vyhledávání řešení JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

Offline

#3 11. 1. 2018 22:02:52

Zvedavec
Člen
Registrace: 8. 11. 2004
Příspěvků: 484

Re: Zjistit jméno počítače PARÁDNĚ VYŘEŠENO

Když byste se došel na spolupráci s tím příkazový řádkem, tak %computername% vrátí název lokálního PC a to by ten Basic umět mohl (tu spolupráci).

edit:
https://stackoverflow.com/questions/355 … -using-vba

toto mě doma na win funguje.

Editoval Zvedavec (11. 1. 2018 22:45:26)


LO většinou poslední verze, na W10 prof. 32b/64b

Offline

#4 12. 1. 2018 22:07:52

ludviktrnka
Člen
Registrace: 9. 7. 2009
Příspěvků: 711

Re: Zjistit jméno počítače PARÁDNĚ VYŘEŠENO

Supr, odkaz míří sice na forum VBA, ale příkaz funguje i v LO. Dávka je skutečně zcela primitivní:

Function JmenoPocitace as string
    Dim sJmeno As String
    sJmeno=Environ("computername")
    JmenoPocitace = sJmeno
End Function

(takto to lze použít jak v sešitě =jmenopocitace() tak v jiném makru.

Více tipů na získání informací o prostředí je zde, ale výčet jistě není úplný neboť zrovna computername tam není. https://wiki.documentfoundation.org/Dev … _variables

Edit (Jo možná to nebude fungovat v každém OS ale to už je na jiný složitější program)

Editoval ludviktrnka (12. 1. 2018 22:43:10)


LibreOffice 5.4.

Offline

#5 13. 1. 2018 16:42:32

LADER
Člen
Registrace: 3. 4. 2013
Příspěvků: 145

Re: Zjistit jméno počítače PARÁDNĚ VYŘEŠENO

Zdravím,
to uvedené makro se mi zalíbilo, tak jsem jej zkusil na svém počítači.
U mne však vrací prázdný řetězec. Zkoušel jsem náhodně i jiné parametry, jako třeba: PATH, DISPLAY, TEMP se stejným výsledkem. Pro informaci, mám Ubuntu 16.04 LTS.


Ubuntu 22.04.4 LTS, LibreOffice Verze: 7.6.6.3, wxMaxima 20.12.1, Maxima 5.47.0 (SBCL)

Offline

#6 13. 1. 2018 18:26:56

ludviktrnka
Člen
Registrace: 9. 7. 2009
Příspěvků: 711

Re: Zjistit jméno počítače PARÁDNĚ VYŘEŠENO

Ano, výsledek funkce je odvislý od operačního systému. Výše uvedené platí pro win. Trochu více zde, ale ani to není úplné https://wiki.openoffice.org/wiki/Environment_Variables


LibreOffice 5.4.

Offline

Zápatí