comm = "run /n start " + filename on selection bar ... &commOr:
on selection bar ... run start /n &filenameYour code can be simplified in some places, too.
seek('O') i=1 do while(AsbDoc.ad_menu='O') DEFINE BAR i of oth PROMPT AsbDoc.ad_label comm=alltrim(AsbDoc.ad_command) ON SELECTION BAR i of oth &comm i=i+1 skip enddoCan be simplified with a SCAN loop:
seek('O') i=1 scan while(AsbDoc.ad_menu='O') DEFINE BAR i of oth PROMPT AsbDoc.ad_label comm=alltrim(AsbDoc.ad_command) ON SELECTION BAR i of oth &comm i=i+1 endscanOr the following:
go top DO WHILE !EOF() recno=recno() replace AsbDoc.ad_command with 'do txt with '+ alltrim(str(recno)) SKIP ENDDOcan be changed to a single REPLACE command:
replace all AsbDoc.ad_command with 'do txt with '+ alltrim(str(recno()))>Hi Hilmar,