ASA Programming Guide
  The OLE DB and ADO Programming Interfaces
    ADO programming with Adaptive Server Anywhere

Executing statements with the Command object

This section describes a simple routine that sends a simple SQL statement to the database.

Sample code 

You can try this routine by placing a command button named Command2 on a form, and pasting the routine into its Click event. Run the program and click the button to connect, display a message on the database server window, and then disconnect.

Private Sub cmdUpdate_Click()
    ' Declare variables
    Dim myConn As New ADODB.Connection
    Dim myCommand As New ADODB.Command
    Dim cAffected As Long
    ' Establish the connection
    myConn.Provider = "ASAProv"
    myConn.ConnectionString = _
      "Data Source=ASA 9.0 Sample"
    myConn.Open

    'Execute a command
    myCommand.CommandText = _
    "update customer set fname='Liz' where id=102"
    Set myCommand.ActiveConnection = myConn
    myCommand.Execute cAffected
    MsgBox CStr(cAffected) +
   " rows affected.", vbInformation

    myConn.Close
End Sub

Notes 

After establishing a connection, the example code creates a Command object, sets its CommandText property to an update statement, and sets its ActiveConnection property to the current connection. It then executes the update statement and displays the number of rows affected by the update in a message box.

In this example, the update is sent to the database and committed as soon as it is executed.

For information on using transactions within ADO, see Using transactions.

You can also carry out updates through a cursor.

For more information, see Updating data through a cursor.