选取数据源:
1,Quick Select(快速选择):主要用于从一个表或多个表通过外键连接的表中选择某些数据列,而且这些数据列都是非计算列。
2,Sql Select:主要用于从一个表或多个表中通过SQL语句来选择数据
3,Query:数据来源于一个已经定义并存储的查询之中
4,Stored Procedure:数据来源于数据库中所定义的存储过程
1,连接数据库,建立数据源
--------------------------------------------------------
// Profile pssx 连接数据库
SQLCA.DBMS = "O84 Oracle8/8i (8.x.4+)"
SQLCA.LogPass = 'sjjxc'
SQLCA.ServerName = "pssx"
SQLCA.LogId = "sj"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PBCatalogOwner='sj'"
idw_fzm.settransobject(sqlca) ---set连接对象
SQLCA -------默认连接事物
CONNECT USING SQLCA;
IF SQLCA.SQLCODE <> 0 THEN
HALT
END IF
if sqlca.sqlcode <> 0 then
ls_errtext = sqlca.sqlerrtext
rollback;
messagebox("数据库连接错误" ,ls_errtext)
return;
else
OPen(w_myfirst) -------打开window
CLOSE(w_myfirst)
2.dw控件相关方法调用
-----------------------------------------------------------
a ,数据窗口取值
dw_1.settransobject(ltr_sjjk)
dw_1.retrieve()
b ,add del update
**************************** select
if sle_find.text="" then
ll_findrow=0
else
ll_findrow = dw_grid.find("bmbh='"+ls_bmbh+"'",1,dw_grid.rowcount())
end if
**************************** insert
long ll_insertrow
ll_insertrow = dw_1.insertrow(0)
**************************** delete
long ll_deleterow
ll_deleterow = dw_1.getrow()
dw_1.deleterow(ll_deleterow)
ls_bmmc = dw_grid.object.bmmc[ll_getrow] //获得l