Tengo un problema con este programa que tiene incopatibilidades con xp, con win 98 funciona perfecto
pero con xp, no hace nada las señales de portout no hacen nada.
Que estoy haciendo mal?.
Muchas gracias por su ayuda.
Dim activacion As Integer
Private Sub Command1_Click()
activacion = 1
PortOut &H378, 1
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
activacion = 2
PortOut &H378, 4
Timer1.Enabled = True
End Sub
Private Sub Command3_Click()
PortOut &H378, 0
End
End Sub
Private Sub Timer1_Timer()
If (activacion = 1) Then
PortOut &H378, 4
activacion = 2
Else
PortOut &H378, 1
activacion = 1
End If
End Sub
Segun lei en WinXP tenes que usar otra DLL para manejar el puerto paralelo. Leete este hilo, esta muy completo > http://foro.elhacker.net/index.php/topic,48748.0.html
Sino buscate algun ejemplo, hay muchos...
Saludos.-
Gracias por responder, ese tema lo lei completo, tengo el io.dll que es para xp y el inpout32.dll para xp, pero ninguno hace algo. la direccion del puerto la verifique y es la que estoy usando. No se que puede estar pasando.
Registraste las dll(regsvr32), la copiaste al system32, si hiciste eso quizas no se trate ya del programa si no de algo externo
CitarRegistraste las dll(regsvr32), la copiaste al system32
registrar??
yo tengo q hacer dentro de poco un trabajo con el puerto paralelo
y tengo q bajar esas dll, pero no se q es eso de registrar :huh:
lo unico que hice fue copiarlas al system32, pero, al igual que demon_cry, no se a que te referis con registrarla.
primero tienes k usar el USerPort.
ve a todo www.todorobot.com y bajate ewl programa de las luces y preubalo...luego intenta con el tuyo...
asi lo hice funcionar
El programa no lo encontre, pero busque sobre userport y me lo baje lo puse en el system32/drivers ejecute el programa le puse la direccion del puerto, (cerre el puerto para poder actualizarlo), pero nada paso. Despues segui una guia del porttalk que algo similar al userport y tampoco dio resultado.
Gracias igual.