code20.txt

一个用数据库编写的学生信息管理系统！做课程设计的同学可以做为参考！

程序段20
这段程序用于结束与客户的热连接，常用于窗口的remotehotelinkstop事件中

string item,appl,topic
beep(1)
getdataddeorigin(appl,topic,item)
mle_1.text=("与客户的热连接已被切断，~r~n应用名="+appl+"~r~n &
             主题名= "+topic+"~r~n DDE内容="+item)
respondremote(true)