Newbie Questions

Re: Button to copy and paste a field on an InfoPath form to the clipboard

msupinski — Mon, 27 Apr 2009 22:41:13 GMT

I am trying to use InfoPath 2007 in compatibility mode for 2003. I want to code on switching view to copy data in field on form to clipboard. I have tried various ways but keep getting errors. I feel I am so close and hate to bother you. What would be the code to use Visual basic InfoPath 2003? Thanks for your help.

Re: Button to copy and paste a field on an InfoPath form to the clipboard

wil7575_newUser — Tue, 24 Feb 2009 20:29:49 GMT

Many Thanks, Correct programming language in of course made a big difference.

Works great now.

Now when I open a new form I want the info in the clipboard to paste, but the following command does not work:

CurrentView.ExecuteAction(ActionType.Paste, "/dfs:myFields/dfs:dataFields/d:Device/@DevName")

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Jimmy — Tue, 24 Feb 2009 03:55:20 GMT

That's because it's VBScript code but you're using Visual Basic. With Visual Basic in InfoPath 2007 you can do this:

Dim nodeToCopy As XPathNavigator = MainDataSource.CreateNavigator().SelectSingleNode("/dfs:myFields/dfs:dataFields/d:PatchRequest/@DevName", NamespaceManager)
If Not String.IsNullOrEmpty(nodeToCopy.Value) Then
Clipboard.SetText(nodeToCopy.Value, TextDataFormat.Text)
Else
MessageBox.Show("There is no text to copy!")
End If

That is assuming the field you're referencing is in the main data source.

Re: Button to copy and paste a field on an InfoPath form to the clipboard

wil7575_newUser — Mon, 23 Feb 2009 18:38:35 GMT

I put the code 'as is' after changed event of list box

Error I'm getting is 'xdocument' is not declared.

Namespace NetworkRequestForm2
    Public Class FormCode
        Dim fieldValue As String = MainDataSource.CreateNavigator().SelectSingleNode("/dfs:myFields/dfs:dataFields/d:PatchRequest/@DevName", NamespaceManager).Value

        ' Member variables are not supported in browser-enabled forms.
        ' Instead, write and read these values from the FormState
        ' dictionary using code such as the following:
        '
        ' Private Property _memberVariable() As Object
        '     Get
        '         _memberVariable = FormState("_memberVariable")
        '     End Get
        '     Set
        '         FormState("_memberVariable") = value
        '     End Set
        ' End Property

        ' NOTE: The following procedure is required by Microsoft Office InfoPath.
        ' It can be modified using Microsoft Office InfoPath.
        Private Sub InternalStartup(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Startup
            AddHandler EventManager.XmlEvents("/dfs:myFields/dfs:dataFields/d:PatchRequest/@New_").Changing, AddressOf PatchRequest_New__attr_Changing
            AddHandler EventManager.XmlEvents("/dfs:myFields/dfs:dataFields/d:PatchRequest/@New_").Validating, AddressOf PatchRequest_New__attr_Validating
            AddHandler EventManager.XmlEvents("/dfs:myFields/dfs:dataFields/d:PatchRequest/@New_").Changed, AddressOf PatchRequest_New__attr_Changed
        End Sub

        Public Sub PatchRequest_New__attr_Changing(ByVal sender As Object, ByVal e As XmlChangingEventArgs)

            ' Ensure that the constraint you are enforcing is compatible
            ' with the default value you set for this XML node.
            Dim fieldValue As String = MainDataSource.CreateNavigator().SelectSingleNode("/dfs:myFields/dfs:dataFields/d:PatchRequest/@DevName", NamespaceManager).Value

        End Sub

        Protected Overrides Sub Finalize()
            MyBase.Finalize()
        End Sub

        Public Sub PatchRequest_New__attr_Validating(ByVal sender As Object, ByVal e As XmlValidatingEventArgs)
            ' Write your code here.
        End Sub

        Public Sub PatchRequest_New__attr_Changed(ByVal sender As Object, ByVal e As XmlEventArgs)
            Dim objXMLNode

            objXMLNode = XDocument.DOM.selectSingleNode("/dfs:myFields/dfs:dataFields/d:PatchRequest/@DevName")
            XDocument.View.SelectText(objXMLNode)
            XDocument.View.ExecuteAction("Copy")
            ' Write your code here to change the main data source.
        End Sub
    End Class
End Namespace
.

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Jimmy — Sat, 21 Feb 2009 01:18:31 GMT

It does work in InfoPath 2007. Could you show us the code you're trying to use and the error you're getting?

Re: Button to copy and paste a field on an InfoPath form to the clipboard

wil7575_newUser — Fri, 20 Feb 2009 23:08:28 GMT

This does not appear to work in infopath 2007, any idea on where I can start?

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Joerg Knoerchen — Thu, 27 Nov 2008 10:07:37 GMT

Hi Jimmy,

this is my code now and it works very fine now...

Sub CopySmartKey_OnClick()

   Dim objXMLNode

   set objXMLNode = XDocument.DOM.selectSingleNode("/my:myFields/my:SmartKeyValue")
   XDocument.View.SelectText(objXMLNode)
   XDocument.View.ExecuteAction("Copy")

End Sub

Now thanks again for all your help...

Cheers

Joerg

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Jimmy — Thu, 27 Nov 2008 09:40:39 GMT

Please try changing line 25 to

XDocument.View.SelectText(objXMLNode)

that should do the trick.

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Joerg Knoerchen — Thu, 27 Nov 2008 08:47:25 GMT

Jimmy:

In all likelihood the error you're getting is the result of invalid XPath in line 24. In an earlier post you had a node name my:SmartKey, and in this post you have my:SmartKeyValue. Which one is it? And in either case, unless you changed it from the default, the 'F' in my:myFields should be capitalized.

Hi Jimmy,

many thanks for your hint!

Well I produced a new form to have a new environment to test with and I called the Field SmartKeyValue in this form so this is OK, but I had a lowered F and capitalized it, it seems now that I'm closer to my desired outcome as I do now have this error:

The following error occurred:

Either the combination of values for the View.SelectNodes call is an invalid selection, or the values are not defined for this view, defined for this view more than once, or not selectable in the view.
File:script.vbs
Line:25

Line:25 looks like this: XDocument.View.SelectNodes(objXMLNode)

Many thanks for helping me and your patience!

Cheers

Joerg

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Jimmy — Thu, 27 Nov 2008 08:18:47 GMT

In all likelihood the error you're getting is the result of invalid XPath in line 24. In an earlier post you had a node name my:SmartKey, and in this post you have my:SmartKeyValue. Which one is it? And in either case, unless you changed it from the default, the 'F' in my:myFields should be capitalized.

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Joerg Knoerchen — Thu, 27 Nov 2008 08:00:53 GMT

Hilary Stoupa:

I'd guess the "//" before my:myfields should be "/".

Dear Hilary,

many thanks for your reply - but sorry - no change - same error...

But I found this in the MSE Help:

Note In some cases, calling the ExecuteAction method from the OnClick event for a button in a view may cause an error. This is because the selected context changes to the button when the button is clicked. In this case, it is better to use a button (or link) on a custom task pane, toolbar, or menu to call the ExecuteAction method.

so I moved my code onto a custom toolbar with a button and this code:

Sub CopySmartKey_OnClick()

   Dim objXMLNodes
   Dim objXMLNode

   set objXMLNode = XDocument.DOM.selectSingleNode("/my:myfields/my:SmartKeyValue")
   XDocument.View.SelectNodes(objXMLNode)
   XDocument.View.ExecuteAction("Copy")

End Sub

And now I'm getting this error:

The following error occurred:

The specified pxnStartNode value for the View.SelectNodes call is not valid.
File:script.vbs
Line:25

Line:25 is XDocument.View.SelectNodes(objXMLNode)

What I do not understand is that in the InfoPath 2003 Help the code is written like this:

function SelectEmployee()
{
   var objXMLNodes;
   var objXMLNode;

   objXMLNode = XDocument.DOM.selectSingleNode("/employees/employee");
   XDocument.View.SelectNodes(objXMLNode);

   objXMLNodes = XDocument.View.GetSelectedNodes();
   if (objXMLNodes.Count > 0)
   {
      XDocument.UI.Alert(objXMLNodes(0).nodeName + "\n\n" + objXMLNodes(0).text);
   }
}

But when I put this code into the Microsoft Script Editor the code throws out errors... so I modified it to the above mentioned code I'm trying to use!
Why is microsoft so confusing a NewBe with a lot of code in the help that doesn't work!?
I also tried the code setting the InfoPath 2003 form to JScript and VBScript but does not make any difference.

Any hints?

Cheers Joerg

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Hilary Stoupa — Wed, 26 Nov 2008 16:46:04 GMT

I'd guess the "//" before my:myfields should be "/". The object required error means your code to the right of the = sign in your set statement is not returning a value. Generally, this is caused by incorrect XPath.....

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Joerg Knoerchen — Wed, 26 Nov 2008 11:05:09 GMT

As no one replies anymore I startet to do my own tests...

First of all I simply would like to look if I can read a value given in a field called SmartKey

Sub copyButton_OnClick(eventObj)

Dim Hello
Dim SmartValue

set SmartValue = XDocument.DOM.selectSingleNode("//my:myfields/my:Smartkey").text

Hello = MsgBox(SmartValue, 0, "Testfenster")

End Sub

But it throws out this error:

The following error occurred:

Object required: 'XDocument.DOM.selectSingleNode(...)'
File:script.vbs
Line:23

Line 23 is this:

set SmartValue = XDocument.DOM.selectSingleNode("//my:myfields/my:Smartkey").text

What I have is InfoPath 2003 set to the form to use VBScript. What have I done wrong, do I have to include something or do I need to configure/setup InfoPath in a special way?
The data I would like to copy is located at the actual opened and displayed form in info path...

And then what comes next? How to copy the SmartValue content to the clipboard?

Hope you can help out...

Thanks

Joerg

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Joerg Knoerchen — Mon, 24 Nov 2008 11:15:07 GMT

Hi Jimmy,

until now no one replied :-(

Are you able to make this work with JScript or VBScript?

Many thanks in advance...

Re: Button to copy and paste a field on an InfoPath form to the clipboard

Joerg Knoerchen — Thu, 20 Nov 2008 15:16:17 GMT

Dear Jimmy,

again many thanks for your help...

When I open my form I found a section where I can change the setting, but it gives me only JScript or VBScript...

Would be great to get a solution... :-)

Thanks!

Joerg