OJO, ADJUNTO...
Hola, con este ejomplo puedes hacer de una carpeta un recurso compartido, tu tarea es ahora quitar el acceso a la carpeta, lo que hay es que cambiar las propiedades del recurso compartido, en este segmento de codigo esta el secrto para hacerlo, si te fijas la constante access_all es la easigna todos los prermisos, to es cuetion de cambiar ese valor por el que te elimina todos los accesos, creo que si vas al msdn alli esta..
saludos y suerte..
'prepare the SHARE_INFO_2 structure
With si2
.shi2_netname = dwNetname
.shi2_path = dwPath
.shi2_remark = dwRemark
.shi2_type = STYPE_DISKTREE
.shi2_permissions = ACCESS_ALL
.shi2_max_uses = -1
.shi2_passwd = dwPw
End With
'add the share
ShareAdd = NetShareAdd(dwServer, _
2, _
si2, _
parmerr)
