how i get system ip address using macro in openoffice

raj80152 · June 19, 2019, 4:55pm

How do i get my system’s IP address using a macro in LibreOffice (or OpenOffice)?

Hrbrgr · June 19, 2019, 5:43pm

But you already know that you are here on the LibreOffice site?

EasyTrieve · June 21, 2019, 11:52am

I suspect this might depend on your OS. What OS are you using?

Lupp · June 21, 2019, 5:42pm

**For Windows: ** See How to get the stdout result of a Basic "shell" order?.
The relevant functionality is contained in the function ShellRun() there.
Change

Sub TestShellRun
    msgbox ShellRun("cmd.exe /c dir")
End Sub

to

Function getCommandOutput(pCommand)
  getCommandOutput = ShellRun("cmd.exe /c " & pCommand)
End Function

and call the function with pCommand = “ipconfig”.
You need to analyse the result for the ip you want.

aSplit = Split(getCommandOutput("ipconfig"), Chr(10))

will return the array of output lines where you find everything you need.
Just tidy up the mess made of the output by silly locaization.

mikekaganski · June 22, 2019, 12:51am

Just tidy up the mess made of the output by silly locaization

… or issue chcp 1252 prior to ipconfig, to ensure en_US output:

cmd.exe /c chcp 1252 & ipconfig

Lupp · June 22, 2019, 8:54am

Unfortunately thats not much better. Why are MS making such a mess of anything (align with spaces, lots of useless interlines e.g by cmd.exe, multiline “info” in explorer…) instead of producing clearly structured output. Are they interested in actively keep users sillydumb and taking this nonsense as “state of the art”?
(Like this “forum” using one of the worst date formats imaginable.)