VFP 愛用者社區

kib48660 · 註冊時間: 2003-02-24 文章: 121 第 1 樓

下列方式,在WIN7 以前作業系統皆沒有問題,但到了WINDOW SERVER 2008 R2 就
失效了,請問是否有別的方法可行
DECLARE INTEGER ShellExecute IN shell32;
INTEGER hwnd,;
STRING lpOperation,;
STRING lpFile,;
STRING lpParameters,;
STRING lpDirectory,;
INTEGER nShowCmd
AA=ALLTRIM(THIS.PICTURE)
*AA1= ALLTRIM(SYS(5))+ALLTRIM(SYS(2003))+"\IMAGES\"+AA

=ShellExecute(0,"Open","&AA","","",0)
RELEASE DLLS "ShellExecute"