Me Ajudem

[rcnery]

Pessoal,

Não sie o que esta acontecendo sempre que chamo uma coluna do BD (access) definada como numero para loop a variável assume o primeiro valor e depois não altera mais.

O que eu to fazendo errado?

' Open Recordset

Set resulRS = Server.CreateObject("ADODB.Recordset")

resulRS.ActiveConnection = Con

resulRS.Open "Select * FROM exporesul WHERE resultidexpo = '" & idexpo & "' ORDER BY resultidgrupo"

While not resulRS.EOF

resultiddog = resulRS ("resultiddog") ' Coluna de texto altera normal

resultdograca = resulRS ("resultdograca") ' Coluna de texto altera normal

resultidgrupo = resulRS ("resultidgrupo") ' Coluna de texto altera normal

resultclasse = cInt (resulRS ("resultclasse")) ' Coluna de numero assume o primeiro valor e não altera

Response.Write resultiddog & "<br>"

Response.Write resultdograca & "<br>"

Response.Write resultidgrupo & "<br>"

Response.Write resultclasse & "<br>"

Set resultiddog = Nothing

Set resultdograca = Nothing

Set resultidgrupo = Nothing

Set resultclasse = Nothing

resulRS.Movenext

Wend

Set resulRS = Nothing

[ursolouco]

Pessoal,

Não sie o que esta acontecendo sempre que chamo uma coluna do BD (access) definada como numero para loop a variável assume o primeiro valor e depois não altera mais.

O que eu to fazendo errado?

' Open Recordset

Set resulRS = Server.CreateObject("ADODB.Recordset")

resulRS.ActiveConnection = Con

resulRS.Open "Select * FROM exporesul WHERE resultidexpo = '" & idexpo & "' ORDER BY resultidgrupo"

While not resulRS.EOF

resultiddog = resulRS ("resultiddog") ' Coluna de texto altera normal

resultdograca = resulRS ("resultdograca") ' Coluna de texto altera normal

resultidgrupo = resulRS ("resultidgrupo") ' Coluna de texto altera normal

resultclasse = cInt (resulRS ("resultclasse")) ' Coluna de numero assume o primeiro valor e não altera

Response.Write resultiddog & "<br>"

Response.Write resultdograca & "<br>"

Response.Write resultidgrupo & "<br>"

Response.Write resultclasse & "<br>"

Set resultiddog = Nothing

Set resultdograca = Nothing

Set resultidgrupo = Nothing

Set resultclasse = Nothing

resulRS.Movenext

Wend

Set resulRS = Nothing

Brother!!!

Há duas ou mais informações no seu banco de dados com o campo 'resultidexpo' igual ?

[rcnery]

Urso,

Desculpa a demora para lhe responder,

só existe uma variavel chamada resultidexpo.

Valeu pela força

Ricardo

[rcnery]

Urso,

O problema é realmente com a tabela resultidexpo, removi ela do Where ai funcionou direito, o problema é que preciso dela na condição, o que você sugere para arrumar isso?

O que é mais estranho nisso é que somente as colunas definadas como número não alteram no loop, as outras alteram normal.

Obrigado pela ajuda.

Ricardo

[ursolouco]

Urso,

O problema é realmente com a tabela resultidexpo, removi ela do Where ai funcionou direito, o problema é que preciso dela na condição, o que você sugere para arrumar isso?

O que é mais estranho nisso é que somente as colunas definadas como número não alteram no loop, as outras alteram normal.

Obrigado pela ajuda.

Ricardo

Brother!!!

No meu modo de ver (Kleber Bam-Bam - Vencedor do Big Brother Brasil 1), se os campos não estiverem relacionados (Inner Join), você pode renomear alguma coluna ou até mesmo mudar sua variavel para controla-las na tela, já com os campos relacionados na tabela, ficaria restante mesmo uma StoredProcedure no banco para consultar as tabelas com os campos iguais...

T +

[urso]