Mailinglisten-Archive |
Hallo, ich habe mit hilfe von www.google.de = folgenden Schnipsel im internet gefunden: >Ich habe in meiner Delphi-Kiste rumgew=3DFChlt und folgendes gefunden: >-------------- > >uses activeX,comobj,shlobj; > >const > IID_IPersistFile: TGUID =3D3D=3D20 >(D1:$0000010B;D2:$0000;D3:$0000;D4:($C0,$00,$00,$00,$00,$00,$00,$46)); > > >function CreateLink(lpszPathObj,lpszPathLink,lpszDesc:string):Boolean; >var psl : IShellLink; > ppf : IPersistFile; > >begin > result :=3D3D False; > if SUCCEEDED(CoCreateInstance(CLSID_ShellLink, nil,=3D20 >CLSCTX_INPROC_SERVER, IID_IShellLinkA, psl)) then begin > psl.SetPath(PChar(lpszPathObj)); > psl.SetDescription(PChar(lpszDesc)); > if SUCCEEDED(psl.QueryInterface(IID_IPersistFile,ppf)) then begi= n > ppf.Save(StringToOLEStr(lpszPathLink),TRUE); > Result :=3D3D true; >// ppf._Release; ---> Runtime-Error wenn aktiv > end; > end; >// psl._Release; ---> Runtime-Error wenn aktiv > end; > >--------------------------------------- > >Mit PHP wirst DU wohl keine Chance haben. Oder hat PHP Zugriff auf die A= PI=3D >=3D20 >von Windows ? > > Dazu meine Frage / Bitte: ich habe kein Delphi und keine Ahnung von Windows-Systemnaher Programmierung, ich schreibe Windows-Programme in Java oder als Shell-Scripte kannst du mir ein executable erzeugen, mit dem man =FCber die Shell .lnk-Dateien erzeugen kann, so nach dem Motto | |DOS-PROMPT> lnk_gen <beschreibung> <filename> <working-directory> <iconfile>,<iconNr> |link generated: |<beschreibung>.lnk points to <filename> | |DOS-PROMPT> _ | Oder gibt es das schon, und ich habe es nur noch nicht gefunden? Vielen Dank im Voraus, = Andreas M=F6ller. -- Andreas Moeller, Bremersweg 46c, 26129 Oldenburg = Telefon: +441 591253 = E-Mail:Andreas.Moeller_(at)_Informatik.Uni-Oldenburg.DE
php::bar PHP Wiki - Listenarchive