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"