首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

VFP数据环境的属性用命令写,该如何处理

2012-02-19 
VFP数据环境的属性用命令写VFP数据环境的属性用命令怎么选写啊???要什么命令??[解决办法]THISFORM.DATAENV

VFP数据环境的属性用命令写
VFP数据环境的属性用命令怎么选写啊???
要什么命令??

[解决办法]
THISFORM.DATAENVIRONMENT.属性名
如:
THISFORM.DataEnvironment.AutoOpenTables=.t.
[解决办法]
写在INIT里
[解决办法]
FORM的INIT主要代码如下:
ThisForm.DataEnvironment.CloseTables()
ThisForm.DataEnvironment.AddObject( 'Cursor_ '+ 'd_shd ', 'cursor ')
oCursor1=Evaluate( 'ThisForm.DataEnvironment.Cursor_ '+ 'd_shd ')
oCursor1.CursorSource= 'd_shd '
oCursor1.Alias= 'd_shd '
oCursor1.Exclusive=.T.

ThisForm.DataEnvironment.AddObject( 'Cursor_ '+ 'd_ckgl ', 'cursor ')
oCursor2=Evaluate( 'ThisForm.DataEnvironment.Cursor_ '+ 'd_ckgl ')
oCursor2.CursorSource= 'd_ckgl '
oCursor2.Alias= 'd_ckgl '
ThisForm.DataEnvironment.OpenTables()
oCursor2.Exclusive=.T.

SELECT( 'd_shd ')
ZAP
SELECT( 'd_ckgl ')
ZAP

热点排行