Subversion Repositories DevTools

Rev

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

Rev 6610 Rev 6612
Line 111... Line 111...
111
      Dim userImage : userImage = LIMG_USER_DISABLED
111
      Dim userImage : userImage = LIMG_USER_DISABLED
112
      If isNull(rsQry("is_DISABLED")) Then
112
      If isNull(rsQry("is_DISABLED")) Then
113
          userImage = LIMG_USER
113
          userImage = LIMG_USER
114
      End If
114
      End If
115
 
115
 
116
      html_string = html_string & "<td nowrap class='body_rowg'><span data-email='" & rsQry("user_email") & "' class='mailto txt_linked'>" & userImage & rsQry("FULL_NAME") & "</span></td>"
116
      html_string = html_string & "<td nowrap class='body_rowg'>" & emailField(userImage & rsQry("FULL_NAME"), rsQry("user_email")) & "</td>"
117
 
117
 
118
      ' Operation
118
      ' Operation
119
      Dim DelUserImage : DelUserImage = LIMG_NDEL_DISABLED
119
      Dim DelUserImage : DelUserImage = LIMG_NDEL_DISABLED
120
      Dim btnText : btnText = "Operation not available"
120
      Dim btnText : btnText = "Operation not available"
121
      Dim btnClass : btnClass = "" 
121
      Dim btnClass : btnClass = ""