PB简单应用——连接数据库简单操作

1．打开sybase数据库，选择工具---创建数据库，弹出创建数据库向导，选择数据库保存位置，如下图：
单击完成，成功创建数据库，如下图：
2．右键单击“表”，选择新建表，在弹出的对话框中填入表名，并点击完成，创建一个表，如图所示：
3.在主键中填上“ID”，其标示城市编号，选择数据类型。

在空白处右键单击，选择新建——列，新建一列，并填入相应的值，如下图所示：
保存后，点击“数据”选项
3．在空白处右键单击，选择新建行，向表中添加适当的内容，如下图：
保存数据库。

4．在开始中打开SQL anywhere ODBC管理器，点击添加按钮，选择anywhere10，点击完成。

弹出如图所示的对话框：
在数据源名中填入刚才建的数据库名：test，单击数据库选项卡，点击浏览找到test数据库文件并选取，进入登陆选项卡，填入相应的ID和口令（预先设定好的数据库口令），单击确定，添加数据库。

在ODBC管理器中选择刚才添加的数据库，点击配置，点击测试连接，测试器连接是否成功。

点击确定完成连接。

5．打开PB，选择new workspace，取文件名：city，点击保存。

6．在新建的workspace上右键单击，选择NEW 打开其对话框，如图：
选择Application单击OK。

7选择左侧窗口的cityintroduce双击，在右侧打开的界面中，输入以下代码：
//profile psi
SQLCA.DBMS="ODBC"
SQLCA.AutoCommit=False
SQLCA.DBParm="connectstring='DSN=test;UID=dba;PWD=sql'"
CONNECT;
if SQLCA.sqlcode<>0 then
messagebox("提示","数据库连接失败!")
else
open (w_city)
end if
其作用是判断数据库是否连接成功。

效果如图(完成8后的效果)：
8. 在项目上右击选择new_PB Object ---window,OK确定，在窗体中拖放一个文本显示组件和两个按钮组件，命名默认，按钮的TEXT分别填入：show和close。

双击文本显示组件9.在项目上右击选择new——DataWindow——Grid点击OK，SQL Select，下一步，选择test数据库确定。

完成后，在打开的窗口中，选取ID，name，people三项，关闭此窗口，在弹出的窗口中点击下一步，完成，弹出一个新的窗口，如图：保存并命名d_city
可以拖动中的线条改变每部分的显示比例。

10．双击w_city,选择文本显示框，在右侧的属性中，选侧DataObject，选侧d_city，保存，效果如下图。

双击close按钮在其中输入close（w_city）以关闭窗口。

11．点击运行，单击show按钮，效果如下图：。