Alterar Bd No Momento Da Impressao

[Guest Aleinfo]

Quero alterar um campo da tabela ao imprimir.

mas ele informa que esta entre o Inicio e o Fim da Tabela.

rs1.Close
 'Abertura de Dados

 rs1.Open "SELECT * FROM comanda WHERE codigocomanda LIKE '%" & lstmostra.SelectedItem & "%'  ", cn, adOpenDynamic, adLockReadOnly
 rs2.Open "SELECT * FROM contconf WHERE codigocomanda LIKE '%" & lstmostra.SelectedItem & "%'  ", cn, adOpenDynamic, adLockReadOnly

 Printer.FontName = "Arial"
 Printer.FontSize = "10"
 tamanhofolha = Printer.ScaleHeight - 1440

 rs1.MoveFirst
 rs2.MoveFirst
 contapagina = 0
 Call cabecalho1

Do While Not rs1.EOF
  
  If Printer.CurrentY >= tamanhofolha Then
     Printer.NewPage
     Call cabecalho1
  End If
  
  '-------------------------------------------
  Printer.Print Tab(0); rs1("quantidade");
  Printer.Print Tab(14); rs1("codigodoproduto");
  Printer.Print Tab(26); rs1("descricaodoproduto");
  Printer.Print Tab(76); Format(rs1("valorunitario"), "currency");
  'Printer.Print Tab(85); rs("valortotal")
  '--------------------------------------------
  'soma = soma + rs("valortotal")
'  If rs!impresso = " " Then
     rs.Update 'Cria um novo registro
     rs.Fields("impresso").Value = "S"
     'rs.Update "impresso = "S"
 ' End If
  rs1.MoveNext

Loop
Printer.Print
Printer.Print

Call linha
Printer.Print
Printer.Print
Printer.Print

Printer.Print Tab(0); "-----------------------------------------------------------------                                " '; soma
Printer.Print Tab(0); "                         Assinatura do Comprador      "
Printer.Print
Printer.Print

[Graymalkin]

O método Update *não* cria um registro novo (para isso é o método AddNew), e este método deve ser chamado *depois* de ter sido feito o preenchimento do campo (para atualizar o registro), ou seja, *depois* do 'rs.Fields("impresso").Value = "S"'.

Abraços,

Graymalkin

[Guest Aleinfo]

O registro ele já existe é ao imprimir que ele deve atualizar o registro. Existe um campo que quero que seu status seja alterado para Impresso "S", quando o docto for impresso.

[Graymalkin]

O registro ele já existe é ao imprimir que ele deve atualizar o registro. Existe um campo que quero que seu status seja alterado para Impresso "S", quando o docto for impresso.

Então, é só fazer o que eu falei.

Abraços,

Graymalkin