daily pastebin goal
25%
SHARE
TWEET

Untitled

a guest Mar 13th, 2018 47 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. If e.Item.ItemIndex > -1 Then
  2.  
  3.  
  4.       If e.Item.ItemIndex = dgDocumentRequests.EditItemIndex Then
  5.  
  6.         '****************************************************
  7.         ' only Kinex Employees can modify existing requests; otherwise only track responses via Fill Request item command
  8.         ' Approved requests should not be editable
  9.         '****************************************************
  10.         Dim dstatus As DropDownList = CType(e.Item.FindControl("dgdllStatus"), DropDownList)
  11.  
  12.         'obviously this needs to be changed
  13.         '******************************************************
  14.         If g_UserName = "Administratora" Then
  15.           '******************************************************
  16.           e.Item.Cells(1).Enabled = False
  17.           e.Item.Cells(2).Enabled = False
  18.           e.Item.Cells(3).Enabled = False
  19.           e.Item.Cells(4).Enabled = False
  20.           e.Item.Cells(5).Enabled = False
  21.           dstatus.Items.Clear()
  22.           dstatus.Items.Add(New ListItem("Reply", "Reply"))
  23.         Else
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top