以前接触过,有点遗忘了,最近刚好用到,所以就整理出来了,以防以后用到或者给像我一样的朋友分享一点点经验,所以写到博客里吧,不是原创,都是大神们分享的
可以通过application open事件的commandline判断运行状态
gl_web = of_parseCommand(commandline)
//注册satrda smart odbc driver
SATODBC_Install(true)
open(w_login)
//这是预编译处理,如果编译成webform则触发内部
#end if
//检测运行环境0为开发环境
if handle(getapplication()) <> 0 then
if ( gl_web > 0 ) then
n_api.SatWebApp_Attach( gl_web, handle(this), 1)
else
messagebox("错误提示","请在浏览器中通过地址访问",Stopsign!)
halt close
end if
end if
这是调用的only大大的satrda的cs程序通过附加方式在浏览器运行
稍做整理,以备以后查看