MSSQL网页设计打印数据库的备注字段
既能够作为一个单独的应用程序应用在客户端服务器网络环境中,也能够作为一个库而嵌入到其他的软件中。打印|数据|数据库*函数称号:MEMOPRN*功效申明:打印数据库的备注字段
*用法申明:MEMOPRN(,,)
*memofld:备注字段称号col:打印肇端列width:打印行宽
*挪用实例:USEDBFNAME
*=memoprg(fieldname,1,40)
*RETURN
*---------------------------------------------------------
FUNCTIONmemoprn
PARAMETERSmemofld,col,width
PRIVATEcheck,memofld,col,width
*--贮存本来的MEMOWIDTH,PRINTER的形态
cur_width=set("MEMOWIDTH")
cur_print=iif(set("PRINTER")="ON",.t.,.f.)
newwidth=min(_rmargin-_lmargin,width)
SETmemowidthtonewwidth
DEFINEboxfromcol-1to(col+newwidth+1)heightmemlines((memofld))+2
DOwhile!printstatus()
WAIT"打印机不是连机形态,请反省并按任一键持续或按ESC键加入";
Windownowait
IFlastkey()=27
SETmemowidthtocur_width&&恢复设置
IFcur_print
SETprinteroff
ENDIF
RETURN
ENDIF
ENDDO
SETprinteron
STORE.t.tobox
*--打印DEfINEBOX设定的边框,体系内存变量BOX需设为.T.
??(memofld)atcol
STORE.f.tobox
*--@col,1say(memofld)
SETmemowidthtocur_width
IFcur_print
SETprinteroff
ENDIF
RETURN这里我们讨论用binlog来实现闪回的方案。 多走走一此相关论坛,多看一些实例开发,多交流0经验,没什么的,我也是刚学没多久!加油 但换公司用MSSQL2K感觉自己好像根本就不了解MSSQL。什么DTS触发器以前根本没用过。 发几份SQL课件,以飨阅者 大侠们有推荐的书籍和学习方法写下吧。 一个是把SQL语句写到客户端,可以使用DataSet进行加工; 代替了原来VB式的错误判断。比Oracle高级不少。 对递归类的树遍历很有帮助。个人感觉这个真是太棒了!阅读清晰,非常有时代感。 这一点很好的加强了profiler的功能。但是提到profiler提醒大家注意一点。windows2003要安装sp1补丁才能启动profiler。否则点击没有反应。
页:
[1]