Thanks, that worked. But Now I hit another snag, when I email this form the computer name text box shows empty but it was there when I sent the form. This the script in my form for the text box.
Function Item_Open()
set TextComputerName = Item.GetInspector.ModifiedFormPages.Item("Message").Controls( "TextComputerName")
Set wshShell = CreateObject( "WScript.Shell" )
strComputerName = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
TextComputerName.value = strComputerName
End Function
suemvp wrote on Fri, 11 December 2009 17:11
> You can get the computer name using an environment variable:
> Set wshShell = CreateObject( "WScript.Shell" )
> strComputerName = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
> > Sue Mosher
> > >
> "Daniel" <donotreply2me[at]yahoo[dot]com> wrote in message
> news:uQJ3g5qeKHA.5020@TK2MSFTNGP02.phx.gbl...
> > How do I grab the computer name and place it in a textbox in a custom form
> > on outlook 2003?.