GetShellCommand Linkfunctie

Met GetShellCommand kan de padnaam en argumenten van een geregistreerde applicatie opgevraagd worden. De functie resulteert in de waarde TRUE indien succesvol en anders FALSE.

GetShellCommand(ColumnOrStringName,AppNameOrExt,AppCommand)

ColumnOrStringName
(MergedString)
In ColumnOrStringName wordt de naam van een kolom of een string vermeld in de vorm van een ColumnName of een StringVarName waar naar toe de padnaam en eventuele generieke argumenten van de applicatie moeten worden gekopieerd.

AppNameOrExt
(MergedString)
In AppNameOrExt kan de naam van een applicatie, een bestandsextensie of beide worden opgegeven. Indien beide worden opgegeven dan dient eerst de applicatienaam, gevolgd door het | teken en dan de bestandsextensie te worden vermeld. De bestandsextensie wordt vermeld inclusief de punt op de eerste positie indien van toepassing. De bestandextensie zonder punt kan slaan op een algemeen commando zoals MailTo. Indien beide worden vermeld dan wordt eerst gezocht naar de applicatienaam en als deze niet wordt gevonden dan wordt gezocht naar de applicatie die hoort bij de gegeven extensie. Per extensie kunnen meerdere applicaties zijn geregistreerd in welk geval GetShellCommand alleen de default of standaard applicatie naar ColumnOrStringName kopieert.

AppCommand(MergedString)
In AppCommand wordt het gewenste commando zoals New, Open, Edit, Print, Printto etc. vermeld.

Voorbeeld:
{
 String sExePath
 GetShellCommand(sExePath,notepad.exe,open)
}
1=[sExePath]
{
 GetShellCommand(sExePath,winword.exe,edit)
}
2=[sExePath]
{
 GetShellCommand(sExePath,excel.exe,new)
}
3=[sExePath]
{
 GetShellCommand(sExePath,.xls,new)
}
4=[sExePath]
{
 GetShellCommand(sExePath,excel.exe|.xlsx,new)
}
5=[sExePath]
{
 GetShellCommand(sExePath,outlook.exe|mailto,open)
}
6=[sExePath]
{
 GetShellCommand(sExePath,mailto,open)
}
7=[sExePath]

Resultaat:
1=C:\WINDOWS\system32\NOTEPAD.EXE %1
2="C:\Program Files (x86)\Microsoft Office\OFFICE11\WINWORD.EXE" /n /dde
3="C:\Program Files (x86)\Microsoft Office\OFFICE11\EXCEL.EXE" /e /n
4="C:\Program Files (x86)\Microsoft Office\OFFICE11\EXCEL.EXE" /e /n
5="C:\Program Files (x86)\Microsoft Office\OFFICE11\EXCEL.EXE" /e /n
6="C:\PROGRA~2\MICROS~2\Office12\OUTLOOK.EXE" -c IPM.Note /m "%1"
7="C:\PROGRA~2\MICROS~2\Office12\OUTLOOK.EXE" -c IPM.Note /m "%1"