Code

Re: Getting users Username

dpsol — Sat, 23 Feb 2008 17:27:00 GMT

Hi,

I am new to infoPath2003 and been reading this post and how do you add this code into infopath? I am trying to get the current user that opens the form onto a test field also.

kinda clueless on my way around infoPath.

thanks for any help.

Sol

Re: Getting users Username

lotusvball — Thu, 03 Aug 2006 20:51:53 GMT

quote:
Originally posted by lotusvball

I have this code in vbScript;

Sub XDocument_OnLoad(eventObj)
' Write your code here
Dim wsh
Dim un
Set wsh = CreateObject("WScript.Network")
un = wsh.UserName
XDocument.DOM.selectSingleNode("//my:myFields/my:tmpFields/my:Field1").text = un

End Sub

I am trying to populate a text box (Field1) with the value of the username. I can get XDocument.UI.Alert(un) to work. but when I try to populate with above code I get "object required" error. What am I missing?

Nevermind...
XDocument.DOM.selectSingleNode("//my:myFields/my:tmpFields/my:Field1").text = un should have been

XDocument.DOM.selectSingleNode("//dfs:myFields/my:tmpFields/my:Field1").text = un

duh.....

Re: Getting users Username

lotusvball — Thu, 03 Aug 2006 19:38:37 GMT

I have this code in vbScript;

Sub XDocument_OnLoad(eventObj)
' Write your code here
Dim wsh
Dim un
Set wsh = CreateObject("WScript.Network")
un = wsh.UserName
XDocument.DOM.selectSingleNode("//my:myFields/my:tmpFields/my:Field1").text = un

End Sub

I am trying to populate a text box (Field1) with the value of the username. I can get XDocument.UI.Alert(un) to work. but when I try to populate with above code I get "object required" error. What am I missing?

Re: Getting users Username

Patrick Halstead — Fri, 16 Sep 2005 19:59:29 GMT

Ah. Extranetted forms. Search the forum (upper right search button) for the term "extranet" and you will see some stuff.

Patrick Halstead [InfoPath MVP]
InfoPathDev

Re: Getting users Username

drobins — Thu, 15 Sep 2005 14:02:25 GMT

That was it.

Thanks Patrick.

My big problem now is forms for users that don't have access to our network. I just can't seem to get that to work.

Re: Getting users Username

Patrick Halstead — Thu, 15 Sep 2005 06:08:35 GMT

Hi guys,
Make the form Full Trust. Then it will work.

Patrick Halstead [InfoPath MVP]
InfoPathDev

Re: Getting users Username

drobins — Wed, 14 Sep 2005 15:37:51 GMT

is there a specific dll that must be registered for the vb to work or does the dll cover both vb and jscript?

Re: Getting users Username

drobins — Wed, 14 Sep 2005 14:45:31 GMT

Yes i tried that as well and it gave a similar error that it couldn't create wscript.shell

Re: Getting users Username

vt_asparagus — Wed, 14 Sep 2005 14:40:57 GMT

The code works for me. I do not have an explanation why you are getting the error in VBScript but you run this in JScript it works.

Where you able to try the code I posted that used Wscript.Shell?

Anyone else run into this issue before???

Re: Getting users Username

drobins — Wed, 14 Sep 2005 14:31:11 GMT

here is my code for the onload

Sub XDocument_OnLoad(eventObj)

Dim wsh
Set wsh = CreateObject("WScript.Network")
un = wsh.UserName
XDocument.DOM.selectSingleNode("//my:myFields/my:field14").text = un

End Sub

Re: Getting users Username

vt_asparagus — Wed, 14 Sep 2005 14:16:45 GMT

I find it hard to believe but it is happening. Post up the code you are running and let me see if I or someone else can generate the error.

Re: Getting users Username

drobins — Wed, 14 Sep 2005 12:47:18 GMT

This is the error i am getting
A runtime error has occured
Do you want to debug?

ActiveX component can't create object: 'WScript.Network'
file: script.vbs
line: 23

how is it that i can create the object in jscript but not vb?

Re: Getting users Username

vt_asparagus — Tue, 13 Sep 2005 21:07:43 GMT

I would think if the jscript works, then the vbscript would work.

What is the exact error message that you are getting? Does it have anything do with ActiveX not being allowed to run in IE on your machine as I described above?

Re: Getting users Username

drobins — Tue, 13 Sep 2005 20:28:35 GMT

if the jscript works should the vbscript work?

do i need to have anything special installed for the vb version to work?

Re: Getting users Username

vt_asparagus — Tue, 13 Sep 2005 20:27:12 GMT

Bummer that worked for me when I threw that into an OnLoad event.

This one also works for me...after that I am not sure I know what else will work.

Dim sUserName
sUserName = CreateObject("Wscript.Shell").Environment("Process").Item("UserName")
XDocument.UI.Alert(sUserName)