SoloCodigo

Hola..     hola!...mira lo primero que debes hacer es bajarte el inpout32.dll y copiarlo en tu carpeta system o system32 de windows..lo puedes hacer de esta página ..ya que aquí los dll no están defectuosos y yo ya los he bajado antes ..http://www.davphantom.net/ocx.htm..

luego ..en google hay muchos codigos que te pueden ayudar ..pero si quieres uno en visual basic aqui te pongo el mío....
[CODE]
Option Explicit
#If Win32 Then
Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (byvalPortAddress As Integer) As Integer
Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal portaddress As Integer, ByVal value As Integer)
#End If

Private Sub Command1_Click()
Out &H378, 1
End Sub

Private Sub Command10_Click()
Out &H378, 0
Out &H378, 0
Out &H378, 0
Out &H378, 0
Out &H378, 0
Out &H378, 0
Out &H378, 0
Out &H378, 0
End Sub

Private Sub Command2_Click()
Out &H378, 2
End Sub

Private Sub Command3_Click()
Out &H378, 4
End Sub

Private Sub Command4_Click()
Out &H378, 8
End Sub

Private Sub Command5_Click()
Out &H378, 16
End Sub

Private Sub Command6_Click()
Out &H378, 32
End Sub

Private Sub Command7_Click()
Out &H378, 64
End Sub

Private Sub Command8_Click()
Out &H378, 128
End Sub

Private Sub Command9_Click()
Out &H378, 1
Out &H378, 2
Out &H378, 4
Out &H378, 8
Out &H378, 16
Out &H378, 32
Out &H378, 64
Out &H378, 128
End Sub

Private Sub Form_Load()
Dim a As Double
a = Inp(&H378)
Print a

End Sub
para probarlo...pudes comprar unconector db25 macho, 8 resistencias de 680 y 8 leds....http://www.pablin.com.ar/electron/circu ... /index.htm
espero que te sirva     cualquier cosa me puedes escribir..bye...

gracias eliza_marti , he probado eso pero lastimosamento aun no funciona, he cambiado mi Windows XP por el Windows 98, le he puesto el inpout32.dll y aun asi no funciona, estoy utilizando 6 de las 8 salidas, con resistencias de aprox 600 ohms y leds. Les agradeceria infinitamente si me pueden orientar, de repente me esta faltando algo, y por eso no me sale. Espero me puedan responder pronto pues tengo que presentarlo este miercoles 6!!!! please!!!!!!!

Gracias de antemano a todos  

Ah.. se me olvidava...yo lo hice en windows xp...no en windows 98...púébalo..sí te va a salir...para tí nada es imposible ....mentalizate eso(© Jonathan ©)....      

Holaaaaaaaaaaaaaaaaaaa
gracias eliza_marti, tu ayuda me fue de gran utilidad, finalmente el dichoso programa funciono asi q toy happy, subiria el programa, pero pesa 168k, mas de los permitido, asi que si quieres me das tu correo y te lo mando.
Son las 3:30 am y x fin toy dando los ultimos toques, lo voy a presentarlo dentro de algunas horas (a las 11 am) y luego te cuento que tal me fue.
Por cierto, recomiendo mucho la pagina http://es.geocities.com/fisicomolon/   excelente, me ayudo un monton a resolver mi problem.
Saludos, y gracias nuevamente, byeeee