Codejock Developer Community : Problem with recordset interaction http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 13 May 2026 17:07:34 +0000 Fri, 13 Feb 2009 04:16:22 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=13314 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Problem with recordset interaction : Hi, Can you upload test project?...]]> http://forum.codejock.com/forum_posts.asp?TID=13314&PID=45409&title=problem-with-recordset-interaction#45409 Author: Aaron
Subject: 13314
Posted: 13 February 2009 at 4:16am

Hi,
 
Can you upload test project? I haven't had any problems with loading records from database but it would be easier to when you could create test for this
 
Thanks
 
 
]]> Fri, 13 Feb 2009 04:16:22 +0000 http://forum.codejock.com/forum_posts.asp?TID=13314&PID=45409&title=problem-with-recordset-interaction#45409 <![CDATA[Problem with recordset interaction : Im using Report Control V11.2...]]> http://forum.codejock.com/forum_posts.asp?TID=13314&PID=45076&title=problem-with-recordset-interaction#45076 Author: ViperSnake
Subject: 13314
Posted: 02 February 2009 at 12:16pm

Im using Report Control V11.2 and im having a problem when i insert a new row from a record set. The code below worked fine until now. Im using a RecordSet with a OLEDB connection to add records to the report control:
 
Sub LoadGrd()
 
    Dim L As Integer 
    
    ReportControl.Records.DeleteAll
   
    For L = 0 To (adoRS.RecordCount - 1)
       AddRecord adoRS!Cod_Aluno, adoRS!Aluno,adoRS!Cod_Turma,    adoRS!Localidade_Aluno
       
        If Not adoFichasAlunoRS.EOF  Then adoFichasAlunoRS.MoveNext
        
    Next
    
    ReportControl.Populate
End Sub
 
'------------------------------------------------------------------------------------
Sub AddRecord(pNumero, pNome, pTurma, pLocalidade As Variant) 

    Dim Record As ReportRecord
   
    Set Record = Me.ReportControl.Records.Add()
   
    Record.AddItem pNumero
    Record.AddItem pNome
    Record.AddItem pTurma
    Record.AddItem pLocalidade
   
    Set AddReportRecord = Record
   
End Sub
 
 
The problem is that when i do the movenext event on the recordset, it changes the data of all previous records of the report control and puts them like the one on the recordset...
 
So if I have 10 records on the recordset i end up with 10 records on the report control equal to the last one on the recordset.
 
Any ideas?
 
Tank You for your time..
]]> Mon, 02 Feb 2009 12:16:49 +0000 http://forum.codejock.com/forum_posts.asp?TID=13314&PID=45076&title=problem-with-recordset-interaction#45076