|
VAccess
現在のレコードを現在のデータ バッファーの内容で更新し、Pervasive PSQL ステータス コードを整数値で返します。
Update メソッドの構文は次のような要素で構成されます。
このメソッドは object に関連付けられているファイルの現在のレコードを現在のデータ バッファーの内容で更新し、そのオペレーションの Pervasive PSQL ステータス コードを返します。戻り値がゼロであれば正常に実行されています。
戻り値が 5 の場合は、ファイルに定義されている重複値を許可しないキーに対して使用されているデータ バッファー内のフィールドが、ファイルに既存の別のレコードと同じ値を含んでいるため、レコードを更新できなかったことを示します。戻り値が 80 の場合は、矛盾が発生したことを示します。つまり、そのレコードは読み込まれた時点から Update メソッドが呼び出された時点までの間に、別のプロセスによって更新されているということです。
NNC(no-currency-change:カレンシー変更なし)操作を行いたい場合は、「KeyNumber」 プロパティを使用します。
'レコードを検索し、会社名を変更して、レコードを更新する '検索値を設定する Customers.FieldValue("name") = "John Harbison" 'インデックスを設定し、検索を実行する Customers.IndexNumber = 1 Customers.GetEqual 'レコードが存在する場合は、会社名を変更して、 'レコードを更新する Select Case Customers.Status Case 0 Customers.FieldValue("company_name") = _ "Harbison Consulting" Customers.Update Case 4 MsgBox "Record not found." Case Else MsgBox "Error. Pervasive PSQL status = " + _ Customers.Status End Select
|