main.prg

本系统是典型的小型数据库管理系统,其中涉及开发数据库程序的一些细节!登录时,请选择"管理员"!密码为:88888888,建议分辨率:800*600.相信您会从中得到一些收获

clear screen
clear events
set talk off
public lcdir
lcdir=sys(2003)
do lcdir+'\progs\setting'
_screen.picture=lcdir+'\graphics\6_m.jpg'
on shutdown quit
_screen.autocenter=.t.
_screen.windowstate=2
_screen.controlbox=.t.
open database lcdir+'\data\salary_adm.dbc'
do form lcdir+'\forms\welecome.scx'
read events
do lcdir+'\progs\reset'