Hejsan.. Leta reda på dir-funktionen och kolla på exemplet i hjälpen, dr finns det exempel där de loopar igenom en katalog. Vid det första dir'et så skall det stå *.lnk som sträng. det låter lite krångligt Hej. Här finns förklaring och exempel till "Shell"app.path exe
Jag sitter i en fundering på att göra ett program som ska
kunna fungera lika en quickbar..
Så hur gör man för att via en knapp få igång ett program..
Meningen är att inte hårdkoda genvägarna annars så vore det inga problem
utan att man kan göra egna genvägar
så en app.path funktion
iconfunktion och en caption funktion...
Tror lite dumt att det ska kunna vara enkelt men har kört fast..
Någon som har något bra exempel som skulle kunna hjälpa migSv: app.path exe
Sedan får du ta och undersöka en genväg med en hexeditor och se hur den är uppbyggd. Plocka sedan reda på var själva ikonen börjar och hur lång den strängen är etc. så har du ikonen fixad. Du får öppna varje genväg i binary och först köra seek#filenum, position och sedan köra input-funktionen för ett visst antal tecken. Borde fungeraSv: app.path exe
försöker mera med en app.path funktion som hämtar från en textbox som man lägger i länken till programet och på så vis sätta funtkonen på knappenSv: app.path exe
Antar att du är ute efter shell functionen:
x=shell("hela sökvägen\program")
/StefanSv: app.path exe
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html/vafctshell.asp
//
Janne