How can I do this Excelmacro in LibreOffice

[charly52]

Hi all

I have the following excelmacro and are looking for a LibreOffice solution.

-------------------------------------------------------------------------
    Public Sub check_server()
    Dim xml As New XMLHTTP60            <---------------------- ?
    Dim sURL As String
    Dim sEnv As String
    Dim xmlhtp As New MSXML2.XMLHTTP60  <----------------?
    Dim xmlDoc As New DOMDocument   <----------------------?
    Dim soap_server As String
    
    'Default IP Address in the Excel sheet
    soap_server = Cells(1, 2)
    
    On Error Resume Next
    
    sURL = "http://" & soap_server & "/soap/RuntimeAccess?wsdl"
    xmlhtp.Open "GET", sURL, False
    xmlhtp.send
-------------------------------------------------------------------------

I found a lot of information like “its not possible to convert …”
and things like this, but I don’t found some info how to translate Excel into LibreOffice manualy.
What is the LibreOffice solution for Dim xml As New XMLHTTP60?
Are there something like a “dictionary” or other helpfull articles, books,…
where I can get help from?

Thanks a lot

Charly

[keme]

Instead of posting code that doesn’t work, could you please explain the purpose of your macro?

Don’t expect people here, well versed in the LibreOffice environment, to have intimate knowledge of its counterpart, the Microsoft environment (I know there are some who do, but still…).

If you only tell us how you can’t do something anymore, we first need to guess what you want to do (our guesses are frequently on target, but not always), then devise how to do that (which may differ significantly from the Microsoft way, which is one reason why a direct verbatim translation often does not exist).

If our guess is wrong, the “how” part of our work is worthless. Sounds motivating, right?

Help us to help you!

[charly52]

Hi

I’m not shure whether I should write the aditional Information here as an comment or as an answer?

So I will do it here

The macro make a connection to an webservice. Send a question (get value of xyz) to it, and show the answer in a definded Cell.
The reason why I posted the original macro was only the hope somebody know the associated/matching LO functionality.

The info “its not possible to convert …” and things like this, i wrote only to show that I know that a translation automaticly is not present but I looking generally for information how somthing can be tranlated from MS to LO.

[mauricio]

With Python in LibreOffice, you can used soap service.

[erAck]

not shure whether I should write the aditional Information here as an comment or as an answer?

Clarifying or additional information is best provided by editing the question so it isn’t scattered over several places.

[JohnSUN]

Oh! Just “send a question (get value of xyz) to it, and show the answer in a definded cell”?

Please see example for FILTERXML() function