database - Visual FoxPro 多表窗体

Question

我刚开始在学校使用 FoxPro，当我尝试创建一个需要将数据添加到多个表(没有设计器)的表单时遇到了一些问题。

我正在使用 APPEND 命令，但这似乎只向主表添加数据。

非常感谢任何有关解决方案的建议。

谢谢

Answer 1

在进行追加之前，您需要明确选择工作区(别名或表)。例如，在您的“点击”事件中，您会做类似...

SELECT FirstTableName
append blank
replace FieldW with "something",;
        FieldX with 1.23,;
        FieldY with SomeVariable,;
        FieldZ with Thisform.SomeTextbox.Value

SELECT SecondTableOrAlias
append blank
replace FieldA with Thisform.AnotherTextbox.Value,;
        FieldB with Thisform.SomeCheckBox.Value

SELECT ThirdTableOrAlias
append blank
replace ...

如果表尚未从表单的数据环境中打开，您可能希望在执行上述追加/替换之前先执行以下操作以确保它们已打开

if not used( "FirstTableName" )
   select 0
   use FirstTableName
ENDIF 

if not used( "SecondTableOrAlias")
   select 0
   use SecondTableOrAlias
endif 

等...

此外，VFP 也支持 SQL，因此您可以这样做

insert into FirstTableName ;
   ( FieldW,;
     FieldX,;
     FieldY,;
     FieldZ ;
   );
   values ;
   ( "something",;
     1.23,;
     SomeVariable,;
     Thisform.SomeTextbox.Value ;
   )

并通过SQL-Select查询出数据

select * from FirstTableName ;
   where FieldW = "something" ;
   into cursor C_SomeTempResultSet READWRITE