UPDATE ADO

ALMIRSAFADI 15/02/2011 12:34:50
#365504
Estou iniciando em ado, e não consigo um simples UPDATE, procurei aqui e não encontrei
Dim t2 As String
t2 = Text2
Adodc1.Recordset.Fields([Ô]Nome[Ô]) = t2
Adodc1.Recordset.Update
Está errado, o que está faltando?
ALMIRSAFADI 16/02/2011 08:13:17
#365584
O Fixo seria o que? desculpe a ignorância
ALMIRSAFADI 19/02/2011 17:35:23
#365982
E nã existe a opção de salvar toda a tabela?
TECLA 19/02/2011 17:40:35
#365985
Já que está começando com ADO, comece da forma correta.
Não utilize os CONTROLES VINCULADOS do VB, mas sim a classe ADODB e seus derivados (ADODB.Connection, ADODB.Recordset...)
XXXANGELSXXX 20/02/2011 12:08:59
#366023
Concordo com o Tecla, nao inicie com controles vinculados ( é uma coisa [Ô]simples[Ô] mas é muito porco)trabalhe desvinculado do banco.. a todo momento..

ex de update desvinculado

   
 StrSql = [Ô][Ô] & [Ô]Update cadstatusocorrencias [Ô] & _
                     [Ô]SET stdescricao=[ô][Ô] & txtDescricao.Text & [Ô][ô][Ô] & _
                     [Ô],stativa=[ô][Ô] & chAtivo.Value & [Ô][ô][Ô]
            StrSql = StrSql & [Ô] WHERE idstatus=[Ô] & TDBGrid1.TextMatrix(TDBGrid1.Row, 0)
 With Conexao
                .BeginTrans
                .Execute (StrSql)
                .CommitTrans
            End With


mas veja bem .. com controles vinculados update serve para inserir um dado na tabela sempre que no desvinculado, UPDATE serve para alterar dados da tabela, para vc inserir os dados tem que ser INSERT INTO. assim


  
 StrSql = [Ô][Ô] & [Ô]INSERT INTO cadstatusocorrencias([Ô]
            StrSql = StrSql & [Ô]stdescricao,stativa)[Ô]
            StrSql = StrSql & [Ô] Values ([ô][Ô]
            StrSql = StrSql & txtDescricao.Text & [Ô][ô],[ô][Ô]
            StrSql = StrSql & chAtivo.Value & [Ô][ô])[Ô]
            With Conexao
                .BeginTrans
                .Execute (StrSql)
                .CommitTrans
            End With
Tópico encerrado , respostas não são mais permitidas
Voltar