
подскажите как выполнить update запросом к базе, т.е.
имею форму с текстбоксами с информацией для обновления,
затем , наверное, надо установить соединение
Private Sub Command1_Click()
str_name = Text1.Text
ssSQL = "Update firma SET firma_name = 'str_name' where id_firma = " & text_id.Text
Set cn = New ADODB.Connection
cn.Open "DSN=BASE"
Set rs = New ADODB.Recordset
rs.ActiveConnection = cn
как выполнить апдейт??