Parallel Port Programming Windows XP

[aviles73]

I have a problem with sending data to my parallel port in Windows XP only! The source code below works fine in any other version of windows.

Declare Sub vbOut Lib "WIN95IO.DLL" (ByVal nPort As Integer, ByVal nData As Integer)
Declare Sub vbOutw Lib "WIN95IO.DLL" (ByVal nPort As Integer, ByVal nData As Integer)
Declare Function vbInp Lib "WIN95IO.DLL" (ByVal nPort As Integer) As Integer
Declare Function vbInpw Lib "WIN95IO.DLL" (ByVal nPort As Integer) As Integer


Button1_click
vbOut 888, 0
End Sub

I know that "WIN95IO.DLL" is probably outdated but if so is there a different DLL for XP.

I also heard that Windows XP locks out parallel port access. Please anyone who can HELP!!! I have programs written already to control a robot I made but now all my port access is screwed.

THANKS,
Tony