Codejock Developer Community : FindRecordItem

Codejock Developer Community : FindRecordItem http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Fri, 15 May 2026 09:45:28 +0000 Mon, 15 Jun 2009 04:38:31 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=14463 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[FindRecordItem : Thanks Aaron Mark ]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49940&title=findrecorditem#49940 Author: markmark
Subject: 14463
Posted: 15 June 2009 at 4:38am

Thanks Aaron

Mark

]]> Mon, 15 Jun 2009 04:38:31 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49940&title=findrecorditem#49940 <![CDATA[FindRecordItem : Hi Mark, I'm sorry (again)...]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49767&title=findrecorditem#49767 Author: Aaron
Subject: 14463
Posted: 09 June 2009 at 2:48pm

Hi Mark,

I'm sorry (again) but I did test with some beta version and of course it works, Mark fixed these. But you can use one option with V13.0 that actually works:

Set repRecItem = ReportControl1.Records.FindRecordItem(0, lngCount, 0, 1, 0, 0, "rk", xtpReportTextSearchBackward)

]]> Tue, 09 Jun 2009 14:48:14 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49767&title=findrecorditem#49767 <![CDATA[FindRecordItem : Hi Aaron. Support have told...]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49715&title=findrecorditem#49715 Author: markmark
Subject: 14463
Posted: 08 June 2009 at 4:40pm

Hi Aaron.

Support have told me to download 13.1 which fixes the problem.

However if it does work with 13.0 I would like to try, otherwise I will have to release a whole new setup and that is a real pain.

Here is my code

Thanks

MArk

uploads/20090608_163843_find.zip

]]> Mon, 08 Jun 2009 16:40:49 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49715&title=findrecorditem#49715 <![CDATA[FindRecordItem : Hi, I didn't see that...]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49709&title=findrecorditem#49709 Author: Aaron
Subject: 14463
Posted: 08 June 2009 at 1:35pm

Hi,

I didn't see that you didn't use first column as start column, you have first column with Index 0;

This will work:

Set repRecItem = wndReportControl.Records.FindRecordItem(1, lngCount, 0, 1, 0, 0, "Wendy", xtpReportTextSearchExactPhrase)

]]> Mon, 08 Jun 2009 13:35:22 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49709&title=findrecorditem#49709 <![CDATA[FindRecordItem : Hi Aaron Have looked through...]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49701&title=findrecorditem#49701 Author: markmark
Subject: 14463
Posted: 08 June 2009 at 6:04am

Hi Aaron

Have looked through that post, but still can't get the FindRecordItem to work.

I'm on ver 13.

Do you have a working sample?

Thanks

MArk

]]> Mon, 08 Jun 2009 06:04:07 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49701&title=findrecorditem#49701 <![CDATA[FindRecordItem : Hi Mark, It looks OK to me...]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49691&title=findrecorditem#49691 Author: Aaron
Subject: 14463
Posted: 07 June 2009 at 7:23am

Hi Mark,

It looks OK to me

There are a few issues with this method, please read post https://forum.codejock.com/forum_posts.asp?TID=12897

]]> Sun, 07 Jun 2009 07:23:18 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49691&title=findrecorditem#49691 <![CDATA[FindRecordItem : Hi Please could someone help...]]> http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49690&title=findrecorditem#49690 Author: markmark
Subject: 14463
Posted: 07 June 2009 at 6:33am

Please could someone help me with the code below,

I cannot get FindRecordItem to work.

It should find the value "Wendy" i think!

Thanks

MArk

##################################################

Private Sub cmdFind_Click()

Dim lngCount As Long
Dim repRecItem As ReportRecordItem

lngCount = ReportControl1.Rows.Count

Set repRecItem = ReportControl1.Records.FindRecordItem(1, lngCount, 1, 3, 0, 3, "Wendy", xtpReportTextSearchExactPhrase)
If repRecItem Is Nothing Then

Else
MsgBox "Found"
End If

End Sub

Private Sub Form_Load()
Dim rRecord As ReportRecord

ReportControl1.Columns.Add 0, "Col1", 50, False
ReportControl1.Columns.Add 1, "Col2", 50, False

Set rRecord = ReportControl1.Records.Add
rRecord.AddItem ""
rRecord.Item(0).Value = "Mark"
rRecord.AddItem ""
rRecord.Item(1).Value = "1"
rRecord.AddItem ""
rRecord.Item(2).Value = "2"

Set rRecord = ReportControl1.Records.Add
rRecord.AddItem ""
rRecord.Item(0).Value = "Wendy"
rRecord.AddItem ""
rRecord.Item(1).Value = "1"
rRecord.AddItem ""
rRecord.Item(2).Value = "2"

ReportControl1.Populate

End Sub

]]> Sun, 07 Jun 2009 06:33:33 +0000 http://forum.codejock.com/forum_posts.asp?TID=14463&PID=49690&title=findrecorditem#49690