Subversion Repositories DevTools

Rev

Rev 6770 | Rev 6873 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6770 Rev 6827
Line 166... Line 166...
166 
         If InStr( uevent, "vixConfirm" ) = 1 Then
 166 
         If InStr( uevent, "vixConfirm" ) = 1 Then
167 
            uevent = Replace(uevent, "HREF", uhref )
 167 
            uevent = Replace(uevent, "HREF", uhref )
168 
            uevent = "onclick=""" & uevent & """"
 168 
            uevent = "onclick=""" & uevent & """"
169 
            uhref = "javascript:;"
 169 
            uhref = "javascript:;"
170 
         End If
 170 
         End If
171 
         Dim hint: hint = mArrAbtnDef( InxHint, itemInx )
171 
         Dim hint: hint = mArrAbtnDef( InxHint, itemInx )
- 
 
 172 
         If uhref = "javascript:;" Then
- 
 
 173 
             ButtonStr = _
- 
 
 174 
                "<td nowrap>"&_
- 
 
 175 
                "<span id='"& mArrAbtnDef( InxName, itemInx ) &"' "&_
- 
 
 176 
                " "& uevent &" class='menu_link' title='"& hint &"'>" &_
- 
 
 177 
                btnImage & mArrAbtnDef( InxTxt, itemInx ) &"<span>"&_
- 
 
 178 
                "</td>"
- 
 
 179 
         Else
172 
         ButtonStr = _
 180 
             ButtonStr = _
173 
            "<td nowrap>"&_
 181 
                "<td nowrap>"&_
174 
            "<a id='"& mArrAbtnDef( InxName, itemInx ) &"' "&_
 182 
                "<a id='"& mArrAbtnDef( InxName, itemInx ) &"' "&_
175 
            " name='"& mArrAbtnDef( InxName, itemInx ) &"' href='"& uhref &"' "&_
 183 
                " name='"& mArrAbtnDef( InxName, itemInx ) &"' href='"& uhref &"' "&_
176 
            " "& uevent &" class='menu_link' title='"& hint &"'>"&_
 184 
                " "& uevent &" class='menu_link' title='"& hint &"'>"&_
177 
            btnImage & mArrAbtnDef( InxTxt, itemInx ) &"</a>"&_
 185 
                btnImage & mArrAbtnDef( InxTxt, itemInx ) &"</a>"&_
178 
            "</td>"
 186 
                "</td>"
- 
 
 187 
         End If
179 
 
 188 
 
180 
			'-- Define Disabled Button
 189 
			'-- Define Disabled Button
181 
            '   A Null value of '' will use InxImg with the lessOpacity Class
 190 
            '   A Null value of '' will use InxImg with the lessOpacity Class
182 
            hint = hint & " [Disabled]"
191 
            hint = hint & " [Disabled]"
183 
            If IsNull(mArrAbtnDef( InxImgOff, itemInx )) Then
 192 
            If IsNull(mArrAbtnDef( InxImgOff, itemInx )) Then