Jump to content
Fórum Script Brasil
  • 0

Duvidas Com Recordset


tsarri
 Share

Question

salve galera beleza??

seguinte eu fiz um select que traz todos os id de cheque pra mim e valores deste mesmo cheques ele esta printando assim:

Id: 55 - Valor R$ 5,00 - Id: 56 - Valor: R$ 5,00 e ect

eu queria fazer um loop que mostrasse assim

Valor R$ 5,00 - Id: 55, 56, 57

Valor R$ 10,00 - Id: 80, 85 e ect

alguém pode me dar uma luz para fazer isto??

olha o meu codigo aí gente

<%

SqlIdCheque = "Select est.numero_cheque, est.valor_cheque "_

& " From cheques_estoque est Join Cheques_emissao emi "_

& " On emi.id_cheque = est.id_cheque "_

& " Where emi.codigo = " & Rsdados("codigo") & " "_

& " AND emi.data_emissao between '" & data_ini & "' and '" & data_fim & "' "

Set RsIdCheque = cnbanco.Execute(SqlIdCheque)

While Not RsIdCheque.EOF

%>

<strong>

<%=FormatCurrency(CDBL(RsIdCheque("valor_cheque")))%> -

</strong>

<%

Response.Write(RsIdcheque("numero_cheque") & ". ")

RsIdCheque.MoveNext

Wend

%>

vlw

Link to comment
Share on other sites

3 answers to this question

Recommended Posts

  • 0

o problema é que eu estou usando dois recordset dentro de um loop assim oh:

While Not Rs.EOF

1º recordset = "Select distinct valor from tabela"

while

Valor = <% rs=valor %>

Id =

2º recordset

Select id valor from tabela where valor = (rs1=valor)

while

rs2(id)

end while

<br>

end while

Rs.MoveNext

Wend

---------------------

aí esta apareçendo este erro no 2º recordset que seria este:

Select id valor from tabela where valor = (rs1=valor)

Erro de tempo de execução do Microsoft VBScript erro '800a01ca'

A variável usa um tipo de automação sem suporte no VBScript

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      150.8k
    • Total Posts
      648.8k
×
×
  • Create New...