Guest User

Untitled

a guest
Mar 13th, 2018
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.02 KB | None | 0 0
  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
Add Comment
Please, Sign In to add comment