IRQ's in VB6

How can you implement a IRQ routine in VB6. The IRQ is generated by an expansion card.

Thanks
lermytteAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

ericsonCommented:
I'm using VC++ to generate a DLL to read/write data on base adreess like:

#include <conio.h>
#include "port.h"

BOOL CALLBACK LibMain(HINSTANCE hinst, UINT wDS, UINT cbHeap, DWORD unused);

BOOL CALLBACK LibMain(HINSTANCE hinst, UINT wDS, UINT cbHeap, DWORD unused)
{
    // Nothing to do.

    return TRUE;
};

int __declspec(dllexport) readport( int port )
{
    return _inp( (unsigned short) port );

};


int __declspec(dllexport) outport(int port, int data)
{
    int ret;

    ret = _outp((unsigned short) port, data);

    return ret;

};

0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
lermytteAuthor Commented:
Thanks,

This way I can read/write the bytes but there is no interrupt routine or do I miss someting ?
0
ericsonCommented:
by using base adress, I'm not using IRQ to access my extensions boards.
0
lermytteAuthor Commented:
Yes but my board generates an IRQ as soon it receives some data, than this data has to be recovered in VB6.
0
ericsonCommented:
Lermytte,

I just find a sample in my DDK installation what can help you. But its developed in C/C++.

The sample is \DDK\src\general\int.

to download DDK try www.microsoft.com/ddk

Best regards,

Ericson

0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.