使用 php 更新 Visual FoxPro DBF

Question

我正在使用 php 使用 ADO COM 更新 VFP 9.0 下的一些表。

我可以选择并更新 DBF，直到指定任何 Where 子句。
当我向查询添加 where 子句时，它仅返回或更新 0 行。

$conn = new COM("ADODB.Connection");
$conn->Open('Provider=VFPOLEDB.1;Data Source="C:\\testDB.dbc";'); 

$query = "UPDATE TABLE1 set COL1 = \"AA\", COL2 = \"Updated value\" ";
$conn->Execute($query);

$query = "SELECT * FROM TABLE1 ";
$rs = $conn->Execute($query) or die("Error in query: $query. " . $conn->ErrorMsg());
while (!$rs->EOF) {
    echo " Got COL1: " . $rs->Fields("COL1") . " :: COL2: " . $rs->Fields("COL2") . " id: " . $rs->Fields("ID") . "\n";
    $rs->MoveNext();
}

结果：

 Got COL1: AA :: COL2: Updated value                  id: 0
 Got COL1: AA :: COL2: Updated value                  id: 1
 Got COL1: AA :: COL2: Updated value                  id: 2

代码2：WithWhere子句

$query = "UPDATE TABLE1 set COL1 = \"BB\", COL2 = \"NEW2\" WHERE ID = 1";
$conn->Execute($query);
$query = "SELECT * FROM TABLE1 ";
$rs = $conn->Execute($query) or die("Error in query: $query. " . $conn->ErrorMsg());
while (!$rs->EOF) {
    echo " Got COL1: " . $rs->Fields("COL1") . " :: COL2: " . $rs->Fields("COL2") . " id: " . $rs->Fields("ID") . "\n";
    $rs->MoveNext();
}

结果：

 Got COL1: AA :: COL2: Updated value                  id: 0
 Got COL1: AA :: COL2: Updated value                  id: 1
 Got COL1: AA :: COL2: Updated value                  id: 2

ID列是上表中的键。

我对 VFP 还比较陌生。我不确定这是否是 Visual Foxpro 设置或其他阻止更新的设置或选择是否有选择地完成。

Answer 1

您使用的标准 SQL 样式语句很容易与 VFP 兼容。尽管您的示例很简单，但我会先尝试稍作修改。不要使用转义“，只需在示例中使用单引号，例如

UPDATE TABLE1 set COL1 = 'AA', COL2 = 'Updated value' where ID = 1

看看这是否有任何作用。一旦起作用，我就会去参数化查询以确保安全......特别是当基于 Web 的 VFP 不能像其他数据库那样使用“命名占位符”时，但使用“？”来使用基于序数的占位符。应该在哪里应用您的“值”...例如

UPDATE TABLE1 set col1 = ?, col2 = ? where id = ?

然后，在添加参数时，根据与占位符相同的顺序添加

YourAdo.Parameters.Add( "ForColumn1", variableForColumn1 );
YourAdo.Parameters.Add( "ForColumn2", variableForColumn2 );
YourAdo.Parameters.Add( "IDKeyColumn", variableForID );

然后，您应该很

抱歉，我无法专门帮助您了解 PHP，因为这不是我直接熟悉的，但应该可以帮助指导您。