|
|
Postada em 25/11/2005 14:00 hs
Amigos, por que não funciona as coordenadas no código abaixo ? For i = 1 To rs.RecordCount
Printer.CurrentX = 3.4: Printer.Print rs.Fields("BANCO");
Printer.CurrentX = 9.4: Printer.Print rs.Fields("AGENCIA");
Printer.CurrentX = 13.7: Printer.Print rs.Fields("NUM_CHEQUE");
Printer.CurrentX = 16.4: Printer.Print rs.Fields("VL_CHEQUE");
rs.MoveNext
Next i Printer.EndDoc
Obrigado |
|
|
|
|
|
|
|
Postada em 25/11/2005 14:14 hs
Moreti, Para retornar o número total de registros com o 'RecordCount', vc deve antes MOVER PARA O ÚLTIMO REGISTRO DA TABELA. Depois, mova para o primeiro e use-o no 'loop'. Use 'CurrentX' em conjunto com 'CurrentY'. Joseph
Técnico em Informática/Programador
São Paulo/SP
|
|
|
|
|
|
Postada em 25/11/2005 14:29 hs
While Not rs.EOF Printer.CurrentX = 3.4: Printer.Print rs.Fields("BANCO");
Printer.CurrentX = 9.4: Printer.Print rs.Fields("AGENCIA");
Printer.CurrentX = 13.7: Printer.Print rs.Fields("NUM_CHEQUE");
Printer.CurrentX = 16.4: Printer.Print rs.Fields("VL_CHEQUE") ==> retire o ponto e virgula
rs.MoveNext
Wend Printer.EndDoc
use um WHILE em do FOR
Roberto
roberto@vbweb.com.br
|
|
TÓPICO EDITADO
|
|
|
|
