Codejock Developer Community : Detect Records Value

Detect Records Value : thank you, it works just fine. ...

Wed, 10 Oct 2007 18:29:32 +0000

Author: moe188
Subject: 8182
Posted: 10 October 2007 at 6:29pm

thank you,

it works just fine.

Detect Records Value : Why did you mentioned FocusedRow...

Wed, 10 Oct 2007 18:19:48 +0000

Author: sserge
Subject: 8182
Posted: 10 October 2007 at 6:19pm

Why did you mentioned FocusedRow in code???

In this case try only MsgBox Record(M1).Value

--
WBR,
Serge

Detect Records Value : okay, I tried the following code,...

Wed, 10 Oct 2007 15:10:36 +0000

Author: moe188
Subject: 8182
Posted: 10 October 2007 at 3:10pm

okay, I tried the following code, but I was only able to display the value of record for the first row.

code:

    Dim Record As ReportRecord

    For Each Record In LstMed.Records
        MsgBox LstMed.FocusedRow.Record(M1).Value
     Next
this code will display the same value for the number of records existing in the reportcontrol. WHY?? something is missing...

how can I be able to display for the rest of reocrds?

Detect Records Value : Hi,Your RecordItem.Value may be...

Tue, 09 Oct 2007 16:20:49 +0000

Author: sserge
Subject: 8182
Posted: 09 October 2007 at 4:20pm

Hi,

Your RecordItem.Value may be not a String, but something else like integer - this could be a reason of incorrect type cast. Try using
Debug.Print RecordItem.Value
without an additional convertation.

--
WBR,
Serge

Detect Records Value : Hi, Serge I cant get it to work,...

Tue, 09 Oct 2007 16:03:12 +0000

Author: moe188
Subject: 8182
Posted: 09 October 2007 at 4:03pm

Hi, Serge

I cant get it to work, any code that I used will return an empty string. so I will appreciate if you can help me solving this problem ASAP

Note: I am tryint to read the content of each column of each row in order to save data into my database... (except if there is another way in doing so).

Thank you

Detect Records Value : Just enhance this and iterate...

Mon, 01 Oct 2007 18:49:03 +0000

Author: sserge
Subject: 8182
Posted: 01 October 2007 at 6:49pm

Just enhance this and iterate everything, like below:


Dim str As String
Dim RecordItem As ReportRecordItem
Dim Row As ReportRow
Dim col As ReportColumn
For Each Row In wndReportControl.Rows
  If Not Row.Record Is Nothing Then
    For Each RecordItem In Row.Record
      str = RecordItem.Value
      Debug.Print str
    Next
  End If
Next

--
WBR,
Serge

Detect Records Value : no luck, I tried your code, but...

Thu, 27 Sep 2007 14:04:06 +0000

Author: moe188
Subject: 8182
Posted: 27 September 2007 at 2:04pm

no luck,

I tried your code, but it did not do anything at all.

Detect Records Value : play around with this. works for...

Thu, 27 Sep 2007 11:03:55 +0000

Author: joeliner
Subject: 8182
Posted: 27 September 2007 at 11:03am

play around with this. works for me fine. :)

Dim str As String
Dim RecordItem As ReportRecordItem
    For Each RecordItem In Row.Record
    If wndReportControl.Columns(wndReportControl.Columns.Count - 1).Index = 11 Then
        'check if row or group row
        str = Row.Record.Item(wndReportControl.Columns.Count).value
    End If
    Next

regards,

Detect Records Value : Hi,I have a reportcontrol, with...

Wed, 26 Sep 2007 20:41:51 +0000

Author: moe188
Subject: 8182
Posted: 26 September 2007 at 8:41pm

Hi,
I have a reportcontrol, with a number X of rows, and 5 columns. how can I be able to retrieve the value of each column of each row?
thank you.
Please HELP!!!!