Delete

Applies to:

Description

Deletes the current record and returns, as an Integer value, the Pervasive PSQL status code.

Syntax

object.Delete 
 



  

  
    
 

Part


    
 

Description



  
    
 

object


    
 

Required. Represents an object expression that evaluates to an object in the Applies To list.

Remarks

This method attempts to delete the current record from the file associated with object, and returns the Pervasive PSQL status code from the operation. A return value of zero indicates success.

---

Note
The ActiveX controls will attempt to do a GetNext operation following a Delete in order to maintain a valid currency.

---

Example

Dim stat As Integer 
VAccess1.IndexNumber = 1 'msa_desc 
VAccess1.FieldValue("msa_desc") = Text1.Text
stat = VAccess1.GetEqual 
	If stat = 0 Then
   stat = VAccess1.Delete
   If stat = 0 Then
      MsgBox "Deleted!"
   End If
Else
   MsgBox "Could not locate requested city"
End If