objAttributes help adding an If statement?

[vb help]

using his code as an example

Select Case objAttributes.Name

Case Is = "Attribute"

'do task with attribute

End Select

The code will search for the required case attribute from the list of attributes in objAttributes.Name, is there an alternative way of doing this?

Also is it possible to add an If statement to this? My goal is this...

 """If"""" Select Case objAttributes.Name

Case Is = "Attribute"  """"If Case Attribute Exists, Then""""

'do task with attribute

End Select
"""Else""" After the End Select?
'do a different task

[LaVolpe]

I don't understand your IF's. The .Name property either has a value or doesn't

Select Case objAttribute.Name
    Case "Attribute"
        ' do something
    Case "Genre"
        ' do something else
    Case "Gender"
        ' do yet something else

    ... more case statements

    Case Else
        ' the property value is not handled
End Select

[vb help]

I'll give that ago, thanks!


I take it there's no other way to handle the .Name attribute other than Case?

[LaVolpe]

Well, you could use IFs

If objAttribute.Name = "Attribute" Then

ElseIf objAttribute.Name = "Genre" Then 

ElseIf objAttribute.Name = "Gender" Then

' add more ElseIf statements as needed

Else
       ' the property value is not handled
End If

Edited: If what was posted does not work for you, you might want to give greater details and specific examples.

[vb help]

The problem I'm having is the Attribute.Name contains multiple values now

If objAttribute.Name = "Attribute" Then

' Write to column

' column = column + 1

Else
' column = column + 1

End If

I want the column to add +1 if the attribute exists or if it doesn't however because the objAttribute.Name contains multiple values it will add ' column = column + 1 for every value I only want this code "' column = column + 1" to run if the attributes exists or doesn't not run every time the objAttribute.Name is checked...

Can anyone suggest a possible workaround?

[duro_re]

i donot get it full but can say
if objAttribute.Name has alot of values
and you wnt to add column + 1 order in any case then you donot need if statment just
write
column = column + 1

if i didnot get it explain more

[vb help]

Basically I ONLY want to add the +column IF the value exists or not.

I’ll try and explain how the code will work


‘ Write to column

‘Check for attribute

‘If it exists write to column Then column + 1
(This function could check for multiple attributes so when it writes I need it to move to the next column)

‘Else column + 1
(Because the code writes to the column at the start if NO attribute exists then I want the code to add a column)

[duro_re]

look
If objAttribute.Name = "Attribute" Then

' Write to column

' column = column + 1

Else
' column = column + 1

End If

equal

If objAttribute.Name = "Attribute" Then

' Write to column

End If

' column = column + 1

do u use loop for check ?
and wt u means with exists ?
and if dosenot exist it gives error ?