Visual Basic

Re: Outlook signature code suddenly causing "remote procedure call failed" message

18-May-17 21:43

Sounds like maybe a network problem. Check that the workstation can still access the remote files. Other than that you will need to do some detailed diagnostic investigation.

Member 134178014-Dec-19 3:07

Member 13417801

4-Dec-19 3:07

I have the same issue. I tried using a local file instead and get the same error.

In the event log it is showing that Word crashes

Re: Outlook signature code suddenly causing "remote procedure call failed" message

Richard MacCutchan4-Dec-19 3:28

Re: Outlook signature code suddenly causing "remote procedure call failed" message

4-Dec-19 3:28

No idea why you are posting this message to me, on a thread that is more than two years old.

Member 134178014-Dec-19 3:32

Member 13417801

4-Dec-19 3:32

No need to be snippy...

Re: Outlook signature code suddenly causing "remote procedure call failed" message

Richard MacCutchan4-Dec-19 3:45

Retrieving value from an XML file

4-Dec-19 3:45

I wasn't; I just wondered what your message was supposed to be about, and why you posted it to me after such a long period of time.

Ben Senior17-May-17 8:32

17-May-17 8:32

I'm new to working with XML in VB.NET and would like a little help after tearing my hair out for a couple of days.

I have an XML file with the following structure:

XML

-<conceptGrp>
  -<descripGrp>
    <descrip type="subjectField">6411, 6821</descrip>
   </descripGrp>
  -<languageGrp>
    <language lang="DE" type="German"/>
   -<termGrp>
      <term>Scheren</term>
     -<descripGrp>
        <descrip type="termType">fullForm</descrip>
      </descripGrp>
     -<descripGrp>
        <descrip type="reliabilityCode">3</descrip>
      </descripGrp>
    </termGrp>
   </languageGrp>
  -<languageGrp>
    <language lang="EN" type="English"/>
   -<termGrp>
      <term>scissors</term>
     -<descripGrp>
        <descrip type="termType">fullForm</descrip>
      </descripGrp>
     -<descripGrp>
        <descrip type="reliabilityCode">3</descrip>
      </descripGrp>
    </termGrp>
   </languageGrp>
</conceptGrp>

First I need to cycle through all the elements in the file (>550000) and for each element extract the text
"6411, 6821" from

<descrip type="subjectField">6411, 6821</descrip>

and
"3" from

<descrip type="reliabilityCode">3</descrip>

The <descrpGrp> appears just once for each element.
The <languageGrp> appears at least twice but up to 20 times.
The <termGrp> appears mostly once but up to 10 times for each <languageGrp>.
The <descrpGrp> appears twice for each <termGrp>.
The <descrip type="reliabilityCode" ...> appears just once for each term.

Using the extracted strings I look them up and need to replace them with text in the element.

This is my code so far for getting the <descrip type="reliabilityCode">3</descrip>:

' loop thro each element in XML doc and replace the reliabiltiy codes
        For Each conceptGrp In xDoc.Elements("conceptGrp")
            For Each languageGrp In conceptGrp.Elements("languageGrp")
                For Each termGrp In languageGrp.Elements("termGrp")
                    Dim code = termGrp.Element("reliabilityCode")
                    For Each descripGP In termGrp.Elements("descripGrp")
                        For Each descrip In descripGP.Elements("descrip")
                            Dim reliability As String = xDoc.selectSingleNode("/Categories/category[@descrip='reliability code']").InnerText

                        Next descrip
                    Next descripGP
                Next termGrp
            Next languageGrp
        Next conceptGrp

When I look in the locals window I can see "descrip" and for the first node the property "next node" with the value I want but I just can't grab it.

How can I easily get the value and then replace it in the element with my looked up text?

Thanks
Ben

modified 17-May-17 20:17pm.

PIEBALDconsult17-May-17 14:11

PIEBALDconsult

17-May-17 14:11

If Only You Knew The Power Of The ~~Dark Side~~ XPath!

Ben Senior17-May-17 22:33

17-May-17 22:33

Not at all a helpful answer, but thanks for taking the time to write something Frown | :-(

Richard MacCutchan17-May-17 23:08

17-May-17 23:08

The helpful bit was the suggestion to use XPath. If you look at the structure of the XML there is only ever one descrip element in each descripGrp, so maybe you are accessing it in the wrong way.

Ben Senior19-May-17 7:40

19-May-17 7:40

That is correct.

There is in each element just one <descrip type="subjectField">6411, 6821. There are over 700 possible values for subjectField and there can be multiple values each separated by a comma. Her we have two values "6411" and "6821".

In each element there are a minimum of two languageGrp and a maximum of thirty. It varies throughout the file.

In each languageGrp there is at least one termGrp up to a maximum of 10.

In each termGrp there is just one <descrip type="reliabilityCode">3. There are up to five possible values of this code, here it is "3".

I've never used XPath and have not much useful reference material at the moment. It's all new to me, I'm an old VB/C# horse.

Richard MacCutchan19-May-17 21:13

19-May-17 21:13

Ben Senior wrote:
not much useful reference material

Seriously? There is no end of it, from MSDN documentation to articles in both VB and C#.

David Mujica19-May-17 7:02

David Mujica

19-May-17 7:02

I'd like to help you, but I'm a bit unclear as to what you need to do.

Do you want to take,

<descrip type="reliabilityCode">3</descrip>

and change it to

<descrip type="reliabilityCode">reliabilityCode</descrip>

and do the same for

<descrip type="subjectField">6411, 6821</descrip>

I think this can be done cleaner with xPath statements, rather then lots of looping.

If my understanding is correct, then I will help with the xPath statements.

Java | [Coffee]

Ben Senior19-May-17 7:26

19-May-17 7:26

Hi David,

No. What I want to do is take:
<descrip type="reliabilityCode">3

and replace it with:
<descrip type="reliabilityCode">Very reliable

The "3" can vary and when I get this numerical code I have a function from where I can retrieve its text equivalent. I then need to insert the text equivalent back into the XML file. There are five of these numeric codes.

I'm new to XML and have never used XPath before so I'm struggling at the moment. I've been researching XPath and LINQ and just can't seem to get the hang of them.

I have been using the looping as that's what I'm used to doing in VB and C#.

The last thing that I will need to do is go through each element and depending upon the value of the subject field write the whole element to a new file for that subject. But first thing first and replace the numeric codes with text.

The subjectField is very similar other than there are over 700 subjects. I already have a function which converts the numeric subject field codes into text, and as above I need to insert the text back into the XML file.

David Mujica19-May-17 8:28

David Mujica

19-May-17 8:28

See if this code helps. I realize that it doesn't do exactly what you want, but it shows how xPath works.

Dim xDoc As New XmlDocument
        Dim xNodeList As XmlNodeList
        Dim xNode As XmlNode

        xDoc.Load("C:\Temp\test.xml")

        xNodeList = xDoc.SelectNodes("/conceptGrp/descripGrp/descrip[@type='subjectField']")

        For Each xNode In xNodeList
            xNode.InnerText = xNode.Attributes("type").Value
            Debug.Print(xNode.InnerText)
        Next

        xDoc.Save("C:\Temp\test_1.xml")

Ben Senior20-May-17 4:28

20-May-17 4:28

I had to add the root to the code ie. "/mtf/conceptGrp/descripGrp/descrip[@type='subjectField']" and a variable codeID to hold the value from

codeID = xNode.InnerText

instead of your

xNode.InnerText

I replaced the codeID with codeText (the corresponding text from my function) and reinserted it into the xml file.

I need to test out the subjectField, but I don't anticipate any difficulties because it basically the same as for reliabilityCode.

Works a treat. Thanks for your help. Now I'm getting there with XPath Smile | :)

Meshack Musundi23-May-17 5:58

Meshack Musundi

23-May-17 5:58

You can get and set the value using LINQ to XML and XML axis properties.

VB.NET

Dim conceptor = XDocument.Load("C:\file.xml")
' Retrieve value
Dim subjectField = conceptor...<descrip>.Where(Function(d) d.@type = "subjectField").Value
' Change value
conceptor...<descrip>.Where(Function(d) d.@type = "subjectField").Value = "1234"
' Save changes
conceptor.Save("C:\file.xml")

The descendant axis property, ...<>, gets all descendants that have the name specified within the angle brackets. The attribute axis property, .@, returns a reference to the value of the specified attribute. The Value axis property returns a reference to the value of the first element in a collection of elements.

"As beings of finite lifespan, our contributions to the sum of human knowledge is one of the greatest endeavors we can undertake and one of the defining characteristics of humanity itself"

Ben Senior23-May-17 7:33