By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
435,640 Members | 2,355 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 435,640 IT Pros & Developers. It's quick & easy.

retrieving Novell Netware info in ms access

P: n/a
Hi,
I'm trying to get Novell Netware information using vba into my access
database and have no
idea how to progress. Basically when i right click the properties on
my computer the free space of a network drive is showing as 30Gb.
When
i click on the NetWare Info tab it is showing as 15Gb. Retrieving the
30Gb value from windows was relativley easy, but it is the "true"
free
space of 15Gb that i need.

does anyone have any ideas how i'd do this?
thanks in advance
Rich
p.s. i've tried trawling through the developer help at novell but
nothing is availavle for vba, mainly c

Sep 11 '07 #1
Share this Question
Share on Google+
4 Replies


P: n/a
"kaisersose1995" <ka************@hotmail.comwrote in message
news:11**********************@d55g2000hsg.googlegr oups.com...
Hi,
I'm trying to get Novell Netware information using vba into my access
database and have no
idea how to progress. Basically when i right click the properties on
my computer the free space of a network drive is showing as 30Gb.
When
i click on the NetWare Info tab it is showing as 15Gb. Retrieving the
30Gb value from windows was relativley easy, but it is the "true"
free
space of 15Gb that i need.

does anyone have any ideas how i'd do this?
thanks in advance
Rich
p.s. i've tried trawling through the developer help at novell but
nothing is availavle for vba, mainly c
Paste this code into a new module:

''' START CODE '''
Private Declare Function GetDiskFreeSpace Lib "kernel32" Alias
"GetDiskFreeSpaceA" (ByVal lpRootPathName As String, lpSectorsPerCluster As
Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long,
lpTtoalNumberOfClusters As Long) As Long

Sub TestFreeSpace()

Dim Sectors as Long, Bytes as Long, FreeC as Long

Dim TotalC as Long, Total as Long, Freeb as Long

'Retrieve information about C:\

GetDiskFreeSpace "C:\", Sectors, Bytes, Freec, Totalc

Debug.Print " Sectors per Cluster:" & Str$(Sector)

Debug.Print " Bytes per sector:" & Str$(Bytes)

Debug.Print " Number Of Free Clusters:" & Str$(Freec)

Debug.Print " Total Number Of Clusters:" & Str$(Totalc)

Total = Totalc * Sector * Bytes

Debug.Print " Total number of bytes in path:" & Str$(Total)

Freeb = rFreec& * rSector& * rBytes&

Debug.Print " Free bytes:" & Str$(Freeb)

End sub

''' END CODE '''

(Make sure the declare function part is all on one line).

Run the TestFreeSpace proc from the debug window.
Sep 11 '07 #2

P: n/a
On 11 Sep, 23:22, "Stuart McCall" <smcc...@myunrealbox.comwrote:
"kaisersose1995" <kaisersose1...@hotmail.comwrote in message

news:11**********************@d55g2000hsg.googlegr oups.com...


Hi,
I'm trying to get Novell Netware information using vba into my access
database and have no
idea how to progress. Basically when i right click the properties on
my computer the free space of a network drive is showing as 30Gb.
When
i click on the NetWare Info tab it is showing as 15Gb. Retrieving the
30Gb value from windows was relativley easy, but it is the "true"
free
space of 15Gb that i need.
does anyone have any ideas how i'd do this?
thanks in advance
Rich
p.s. i've tried trawling through the developer help at novell but
nothing is availavle for vba, mainly c

Paste this code into a new module:

''' START CODE '''
Private Declare Function GetDiskFreeSpace Lib "kernel32" Alias
"GetDiskFreeSpaceA" (ByVal lpRootPathName As String, lpSectorsPerCluster As
Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long,
lpTtoalNumberOfClusters As Long) As Long

Sub TestFreeSpace()

Dim Sectors as Long, Bytes as Long, FreeC as Long

Dim TotalC as Long, Total as Long, Freeb as Long

'Retrieve information about C:\

GetDiskFreeSpace "C:\", Sectors, Bytes, Freec, Totalc

Debug.Print " Sectors per Cluster:" & Str$(Sector)

Debug.Print " Bytes per sector:" & Str$(Bytes)

Debug.Print " Number Of Free Clusters:" & Str$(Freec)

Debug.Print " Total Number Of Clusters:" & Str$(Totalc)

Total = Totalc * Sector * Bytes

Debug.Print " Total number of bytes in path:" & Str$(Total)

Freeb = rFreec& * rSector& * rBytes&

Debug.Print " Free bytes:" & Str$(Freeb)

End sub

''' END CODE '''

(Make sure the declare function part is all on one line).

Run the TestFreeSpace proc from the debug window.- Hide quoted text -

- Show quoted text -
Stuart,
Thanks for the reply, however i already have a method for retrieving
the free space of a drive through windows. I'm looking for a way to
retrieve the novell netware info space available, as this differs
substantially from the windows value.

regards

Rich

Sep 12 '07 #3

P: n/a
On Sep 12, 6:44 pm, kaisersose1995 <kaisersose1...@hotmail.comwrote:
the free space of a drive through windows. I'm looking for a way to
retrieve the novell netware info space available, as this differs
substantially from the windows value.
Look at the Novell Netware API calls:
http://developer.novell.com/wiki/ind...ovell_Services
http://developer.novell.com/wiki/ind...e_Applications

There are also Netware ActiveX components but I didn't find them
easily just now.

HTH
Ananda

Sep 12 '07 #4

P: n/a
On 12 Sep, 10:04, AnandaSim <Ananda...@gmail.comwrote:
On Sep 12, 6:44 pm, kaisersose1995 <kaisersose1...@hotmail.comwrote:
the free space of a drive through windows. I'm looking for a way to
retrieve the novell netware info space available, as this differs
substantially from the windows value.

Look at the Novell Netware API calls:http://developer.novell.com/wiki/ind...BOffice)_-_VB_...

There are also Netware ActiveX components but I didn't find them
easily just now.

HTH
Ananda
Thanks for the reply.
I had already tried this resource, but am finding them hit and miss. I
can fetch connection setting etc. but when ever i try to retrieve
server names, or space related calls a serious error is caused in
access and the whole application closes, and then prompts to make a
back-up copy....

any ideas?

regards

Rich

Sep 13 '07 #5

This discussion thread is closed

Replies have been disabled for this discussion.