连编后程序不运行
cc=sys(16)
start=at(":",cc)-1
cend=rat("\",cc,1)
set default to (substr(cc,start,cend-start+1))
_screen.visible=.f.
set talk off
set sysmenu to
do form 登录
Read Events

https://bbs.bccn.net/thread-345967-1-1.html