Codejock Developer Community : Text in ROWS desn't visible =(

Codejock Developer Community : Text in ROWS desn't visible =( http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Sun, 26 Apr 2026 01:02:39 +0000 Fri, 07 Mar 2008 13:23:52 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=9765 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Text in ROWS desn't visible =( : Thank you. Now it works. ]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=32010&title=text-in-rows-desnt-visible#32010 Author: nmihail
Subject: 9765
Posted: 07 March 2008 at 1:23pm

Thank you. Now it works.

]]> Fri, 07 Mar 2008 13:23:52 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=32010&title=text-in-rows-desnt-visible#32010 <![CDATA[Text in ROWS desn't visible =( : Got it! You should be able to...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=32002&title=text-in-rows-desnt-visible#32002 Author: jcollier
Subject: 9765
Posted: 07 March 2008 at 10:13am

Got it! You should be able to figure out the other places changes need to be made based on the following changes:

Public Const CARCOMPANY_PERSON_NUMBER = 0
Public Const CARCOMPANY_PERSON_NAME = 1
Public Const CARCOMPANY_PERSON_PHONE = 2

Public Sub SelectedCarcompanyShowContacts(index As Integer)

    sSource = AddBackslash(App.Path) & "\db.mdb"
    sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sSource & ";Persist Security Info=False;Jet OLEDB:database Password="
    '----------------------------------------
    strSql = "SELECT * FROM tab_carcompaniescontacts WHERE idcarcompany=" & index & ";"
    adoCN.Open sConn
    adoRS.Open strSql, adoCN, adOpenKeyset, adLockOptimistic

    With frmNewCarcompany.ReportCarCompanyContacts
        .Records.DeleteAll

        Do While Not adoRS.EOF

                Set Record = .Records.Add()
                Set pItem = Record.AddItem(CStr(adoRS!Id))
                Set pItem = Record.AddItem(CStr(adoRS!contact))
                Set pItem = Record.AddItem(CStr(adoRS!Tel))

            'Get the next record.
                adoRS.MoveNext
        Loop
        .Populate
    End With

    adoRS.Close
    adoCN.Close
End Sub
]]> Fri, 07 Mar 2008 10:13:04 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=32002&title=text-in-rows-desnt-visible#32002 <![CDATA[Text in ROWS desn't visible =( : https://forum.codejock.com/upl...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=32001&title=text-in-rows-desnt-visible#32001 Author: nmihail
Subject: 9765
Posted: 07 March 2008 at 9:59am

https://forum.codejock.com/uploads/20080307_095846_concrete_WITHOU.zip

Project without DBGrid

]]> Fri, 07 Mar 2008 09:59:48 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=32001&title=text-in-rows-desnt-visible#32001 <![CDATA[Text in ROWS desn't visible =( : I can't load the project....]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31999&title=text-in-rows-desnt-visible#31999 Author: jcollier
Subject: 9765
Posted: 07 March 2008 at 9:25am

I can't load the project. I don't have DBGrid. Can you send one without that grid?]]> Fri, 07 Mar 2008 09:25:22 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31999&title=text-in-rows-desnt-visible#31999 <![CDATA[Text in ROWS desn't visible =( : The same situation. Not visible....]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31992&title=text-in-rows-desnt-visible#31992 Author: nmihail
Subject: 9765
Posted: 07 March 2008 at 5:45am

The same situation. Not visible.

I have uploaded source. May be i made mistake. Please see it.

the source is original without modified code according this forum/ but i tried it.

the table in frmNewCarcompany.frm must show info from mdb.

table in frmCarcompanies.frm shows correctly.

https://forum.codejock.com/uploads/20080307_054103_concrete.zip

]]> Fri, 07 Mar 2008 05:45:50 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31992&title=text-in-rows-desnt-visible#31992 <![CDATA[Text in ROWS desn't visible =( : Oops. Small alteration. Don't...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31978&title=text-in-rows-desnt-visible#31978 Author: jcollier
Subject: 9765
Posted: 06 March 2008 at 3:59pm

Oops. Small alteration. Don't forget to make them Record.AddItem(CStr(...]]> Thu, 06 Mar 2008 15:59:34 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31978&title=text-in-rows-desnt-visible#31978 <![CDATA[Text in ROWS desn't visible =( : Hm. Try this: Do While Not adoRS.EOF...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31977&title=text-in-rows-desnt-visible#31977 Author: jcollier
Subject: 9765
Posted: 06 March 2008 at 3:58pm

Hm. Try this:

Do While Not adoRS.EOF
        With ReportCarCompanyContacts
            Set Record = ReportCarCompanyContacts.Records.Add
            Set pItem = Record.AddItem(adoRS!ID)
            set pItem = Record.AddItem (adoRS!contact)
            set pItem = Record.AddItem (adoRS!tel)
        End With
        'Get the next record.
            adoRS.MoveNext
    Loop
        ReportCarCompanyContacts.Populate
]]> Thu, 06 Mar 2008 15:58:28 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31977&title=text-in-rows-desnt-visible#31977 <![CDATA[Text in ROWS desn't visible =( : Very strange, but data invisible...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31975&title=text-in-rows-desnt-visible#31975 Author: nmihail
Subject: 9765
Posted: 06 March 2008 at 2:34pm

Very strange, but data invisible

yet]]> Thu, 06 Mar 2008 14:34:19 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31975&title=text-in-rows-desnt-visible#31975 <![CDATA[Text in ROWS desn't visible =( : Try this:Record.AddItem (CStr(...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31971&title=text-in-rows-desnt-visible#31971 Author: jcollier
Subject: 9765
Posted: 06 March 2008 at 11:12am

Try this:

Record.AddItem (CStr(adoRS.Fields.Item("contact").Value))]]> Thu, 06 Mar 2008 11:12:29 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31971&title=text-in-rows-desnt-visible#31971 <![CDATA[Text in ROWS desn't visible =( : DIm Tmp Tmp = adoRS.Fields.It...]]> http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31907&title=text-in-rows-desnt-visible#31907 Author: Bernie
Subject: 9765
Posted: 05 March 2008 at 6:18am

DIm Tmp

Tmp = adoRS.Fields.Item("contact").Value

Record.AddItem Tmp

I don't know why

but these codes can work!!!

]]> Wed, 05 Mar 2008 06:18:29 +0000 http://forum.codejock.com/forum_posts.asp?TID=9765&PID=31907&title=text-in-rows-desnt-visible#31907