General

Re: How to run .exe file from code?

DaveA — Fri, 24 Jun 2011 09:36:33 GMT

Thank you - it worked! (simple when you know how...)

Re: How to run .exe file from code?

Patrick Halstead — Wed, 22 Jun 2011 07:09:15 GMT

Try setting your form's security permissions to Full Trust (Tools->Form Options->Security->...)

Re: How to run .exe file from code?

DaveA — Tue, 21 Jun 2011 19:58:43 GMT

Hello, I can't get this script to work for me. I have copied and pasted into the correct place in the VBScript code for a button click. I asm using Infopath 2003. I get the error 'ActiveX cannot create the object:'WScript.Shell' Any ideas?

Re: How to run .exe file from code?

trufooser — Thu, 07 Sep 2006 20:00:21 GMT

i usually use jscript, but heres a quick tutorial to switch scripts once you have already chosen a script:

http://support.microsoft.com/kb/828853/en-us?spid=2515&sid=global

Also, is there a way to print out a repeating table, maybe store it in an array and then print out the array?

Thanks.

Re: How to run .exe file from code?

mbenbow — Thu, 07 Sep 2006 11:18:21 GMT

Hey,

I don't see why not! You can create the file with File System Object and use the WriteLine method to enter data into the text file (see above with oTempFile.WriteLine) and instead of hard coding the info for the line, use the XDocument.DOM.selectSingleNode("//my:FieldName").Text

Hope that helps!
MB

Re: How to run .exe file from code?

trufooser — Wed, 06 Sep 2006 19:36:50 GMT

is it possible to pull information from your data fields and insert into the notepad file?

Re: How to run .exe file from code?

mbenbow — Wed, 06 Sep 2006 16:24:05 GMT

Hey,

Here is another one that creates a simple temporary text file and then displays it in Notepad from a button in the form template.

Sub btnCreateTempFile_OnClick(eventObj)
' Write your code here
Const iTempFolder = 2
Dim oFS, oTempFolder, sFile, oTempFile, wshShell
Dim sRun, sTemp

Set oFS = CreateObject("Scripting.FileSystemObject")
Set oTempFolder = oFS.GetSpecialFolder(iTempFolder)
sFile = oFS.GetTempName

sTemp = oFS.GetSpecialFolder(iTempFolder)
If Right(sTemp,1) <> "\" Then
sTemp = sTemp & "\" & sFile
Else
sTemp = sTemp & sFile
End If

Set oTempFile = oTempFolder.CreateTextFile(sFile)

oTempFile.WriteLine "Temp File created on " & Now()

'show it in notepade
Set wshShell = Createobject("WScript.Shell")
sRun = "notepad.exe " & sTemp
wshShell.Run sRun
wshShell.AppActivate "NotePad"
End Sub

Re: How to run .exe file from code?

mbenbow — Wed, 06 Sep 2006 11:20:36 GMT

Hey,

This is a quick example to run the calculator program from a button in InfoPath via VbScript:

Sub btnCalc_OnClick(eventObj)
' Write your code here
Dim wshShell

Set wshShell = Createobject("WScript.Shell")
wshShell.Run "calc"
wshShell.AppActivate "Calculator"
End Sub

Hope that helps,
MB

How to run .exe file from code?

liorlankri — Wed, 06 Sep 2006 07:50:31 GMT

How can I run .exe program from an InfoPath form's code (VBscript)?