Solved

Access2.0, WIN95, API-GetDriveType doesn't work?

Posted on 1997-10-27
12
458 Views
Last Modified: 2008-03-17
Hi! I have an access2.0 application(which was created under win 3.11) running on PC with WIN95.
i need to expand this app and,as a part of this process I have to be able to find which Drive is the CD_ROM Drive.
GetDriveType() function doesn't work-I get a "file not found" error message.
i checked it in access8 and it works OK.
But i need it to work in acc2.0.
Thank you
0
Comment
Question by:lina10
  • 7
  • 5
12 Comments
 
LVL 4

Accepted Solution

by:
ozphil earned 100 total points
ID: 1957931
Youll probably find the "kernel32" library specified in the API declaration.

Access 2 cannot access 'kernel32.dll", hence the error message.

You need the API Declaration for the 16-bit kernel.dll library.
You need to have kernel.dll in your system.
Check this and try the API declaration with 'kernel' instead of 'kernel32'.

Im dashing off now so have not the time to check on 16-bit API declaration. Follow up later.
0
 
LVL 1

Author Comment

by:lina10
ID: 1957932
HI!
if so,what do i do? can i copy the kernell file to my system?
is it possible to have both of them?
i checked this function in a pc with win3.11,but it doesn't return
a cr-rom drive yet.it seems there are few versions of older kernel?

0
 
LVL 4

Expert Comment

by:ozphil
ID: 1957933
HI Lina10,

Whats the main exercise, to get the API function working or to detect the CD-ROM drive.

Havent worried at this stage about determining whether drive is CDROM.

What info does the win3.11 API function return;what do you mean by 'doesnt return a cd-rom drive'.

Can you load kernell.dll into win95 system directory, run your program and hope for the best. :).









0
 
LVL 1

Author Comment

by:lina10
ID: 1957934
Hello,ozphil!
i got an email notification that you have added a comment
but it doesn't appear on question history.I hope you saw
my comment on your answer.What is going on?
lina10
0
 
LVL 1

Author Comment

by:lina10
ID: 1957935
Hello again!
please disregard my last comment!(after i submitted it,the history
was presented in full)
i checked under win3.11 api text viewer and this function returnes only tree values and none of them CD_ROM!
while the kernel32 function returnes 5 values,including cd_rom.
Now,about copying kernell to my system:Is there any point to it,if it doesn't return a cd_rom? What to do?
thank you
0
 
LVL 4

Expert Comment

by:ozphil
ID: 1957936
What a bummer.

If you cant find a kernel API to to the job, try this:

Use Registry API calls to look up the drives in the HKEY_LOCAL_MACHINE key. Have a look in your Registry (using regedit) at HKEY_LOCAL_MACHINE/Enum/ESDI. Youll see CurrentDriveLetterAssignment for each drive.

The CurrentDriveLetterAssignment for the cdrom is 'CD'.

Im still looking at the feasibilty of this.

0
Enterprise Mobility and BYOD For Dummies

Like “For Dummies” books, you can read this in whatever order you choose and learn about mobility and BYOD; and how to put a competitive mobile infrastructure in place. Developed for SMBs and large enterprises alike, you will find helpful use cases, planning, and implementation.

 
LVL 4

Expert Comment

by:ozphil
ID: 1957937
Wrong registry key.

Its HKEY_LOCAL_MACHINE/Enum/SCSI.

Enumerating the keys below will locate the device with Class value 'CDROM', and the associated CurrentDriveLetterAssignment value. There may be more than one CDROM device, and the correct one is found by being the one in the get  drive list api.

This is a lot of stuffing around. There has to be something easier.

0
 
LVL 4

Expert Comment

by:ozphil
ID: 1957938
theres no such animal as kernel.dll, nor kernel.exe.

It seems the reference is valid, even though the referenced library doesnt exist as a separate entity.

'User' library exists as user.exe. 'shell' library exists as 'shell.dll'. As for 'kernel'? probably something to do with krnl386.exe.

I dont know of the 16-bit API call to the equivalent of the 32-bit calls.

Most focus is on 16-bit to 32-bit conversion. Very little discussion anywhere on 32-bit to 16-bit.

As an alternative to Registry manipulation, creating an OLE automation exe with VB4 or VB5 and calling the 32-bit API function from within the OLE exe and returning it to your app may do it.


0
 
LVL 4

Expert Comment

by:ozphil
ID: 1957939
I think i have found a simple solution at last.

Declare Function GetDriveType Lib "Kernel" (ByVal nDrive As Integer) As Integer

Function driveType ()
    Dim iType As integer

    For i = 1 To 26    ' all the drive letters
        iType = GetDriveType(i)
        if iType = 4 then
               MsgBox "Drive " & i & " is a CD-ROM"
        endif
        Debug.Print iType
    Next
end function

I found that the type number retruned for my cd-rom is 4.
The numbers for the other types o fdrive i have are different, so there can be no ambiguity.

Lina, you can transalte the drive number to a letter and return the appropriate functiton value.


0
 
LVL 1

Author Comment

by:lina10
ID: 1957940
Hi!
finally,SOMETHING works!!!
i checked it on my computer and got the followingh results:
for drive A(3.5)----iType=2
for drive B(5.25)---iType=3
for drive C(h.d.)----iType=3
for drive D(h.d.)----iType=3
for drive E(h.d.)----iType=4
for drive F(CD)-----iType=0
those results seem somehow confusing-you got 4 for CD and I got 0?
how to be sure?
0
 
LVL 4

Expert Comment

by:ozphil
ID: 1957941
Yes i see what the problem is.

Change the code from:
For i = 1 To 26 ' all the drive letters
to:
For i = 0 To 25 ' all the drive letters

and all will make sense.
The removable media return 2 ( A and B)
The HDDs return 3
CDROM returns 4

Voila.
0
 
LVL 1

Author Comment

by:lina10
ID: 1957942
You're absolutly GREAT!!!
thank you
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

It took me quite some time to sort out all the different properties of combo and list boxes available from Visual Basic at run-time. Not that the documentation is lacking: the help pages are quite thorough and well written. The problem was rather wh…
Regardless of which version on MS Access you are using, one of the harder data-entry forms to create is one where most data from previous entries needs to be appended to new records, especially when there are numerous fields and records involved.  W…
Familiarize people with the process of utilizing SQL Server functions from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Ac…
In Microsoft Access, learn how to “cascade” or have the displayed data of one combo control depend upon what’s entered in another. Base the dependent combo on a query for its row source: Add a reference to the first combo on the form as criteria i…

863 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

27 Experts available now in Live!

Get 1:1 Help Now