thanks emg, thanks ninoslav:

this works,
CREATELINK(ALLTRIM(GetEnv('USERPROFILE'))+'\Desktop\JSON_OUT.LNK', diskname()+':\tax\gst\taxinvoice.exe')
it auto created an icon on the desktop, from within my app.
in 'Target' it shows E:\TAX\GST\TAXINVOICE.EXE

but the 'Start In' remains blank. (in the auto created JSON_OUT.LNK)
how to ALSO auto-fill the 'Start In' (with the drive,folder of the .exe file. i.e.: diskname()+':\TAX\GST')

i tried
oLink:Start=diskname()+':\TAX\GST'
oLink:StartIn=diskname()+':\TAX\GST'
oLink:StartInPath=diskname()+':\TAX\GST'

but none works. it crashes.

FUNCTION CREATELINK(C1,C2)
*********************************
BEGIN SEQUENCE
oShell=CREATEOBJECT("WScript.Shell")
oLink=oShell:CreateShortCut(C1)
oLink:TargetPath=C2
oLink:Save()
END SEQUENCE

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)

googled and got it... ('Start In')
olink:WorkingDirectory=

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)