
创建账套是指在会计软件中为企业建立一套符合核算要求的账簿体系,是企业应用会计信息系统的首要环节。在同一会计软件中可以建立一个或多个账套。因此必须设置账套号作为区分不同账套数据的唯一好银标识,账套号必须输入且不能重复。
pb高手进悬赏分:100 - 离问题结束还有 13 天 19 小时
1请说明PB可透过哪些裂中饥方式进行connect database?
2 在PB程序运行中,可否连接多个Database?请试举个例子说明。
3 请写出在程序执行时,如何得到Database 为SQL SERVER,SYBASE 的数据库服务器时间。
4请试说明DataBase Object 与DataBase Control 的特性与差异。
Itemchanged event 是经常使用的Event ,试说明Itemchanged的触发时机及返回值的意义。
5试说明使用PB中使用Sharedata()功能的三项条件。
6请问在Data Window 中要达到奇数行不同颜色,资料新增与存档后栏位颜色不同的功能,该如何处理。
7试说明使用DataStore 与Cursor 时,对程序的性能主要有什么差异。
8请说明PB中可继承的Object 有几种,分别是什么?培搏
9请举例说明如何在程序肆返执行中变换DataWindow的SQL语法(例如动态增加Where判断)。
二 查询系统的制作
制作从键盘输入记录号 可查询到该人的档案记录
①制作查团历询窗口 步骤为 鼠标点按Window图标 新建一窗口 在窗口中 添加一个DataWindow控件 在DataWindow控件上按鼠标右键 选择并单击Properties快捷菜单项 在在Datawindow object name旁按Browse按钮 选择装入前面制作的aaa数据窗口 调整好窗口的大小 再在窗口上放一SingleLineEdit控件 和一CommandButton按钮控件 点中按钮控件并按右键选择Properties 将其显示文本修改为 查询 按钮名称仍为cb_ 点中按钮控件并按右键选择Script… 输入以下脚本
dw_ settransobject(sqlca)
dw_ retrieve(sle_ text)
关闭并保存 按Save图标保存该窗口 窗口取名为aaa
②将查询窗口连接入test应用程序内 点按Application图标 出现test应用程序 双击test 出现名为w_genapp_frame的窗口图标 这是应用程序为我们提供的主窗口的名字 点按w_genapp_frame不放按右键选edit 出现该主窗口 将一按钮控件放入该窗口 按钮显示的文本可改为 唯一查询 也可省略不改 点中该按钮控件并按右键选择Script… 输入 open(aaa) 保存 点按Application图标 再按script图标 出现应用程序的自动生成的主体脚本 部分内容如下 它的任务是将数据库初始化 相当于win ini 假若不要应用程序的模板 则下面的脚本需自己输入 而使用模板后 现在我们只需将//connect 前面的注释号 // 符号删除即可 除省事外还避免了因为排版引起的下面的程序格式错误 (本人经常因为书中个别字母印刷错 或排版引起的程序格式错误造成程序无法运行而痛心不已 )
sqlca DBMS = ProfileString (ls_startupfile database dbms )sqlca database = ProfileString (ls_startupfile database database )sqlca userid = ProfileString (ls_startupfile database userid )sqlca dbpass = ProfileString (ls_startupfile database dbpass )sqlca logid = ProfileString (ls_startupfile database logid )sqlca logpass = ProfileString (ls_startupfile database LogPassWord )sqlca servername = ProfileString (ls_startupfile database servername )sqlca dbparm = ProfileString (ls_startupfile database dbparm )connect
现在按Run图标运行该程序 结果如下图 为简化程序 我们只闷或粗加入了多媒体中的图片字段 成功后 读者可自已增加动画 声音蚂镇字段
讨论 假若多媒体的字段和数据个数比较少 也可用变量和函数来解决 如
temp =temp+ bmp p_ picturename=temp ole_ insertfile( sample avi )run( c:\acdsee exe c:\aa bmp normal!)
lishixinzhi/Article/program/SQL/201311/16400
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)