文件列有时上传的文件不容许别人更改，如果设置了列权限，没有权限的人就无法浏览；如果在原文件设置密码，每个文件设置密码确实不是个容易的事。有没有更好办法解决这个问题呢？

正面这段代码什么意思呢？

If e.DataCol.Name = "纪要" Then
    on error resume Next
    Dim app As New MSWord.Application
    Dim fileName = ProjectPath & "attachments\\" & e.FileName
    Dim doc = app.Documents.Open(fileName)
    doc.Unprotect(Password:="123456")
    If User.Group <> "王五" Then
        doc.Protect (Password:="123456", NoReset:=False, Type:=MsWord.WdProtectionType.wdAllowOnlyReading, UseIRM:=False, EnforceStyleLock:=False)
        Doc.saved = True
    End If
    App.Visible = True
    e.Cancel = True
End If

如果要更改原来的文件，是需要重新上传和覆盖本来的文件的，那直接控制不能上传覆盖，不就行了？

http://www.foxtable.com/webhelp/scr/3258.htm

我想实现只有用户角色是“办公室主任”才能上传，但实现不了，请问下面的代码错在哪了？

If  e.CurFolder = "/会议纪要" OrElse Left(e.CurFolder, 4) = "/会议纪要/" Then
    If User.IsRole("办公室主任")  Or User.name <> "开发者"   Then
       If User.roles <> "办公室主任"or User.name <> "开发者" Then
        e.Cancelall= True
        MessageBox.Show("只能有办公室主任才能归档文件!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    End  If
End  If

请问老师：Left(e.CurFolder,6) 这个代码是什么意思？这个数字起什么作用？怎么能查到这些代码的用法呢？

为什么不能写成： If User.Role = "办公室主任" Then  这种形式呢？

请问老师：Left(e.CurFolder,6) 这个代码是什么意思？这个数字起什么作用？怎么能查到这些代码的用法呢？