API-calls

tsiv · Jun 8, 2000

Hi I wish to use API-calls to create a new directory on my NTFS-volume with permissions set to something I myself choose. I have the following code in a module - the declaration of the API-function-call takes a path (as string) to where the new folders is to be created as first parameter and second parameter is the SECURITY-settings. How do I specify this? As seen below I have found the typedeclarations with the API-viewer but I don't know how it fits together...Here's the module code: Public Declare Function CreateDirectory Lib "kernel32" Alias "CreateDirectoryA" (ByVal lpPathName As String, lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long Public Type SECURITY_ATTRIBUTES         nLength As Long         lpSecurityDescriptor As Long         bInheritHandle As Long End Type Public Type ACL         AclRevision As Byte         Sbz1 As Byte         AclSize As Integer         AceCount As Integer         Sbz2 As Integer End Type Public Type SECURITY_DESCRIPTOR         Revision As Byte         Sbz1 As Byte         Control As Long         Owner As Long         Group As Long         Sacl As ACL         Dacl As ACL End Type Next I have this in my button on a form: ' Create the new directory C:\Dummy\NewDir and ' give it default security attributes. Dim secattr As SECURITY_ATTRIBUTES  ' security attributes structure Dim retval As Long  ' return value ' Set the desired security attributes secattr.nLength = Len(secattr)  ' size of the structure secattr.lpSecurityDescriptor = 0  ' default (normal) level of security secattr.bInheritHandle = 1  ' this is the default setting ' Create the directory. retval = CreateDirectory("C:\nyt", secattr) Does anyone have any ideas as to how this would be done? Kind regards Siv

Karl Blessing · Jun 8, 2000

you create a new variable of those "types" its no different then using Dim myvar as new SECURITY_ATTRIBUTE(depending on the type, you may or may not have to use the new operator) but since you are using it, I would try to put a new operator in front, since you may have to allocate the type(actually create it in memory) then you can fill that variable up with whatever just a tip, if you ever need to stick multiple things into a single type, say its a parameter type for a API call, normally you can do this by assinging "some string" & vbNullChar & "Some String"& VbNullChar, if i am not mistaken thats the format of a Variant array. Also here is the definition I found for your command as taken from the MSDN Library CreateDirectory This function creates a new directory. If the underlying file system supports security on files and directories, the function applies a specified security descriptor to the new directory. A remote application interface (RAPI) version of this function exists, and it is named CeCreateDirectory. At a Glance Header file: Winbase.h Windows CE versions: 1.0 and later Syntax BOOL CreateDirectory(LPCTSTR lpPathName, LPSECURITY_ATTRIBUTES lpSecurityAttributes); Parameters lpPathName [in] Long pointer to a null-terminated string that specifies the path of the directory to be created. There is a default string size limit for paths of MAX_PATH characters. This limit is related to how the CreateDirectory function parses paths. lpSecurityAttributes [in] Ignored; set to NULL. Return Values Nonzero indicates success. Zero indicates failure. To get extended error information, call GetLastError. Remarks Some file systems, such as NTFS, support compression or encryption for individual files and directories. On volumes formatted for such a file system, a new directory inherits the compression and encryption attributes of its parent directory. See Also CreateFile, RemoveDirectory hopefully this information helps(its C++ oriented the API command, but the idea is pretty straight forward, a string(or a reference to a string) and that special type) Karl <a href=mailto:kb244@kb244.8m.com>kb244@kb244.8m.com</a> <a href=

http://kb244.8m.com>

</a> Experienced in , or have messed with : VC++, Borland C++ Builder, VJ++6(starting),VB-Dos, VB1 thru VB6, Delphi 3 pro, Borland C++ 3(DOS), Borland C++ 4.5, HTML,Visual InterDev 6, ASP(WebProgramming), QBasic(least i didnt start with COBOL)

Karl Blessing · Jun 8, 2000

I am just curious , Are you not able to use the FileSystemObject in NT? if you dont know much about it heres a quick example of how to make a folder(no API declarations needed, the reference is built into VB6, unsure about 5) Dim fs As New FileSystemObject fs.CreateFolder(Path as String) that command also returns a Folder Type, so you can actually assign the return of that into a variable and work with it. Karl <a href=mailto:kb244@kb244.8m.com>kb244@kb244.8m.com</a> <a href=

http://kb244.8m.com>

</a> Experienced in , or have messed with : VC++, Borland C++ Builder, VJ++6(starting),VB-Dos, VB1 thru VB6, Delphi 3 pro, Borland C++ 3(DOS), Borland C++ 4.5, HTML,Visual InterDev 6, ASP(WebProgramming), QBasic(least i didnt start with COBOL)

tsiv · Jun 8, 2000

Thanks for replying I have one puzzle though. My problem is I don't know what to pass as lpSecurityAttributes. Correct me if I'm wrong: I need to create an object/declaration with type SECURITY_ATTRIBUTES. The type-declaration of SECURITY_ATTRIBUTES points to the SECURITY_DESCRIPTER-type where the type of the DACL is declared (which is as I understand it the holder of who has what permissions to an object). So how do I go about generating the objects/declaration from the bottom up?? If you can assist me in anyway I would greatly appreciate it. Kind regards Siv

Karl Blessing · Jun 8, 2000

Try passing NULL , and see if it will sucessfully create it, also try my fileSystemOBject sugestion, might be much easier. Karl <a href=mailto:kb244@kb244.8m.com>kb244@kb244.8m.com</a> <a href=

http://kb244.8m.com>

</a> Experienced in , or have messed with : VC++, Borland C++ Builder, VJ++6(starting),VB-Dos, VB1 thru VB6, Delphi 3 pro, Borland C++ 3(DOS), Borland C++ 4.5, HTML,Visual InterDev 6, ASP(WebProgramming), QBasic(least i didnt start with COBOL)

tsiv · Jun 8, 2000

It is not the creation of the directory that is my problem - I can easily create this also with the FileSystemObject. My problem is that I want to be able to add NT-users or NTgroups to the permissionlist on that newly created directory. Kind regards Siv

tsiv · Jun 8, 2000

Hi again Actually I think I'm supposed to use this API-function. Ace stands for Access Control Entry - and is the entry: Everyone - Read (just an example!). This is what I want to add to my newly created directory. The function to add an ACE: Public Declare Function AddAccessAllowedAce Lib "advapi32.dll" (pAcl As ACL, ByVal dwAceRevision As Long, ByVal AccessMask As Long, pSid As Any) As Long Can you give any help on this? or do you know how to find documentation on this function? Kind regards Siv

mortgagedeveloper · Oct 22, 2002

See thread222-304012 for another answer, just got this one to work myself...

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

API-calls

tsiv

Programmer

Karl Blessing

Programmer

Karl Blessing

Programmer

tsiv

Programmer

Karl Blessing

Programmer

tsiv

Programmer

tsiv

Programmer

mortgagedeveloper

Programmer

Similar threads

Part and Inventory Search

Sponsor