- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
pb实验步骤
建立数据库。
启动powerbuilder(pb)——单击database图标按钮——Select Tables 的Cancel——file——create database(数据库名:employee。Browse为数据库的存储路径)——ok。(密码和用户名要知道)
建立数据库中的表。
Table图标——写明字段名、类型、长度、是否为空。——save(保存,table name:emp)——ok——close
定义关键字:右键表emp——property——primary key——点击emp_id——ok(设置sex编辑风格等)
数据的装入:DB Administration——输入:insert into emp values(
101,
刘然,
01,
吉林,
女,//或者0,1
1970/09/02,
副经理,
3200,
出生于吉林市,93年参加工作,毕业于人民大学。
);
——exceute图标——也可以保存表save图标。——return按钮返回。
还可以利用data manipulation(grid)等3个图标进行手动添加,删除,插入信息。
3 创建应用。
单击application图标——file——new新建应用保存路径,名字:pbtutor。——no
Window图标——new新建——标题设为“welcome”,类型:response——拖拽三个静态文本框(static text)两个单行编辑器(single line edit)两个按钮(commond button):其中:文本框名字:st_welcome,st_userid,st_passwd.。两个编辑器名:sle_userid,sle_passwd。两个按钮名:cb_ok,cb_cancel。修改窗口顺序:design——tab order。预览窗口:preview图标——save——窗口名:w_welcome。
回到应用程序窗口——script图标——open事件:open(w_welcome)可以运行试试。
4 连接数据库:
为w_welcome编写窗口函数:打开w_welcome窗口——declare——widow function——new——名字:wf_dbconnect(public类型,返回类型:Integer类型。两个参数:第一个名字:userid类型: string。Value值。第二个名字:passwd。String类型,value值)——ok——代码编写(数据库连接):(可以验证密码和用户名)
string ls_userid,ls_passwd,ls_dbparm
ls_userid=trim(userid)//去掉字符串userid和passwd的前后空格
ls_passwd=trim(passwd)
ls_dbparm=ConnectString=DNS=employee;
SQLCA.DBMS=ODBC
SQLCA.DbParm=ls_dbparm+UID+ls_userid+;PWD=+ls_passwd+
connect;
return SQLCA.SQLCode
打开w_welcome窗口——在ok按钮右键——script——clicked——代码编写:
if parent.wf_dbconnect(sle_userid.text,sle_passwd.text)=-1 then
MessageBox(database connect error,unable to connect.+sqlca.sqlerrtext)
halt
else
close(parent)
end if
cancel按钮——script——代码:halt close
在窗口的close事件添加:disconnect using sqlca;
5 创建菜单
单击menu图标——new。在Menu bar items下输入:系统功能,名字:m_functiong。右击系统功能左边——“退出”,名字:m_exit。
点击系统功能——menu for中写:“数据录入与更新”,名字:m_input。下一子菜单写:“数据查询”,名字:m_query。
再为数据查询创建级联菜单:选中“数据查询”——单击工具条的next level图标——写“按姓名查找”,名字:m_namequery、——点击工具条上的prior level图标返回。——close——保存名为:m_main
连接菜单与窗口:新建一个窗口,窗口类型为MDI MicroHelp,menu name:m_main。Position属性中选择maximized最大化。
在w_welcome窗口的Ok按钮的clicked脚本增加代码:open(w_main)
6 数据窗口
建立第
文档评论(0)