主程序入口：

主程序入口代码：

// Profile ahzbmysql

SQLCA.DBMS = "ODBC"

SQLCA.AutoCommit = False

SQLCA.DBParm = "ConnectString=‘DSN=数据库名称;UID=用户名;PWD=密码‘"

//connect;

fconnectdb()

open(w_test)//默认打开的程序

其中SQLCA要与程序中的表对应

创建新程序时：

首先创建数据对象，方法如下：

建数据对象（数据窗口）：

右击项目根目录选择new

一张表时可以使用快速选择：

选择一张表

需要选择多张表关联时：

同样新建datawindow,选择grid点击ok

选择SQL Select

选择需要显示的数据表，可多选

点击选择需要的字段，选完后关闭窗口，选择是

直接点击next

点击finish

进入下图，多表关联数据窗口建好，点击关闭按钮

关闭是选择是进行保存，在下图中箭头1处填数据窗口如d_weekbcinfo，箭头2处选择保存在哪个项目，左后点击ok即完成

建主程序窗口

首先点击new,选择pb object 中的window如下图所示：

成功后进入下图页面，即程序建好

点击工具栏中按钮性状图标，可选择要加入的控件，常用的有按钮和数据窗口：

例如，选择数据窗口后，在空白处点击，可添加箭头1中的数据窗口，在箭头2处可添加数据来源

加入数据窗口后，右击空白处，选择script，加入下面的语句，有多少个数据窗口加多少代码，括号中字段要和主程序入口中一致，最后保存数据时也要保持一致

dw_1.settransobject(sqlca1)

dw_2.settransobject(sqlca)

常用指令：

弹出cnt1的值：Messagebox("",int(cnt1))

获得第i行的作物名称值zwname = dw_1.getitemstring(i, "t_zb_zwtype_zwname")//多表时要加表名与数据窗口中一样

row=dw_2.insertrow(i)//新添加行数，直接修改不需要此代码

dw_2.setitem(row, "zwname", zwname) //将取的值插入到表二的第i行

使用pb写sql语句：

PowerBuilder笔记