实验题目建立工作空间和应用实验时间实验地点实验成绩实验性质□验证性□设计性□综合性教师评价：□思路正确□内容完整□方案过程正确□实验结果正确□报告规范其他：一、实验目的1.学会创建ODBC数据源2.练习建立工作空间、应用及窗体3.使用PB连接ASA数据库4.练习对数据窗口的简单操作二、实验主要内容和要求1．建立数据源2.建立工作空间，创建ODBC数据源后能连接数据源建立应用3.1.．应用数据窗口对数据库进行查询。三、实验主要步骤或过程1.点击“文件”，新建一个“workspace”，如下图所示：2.新建一个“Application”，如下图：3.命名刚刚新建的“Application”我命名的是“app”4.新建一个“window”并重新命名，然后保存，如下图所示：5.双击刚刚新建的“Application”，在“open”事件中输入以下代码：“//SQLCA是PowerScript内置的事务对象SQLCA.DBMS="ODBC"//设置数据库连接方式SQLCA.AutoCommit=False//SQL语句在程序中执行后，是否自动提交到数据库SQLCA.DBParm="ConnectString='DSN=xjt;UID=DBA;PWD=sql'"//数据库连接字符串connectusingSQLCA;//开始连接ifSQLCA.sqlcode<>0then//连接失败，弹出错误提示框messagebox("提示！","连接数据库失败原因"+SQLCA.sqlerrtext)returnelse//连接成功，打开主窗口messagebox("提示！","连接数据库成功")open(mywindow)endif”按快捷键“Ctrl+R”运行这表示代码运行成功。这就是我们建的“Window”6.新建一个“DataWindow”选择“Grid”→“QuickSelect”7.连接到数据库后，选择如下图所示几项，点击“OK”→“next”→“finish”8.返回到工作区间，如下图所示：然后保存这个数据窗口，并进行命名，如下图：9.双击刚才新建的“Window”并将，数据窗口拖进其中，如图示：注意图中被红笔标示出来的地方，那是是mydatawindow在mywindow中的实例名。10.双击“Window”中的空白处，在Window的open事件中输入以下代码“//mydw是mydatawindow在mywindow中的实例名dw_1.SetTransObject(SQLCA)//为数据窗口myDW设置事务对象dw_1.Retrieve()//读取数据”如下图所示，然后运行，结果如下：运行刚才的代码所得结果11.添加控件。点击“A”，选定其位置，并将其命名为“学生姓名”，如下图所示：点击选定位置，用以输入姓名，点击，选定位置后将其命名为“查询”最终结果如下：12.双击“查询”，输入查询控件代码，如下图所示：运行代码，结果如下：在文本框中输入“杨二”点击查询，结果如下：至此实验结束！四、实验结果创建ODBC数据源后连接数据源建立应用成功并能应用数据窗口对数据库进行查询。五、实验分析或总结此次实验操作较多但收获也更多，我学会了创建数据源后连接数据源并建立应用，能应用数据窗口对数据库进行简单操作。