Click or drag to resize

IUDefFieldIsIndexed Property

Is this field indexed for faster searching? If the field set as searchable in the admin client, it means that this is an indexed field.

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
bool IsIndexed { get; }

Property Value

Type: Boolean
Boolean - True if field is indexed
Examples

IsIndexed

This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.

VB
dim objdb
dim udef
dim udefs
set objdb = CreateObject("superofficedb.database")
If Not (objDB is Nothing) Then
    objdb.login  "<username>", "<password>"
    set cont = objdb.getcontact(1)
    set udefs = cont.udef
    for each udef in udefs
        item = item  & "lable = " & udef.label  & vbcrlf
        item = item  & "defaultvalue = " & udef.defaultvalue & vbcrlf
        item = item  & "fieldid = " & udef.fieldid & vbcrlf
        item = item  & "fieldtype = " & udef.fieldtype & vbcrlf
        item = item  & "isindexed = " & udef.isindexed & vbcrlf
        item = item  & "ismandatory = " & udef.ismandatory & vbcrlf
        item = item  & "isreadonly = " & udef.isreadonly & vbcrlf
        item = item  & "lableh = " & udef.labelh  & vbcrlf
        item = item  & "lablew = " & udef.labelw  & vbcrlf
        item = item  & "lablex = " & udef.labelx  & vbcrlf
        item = item  & "labley = " & udef.labely  & vbcrlf
        item = item  & "listtableid = " & udef.listtableid & vbcrlf
        item = item  & "showonpage1 = " & udef.showonpage1 & vbcrlf
        item = item  & "taborder = " & udef.taborder & vbcrlf
        item = item  & "textlength = " & udef.textlength & vbcrlf
        item = item  & "tooltip = " & udef.tooltip & vbcrlf
        item = item  & "value = " & udef.value & vbcrlf
        item = item  & "valueh = " & udef.valueh  & vbcrlf
        item = item  & "valuew = " & udef.valuew  & vbcrlf
        item = item  & "valuex = " & udef.valuex  & vbcrlf
        item = item  & "valuey = " & udef.valuey  & vbcrlf
        item = item  & "________________________________" & vbcrlf
    next
    msgbox item
else
    msgbox  "unable to connect to database"
end if

See Also