[2 days left] What’s wrong with your cloud strategy? Learn why multicloud solutions matter with Nimble Storage.Register Now

x
?
Solved

XArrayDB of Apex True DB Grid

Posted on 2001-07-27
5
Medium Priority
?
1,444 Views
Last Modified: 2012-05-07
I seems to be having problems. On the load event of a form I am filling the XArrayDB of the grid. I check in that same load event and after a rebind and update stuff is where it's suppose to be and I have the correct row count and everything seems hunky dory. But when I access the array from a differerant event I get the correct row count(which is good) but when I check any of the array values I get an 'Object Required' error.

Any ideas??

signed it's been a long day
0
Comment
Question by:thenrich
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
5 Comments
 
LVL 39

Expert Comment

by:appari
ID: 6329178
if possible post the code from form_load event and the other event where you are checking the values.

RAO
0
 
LVL 5

Author Comment

by:thenrich
ID: 6329808
Dim rowCounter, colCounter, xlCounter As Long
Dim tempStr As String
  rowCounter = 0
  xlCounter = 18
 
  Do Until xlSheet.Cells(xlCounter, 1) = ""
     For colCounter = 0 To 17
        If colCounter = 0 Then
           If InStr(xlSheet.Cells(xlCounter - 1, 3), "non-Extruded") <> 0 Then
              xXarray(rowCounter, colCounter) = "No"
           Else
              xXarray(rowCounter, colCounter) = "Yes"
           End If
        ElseIf colCounter = 1 Then
            xXarray(rowCounter, colCounter) = xlSheet.Cells(xlCounter - 1, 2)
        ElseIf colCounter = 2 Then
           temp = Len(xlSheet.Cells(xlCounter - 3, 3)) - InStr(xlSheet.Cells(xlCounter - 3, 3), "-")
           tempStr = Trim(Right(xlSheet.Cells(xlCounter - 3, 3), temp))
           temp = Len(tempStr) - InStrRev(tempStr, "-")
           tempStr = Trim(Right(tempStr, temp))
           xXarray(rowCounter, colCounter) = tempStr
        ElseIf colCounter > 7 Then
           If colCounter = 15 Then
              If Not xlSheet.Cells(xlCounter - 2, 2) = "" Then
                 xXarray(rowCounter, colCounter) = xlSheet.Cells(xlCounter - 2, 2)
                 temp = InStr(xlSheet.Cells(xlCounter - 2, 2), "P")
                 tempStr = Trim(Left(xlSheet.Cells(xlCounter - 2, 2), temp - 1))
                 xXarray(rowCounter, colCounter + 1) = tempStr
              End If
              colCounter = colCounter + 1
           Else
              xXarray(rowCounter, colCounter) = xlSheet.Cells(xlCounter - 2, 2)
           End If
        Else
           xXarray(rowCounter, colCounter) = xlSheet.Cells(xlCounter - 2, 2)
        End If
        xlCounter = xlCounter + 1
     Next
     For xlCounter = xlCounter To xlCounter + 37
        If Not xlSheet.Cells(xlCounter, 1) = "" Then
           xXarray.AppendRows (1)
           rowCounter = rowCounter + 1
           Exit For
        End If
     Next
  Loop
 
        temp = xXarray(0, 8)
        temp = xXarray(1, 8)
0
 
LVL 5

Author Comment

by:thenrich
ID: 6528063
have not got an answer
0
 
LVL 49

Expert Comment

by:DanRollins
ID: 7088576
Hi thenrich,
You've requested to delete this question, but its status has remained as 'Pending Delete' because one or more comments have been added.  Normally, the only way to fully delete such a Question is to post a message to Community Support and ask for assistance.

EE is making a one-time database sweep to purge the Pending Delete Questions automatically.  During this sweep:

    thenrich -- To allow the deletion to proceed:  Do nothing.
    EXPERTS -- Please DON'T POST a comment except to contest this deletion.

In the future, please refer to http://www.experts-exchange.com/jsp/cmtyHelpDesk.jsp#8 for instruction on deleting questions.

DanRollins -- EE database cleanup volunteer
0
 
LVL 1

Accepted Solution

by:
Moondancer earned 0 total points
ID: 7093818
200 points refunded, item closed.  Needed response not received.
Moondancer - EE Moderator
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The debugging module of the VB 6 IDE can be accessed by way of the Debug menu item. That menu item can normally be found in the IDE's main menu line as shown in this picture.   There is also a companion Debug Toolbar that looks like the followin…
This article describes how to use a set of graphical playing cards to create a Draw Poker game in Excel or VB6.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Suggested Courses

656 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question