473,538 Members | 5,445 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Late binding arraylist issue

Anyone know how to get rid of this late binding issue? SalutationList is a
listarray of all salutation objects from a lookup table.

Dim a As Int32 = SalutationList.Count
For a = 0 To a - 1
If IsDBNull(dv.Item(0).Item("SalutationID")) = False Then
'this is the latebinding problem
If dv.Item(0).Item("SalutationID") =
CInt(SalutationList.Item(a).SalutationID) Then
cmbSal.Text = CStr(SalutationList.Item(a).Salutation)
End If
Else : cmbSal.Text = ""
End If
Next
Nov 23 '05 #1
6 2015
Earl wrote:
Anyone know how to get rid of this late binding issue? SalutationList is a
listarray of all salutation objects from a lookup table.

Dim a As Int32 = SalutationList.Count
For a = 0 To a - 1
If IsDBNull(dv.Item(0).Item("SalutationID")) = False Then
'this is the latebinding problem
If dv.Item(0).Item("SalutationID") =
CInt(SalutationList.Item(a).SalutationID) Then
cmbSal.Text = CStr(SalutationList.Item(a).Salutation)
End If
Else : cmbSal.Text = ""
End If
Next


If Cint(dv.Item(0).Item("SalutationID")) =
CInt(SalutationList.Item(a).SalutationID) Then
Nov 23 '05 #2
Thanks for the idea, but the late binding problem is on the arraylist side.

"I Don't Like Spam" <no@spam.com> wrote in message
news:ev**************@TK2MSFTNGP15.phx.gbl...
Earl wrote:
Anyone know how to get rid of this late binding issue? SalutationList is
a listarray of all salutation objects from a lookup table.

Dim a As Int32 = SalutationList.Count
For a = 0 To a - 1
If IsDBNull(dv.Item(0).Item("SalutationID")) = False Then
'this is the latebinding problem
If dv.Item(0).Item("SalutationID") =
CInt(SalutationList.Item(a).SalutationID) Then
cmbSal.Text = CStr(SalutationList.Item(a).Salutation)
End If
Else : cmbSal.Text = ""
End If
Next


If Cint(dv.Item(0).Item("SalutationID")) =
CInt(SalutationList.Item(a).SalutationID) Then

Nov 23 '05 #3
Earl,

Did you try

If CInt(dv.Item(0).Item("SalutationID")) =
CInt(SalutationList.Item(a).SalutationID) Then

I hope this helps,

Cor
Nov 23 '05 #4
Yep, but no joy. Still have the issue on the arraylist side.

"Cor Ligthert [MVP]" <no************@planet.nl> wrote in message
news:%2****************@TK2MSFTNGP12.phx.gbl...
Earl,

Did you try

If CInt(dv.Item(0).Item("SalutationID")) =
CInt(SalutationList.Item(a).SalutationID) Then

I hope this helps,

Cor

Nov 23 '05 #5
Earl wrote:
Anyone know how to get rid of this late binding issue? SalutationList is a
listarray of all salutation objects from a lookup table.
<snip> 'this is the latebinding problem
If dv.Item(0).Item("SalutationID") =
CInt(SalutationList.Item(a).SalutationID) Then
cmbSal.Text = CStr(SalutationList.Item(a).Salutation)

<snip>

How is SalutationList declared? What kind of objects it contains?

If you're using Net 2.0, then you could use generics to specialize
SalutationList; otherwise, you must cast the reference to the
appropriate type before using one of its methods.

That is, supposing the type of object contained in SalutationList is
Salutation:

If dv.Item(0).Item("SalutationID") = _
CType(SalutationList.Item(a), Salutation).SalutationID Then
cmbSal.Text = CType(SalutationList.Item(a), Salutation).Salutation

or, more concisely (if there's such word):

Dim Sal As Salutation = CType(Salutation.Item(a), Salutation)
If dv.Item(0).Item("SalutationID) = Sal.SalutationID Then
cmbSal.Text = Sal.Salutation
...

HTH.

Regards,

Branco.

Nov 23 '05 #6
Thanks Branco. I was handling the object incorrectly on the right side of
the equality. Your solution works so long as I also cast the left side to an
integer:

If CInt(dv.Item(0).Item("SalutationID")) = CType(SalutationList.Item(a),
Salutation).SalutationID Then
cmbSal.Text = CType(SalutationList.Item(a), Salutation).Salutation

Yes, "concisely" is a the word.

"Branco Medeiros" <br*************@gmail.com> wrote in message
news:11**********************@g47g2000cwa.googlegr oups.com...
Earl wrote:
Anyone know how to get rid of this late binding issue? SalutationList is
a
listarray of all salutation objects from a lookup table.


<snip>
'this is the latebinding problem
If dv.Item(0).Item("SalutationID") =
CInt(SalutationList.Item(a).SalutationID) Then
cmbSal.Text = CStr(SalutationList.Item(a).Salutation)

<snip>

How is SalutationList declared? What kind of objects it contains?

If you're using Net 2.0, then you could use generics to specialize
SalutationList; otherwise, you must cast the reference to the
appropriate type before using one of its methods.

That is, supposing the type of object contained in SalutationList is
Salutation:

If dv.Item(0).Item("SalutationID") = _
CType(SalutationList.Item(a), Salutation).SalutationID Then
cmbSal.Text = CType(SalutationList.Item(a), Salutation).Salutation

or, more concisely (if there's such word):

Dim Sal As Salutation = CType(Salutation.Item(a), Salutation)
If dv.Item(0).Item("SalutationID) = Sal.SalutationID Then
cmbSal.Text = Sal.Salutation
...

HTH.

Regards,

Branco.

Nov 23 '05 #7

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

1
7918
by: JD Kronicz | last post by:
Hi .. I have an issue I have been beating my head against the wall on for some time. I am trying to use late binding for MS graph so that my end users don't have to worry about having the right version of the MS Graph type library. Up until now I have been walking them through the process of setting the references to include their version...
5
1545
by: Daniel Bass | last post by:
..Net is great for modulerising libraries, so that all you need do to access a DLL, is simply call Add Reference and wallah, it's as though the library were written in your project. But what happens when i know that a library must have some method, say void StoreXML ( string XMLmsg ) but want to late bind, as in, only at run time,...
2
1658
by: VB Programmer | last post by:
I have an arraylist which holds a custom structure I made. (The structure contains FirstName, LastName, Address and EmpId.) I am trying to loop through the arraylist to write out each item. Here's the code: Dim i As Integer For i = 0 To alRecentActivity.Count - 1 Debug.Write(alRecentActivity.Item(i).FirstName) Next
30
2790
by: lgbjr | last post by:
hi All, I've decided to use Options Strict ON in one of my apps and now I'm trying to fix a late binding issue. I have 5 integer arrays: dim IA1(500), IA2(500), IA3(500), IA4(500), IA5(500) as integer The integers in these arrays are actually pointers to different columns of data in a text file.
1
263
by: Dean Slindee | last post by:
Can someone explain how to remedy the two late binding errors below when Option Strict On: Public Function ControlDataRowArrayListPaint(ByRef frm As Form, _ ByRef ctl As Control, _ ByRef dr As DataRow, _
2
1467
by: Dean Slindee | last post by:
Can someone explain how to remedy the two late binding errors below when Option Strict On: Public Function ControlDataRowArrayListPaint(ByRef frm As Form, _ ByRef ctl As Control, _ ByRef dr As DataRow, _ ByRef arrControl As
3
1395
by: gregory_may | last post by:
I want to prevent late binding of this statement: MyServerConnections(Myindex).client = Value But when I try with the code below, I get an editor error: "Expression is a value and therefor cant be the target of an assignment" CType(MyServerConnections(Myindex), PrivateServerConnectionStruct).Client = value
9
1979
by: Miro | last post by:
VB 2003 and Im still new to vb, so i hope i can explain this as best I can. I have a variable defined as such: ( simple example ) Dim AVariableOfSorts(,) As Object = _ { _ {"Last", "String", 20}, _ {"First", "String", 20} _ }
2
3688
by: kogrover | last post by:
ISSUE: COM Excel Sort works with Early Binding, but not Late Binding, but py2exe only does Late Binding I have code similar to this (type from notes, so there may be a typo...) import win32com.client xl = win32com.client.Dispatch("Excel.Application") xl.Visible = False xl.ScreenUpdating = False
0
7308
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language...
0
7536
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. ...
0
7694
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that...
1
7287
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For...
0
5829
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then...
1
5226
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes...
0
4852
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one. At the time of converting from word file to html my equations which are in the word document file was convert...
1
1762
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
0
591
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.