InfoPath Dev

I am trying to set the default picture for a picture control.  It needs to be set to the users profile drive.  For example:  \\lsasvsrv01\users\username\signature.bmp.  The username variable in the path will be conditional.  Once I have the variable for the username set, I need to set that to the control.  Is this possible?  If so, what would the code look like to accomplish this?

Thanks! 

Is the picture a link or included in the form? I don't recall if InfoPath 2003 allowed linked pictures. At any rate, if it is a linked picture, can't you just concatenate in the value for the username variable? I guess I am not understanding what you have tried and what the results have been?

The Pic control is imbedded in the form.  If I click on it currently, I can browse to the file location.  I am trying to automate this:  I will send you a screen shot.

So - you'll have to get the file from the file system (form will have to be full trust) and encode as Base64. Then set the pic control to the encoded Base64 string.

Thanks!

Hi Hillary....

Do you by chance have a code snippett of your solution that I could work from?

Thanks! 

 Check out this: http://support.microsoft.com/kb/892730

Ok...I wrote the code to encode but I receive the following error:

'#PCDATA' is in nil content: <{http://schemas.microsoft.com/office/infopath/2003/myXSD/2005-10-14T02:45:00}frmSignature>.

   at Microsoft.Office.Interop.InfoPath.SemiTrust.IXMLDOMNode.set_text(String value)
   at Microsoft.Office.Interop.InfoPath.SemiTrust.DOMNodeWrapper.set_text(String value)
   at DHS2565.DHS2565.btn_CreateNewForm_OnClick(DocActionEvent e) in \\Lsasgm01\gmforms\2565\DHS2565\DHS2565\DHS2565\FormCode.vb:line 75
   at Microsoft.Office.Interop.InfoPath.SemiTrust._ButtonEventSink_SinkHelper.OnClick(DocActionEvent pEvent)

Here is my code:

Dim dest As String

Dim srcFile As String = ""

srcFile = "C:\Documents and Settings\bfadmin\Desktop\signature.bmp"

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:frmSignature").text = dest

Thanks a ton! 

I got it:  Here is my updated code:

srcFile = "C:\Documents and Settings\bfadmin\Desktop\signature.bmp"

node.text = ""

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:frmSignature").text = dest

I also added the following to my code:

If (node Is Nothing) Then

Return

End If

If (oElement.getAttribute("xsi:nil") Is Nothing) Then

' Create xsi:nil attribute with the proper namespace.

If (oNil Is Nothing) Then

Return

End If

oNil.text = "true"

If ("" <> node.text) Then

node.text = ""

End If

End If

End Sub

If (node Is Nothing) Then

Return

End If

If (Not (oElement.getAttribute("xsi:nil") Is Nothing)) Then

End If

End Sub

For anyone else having this issue, here was final solution:

Dim dest As String

Dim srcFile As String = ""

'Check to see if srcFile exists. If it does not, prompt the user to search for the file

srcFile = "C:\Documents and Settings\bfadmin\Desktop\signature.bmp"

If System.IO.File.Exists(srcFile) Then

'Do Nothing

Else

.Title = "Please select file to import:"

.InitialDirectory = "w:\"

.Filter = "BMP Files (*.bmp)|*.bmp"

.RestoreDirectory = True

End With

End If

node.text = ""

Thanks Hilary for poiting me in the right direction!!