|
VAccess
現在のデータ バッファーを新規レコードとして挿入し、Pervasive PSQL ステータス コードを整数値で返します。
Insert メソッドの構文は次のような要素で構成されます。
このメソッドは object に関連付けられているファイルに現在のデータ バッファーを新規レコードとして挿入し、そのオペレーションの Pervasive PSQL ステータス コードを返します。戻り値がゼロであれば正常に実行されています。戻り値が 5 の場合は、ファイルに定義されている重複値を許可しないキーに対して使用されているデータ バッファー内のフィールドが、ファイルに既存の別のレコードと同じ値を含んでいるため、レコードを挿入できなかったことを示します。
NNC(no-currency-change:カレンシー変更なし)操作を行いたい場合は、「KeyNumber」 プロパティを使用します。
'レコードを検索し、そのレコードがない場合には挿入する '検索値を設定する Customers.FieldValue("name") = "John Adams" 'インデックスを設定し、検索を実行する Customers.IndexNumber = 1 '顧客名 Customers.GetEqual 'レコードがない場合には挿入する Select Case Customers.Status Case 0 MsgBox "The customer entry already exists." Case 4 Customers.Insert Case Is > 0 MsgBox "Error. Pervasive PSQL status = " + _ Customers.Status End Select
|