Is it possible to convert the following in to SQL syntax?

what i mean is that it should use a 'query'.

VB Code:
  1. With Adodc1.Recordset

  2.             .AddNew

  3.             .Fields("FirstName") = UCase(txtFName.Text)

  4.             .Fields("LastName") = UCase(txtLName.Text)

  5.             .Fields("Claim") = txtClaim.Text

  6.             .Fields("MCO") = UCase(txtMCO.Text)

  7.             .Fields("AuthStart") = txtAuthStart.Text

  8.             .Fields("AuthEnd") = txtAuthEnd.Text

  9.             .Fields("Provider") = UCase(txtProvider.Text)

  10.             .Fields("Sessions") = txtSessions.Text

  11.             .Update

  12.         End With