Programación General > Visual Basic 6.0 e inferiores
Ieee 1284 Vb6 Inpout.dll
(1/1)
accept:
SALUDOS changos de la informatica
e aca otro chango ya q mi problema es el sgte
estoy aciendo mi tesis (ing (e) informatica) sobre el control de elementos electronicos en vb6
y al tratar de conectar los dispositivos a la placa de potencia el codigo q creia q funcionaba se echo a rodar y me dejo tirado.
es el sgte
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
La ruta para la utilizacion del puerto se accede con la instrucion out. Ej: 2 botones (encendido/apagado)
Private Sub Command1_Click()
Out &H378, 0
End Sub
Private Sub Command2_Click()
Out &H378, 1
End Sub
funciona con la dll inpout
ahora bien'do si alguno de ustds me puede echar una manito
muy agradesido
SALUDOS
ACCEPT
ciaooooooooo
PD : con un ejemplo quedo listo
PD2 : aprendo rapido
Toph:
--- Cita de: "accept" ---
y al tratar de conectar los dispositivos a la placa de potencia el codigo q creia q funcionaba se echo a rodar y me dejo tirado.
es el sgte
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
--- Fin de la cita ---
hola accept, no das mucha informacion :huh: sobre que errores te da, asi que voy a iniciar de cero, primero, esta declaracion debes ponerla aparte en un modulo (.bas) y tener la libreria inpout32.dll en system32 o system (dependiendo de tu sistema operativo)
si ya tienes esto y aun asi no funciona, pues tu problema no debe ser en el programa, tengo varios ejemplos del uso del puerto paralelo y la unica diferencia que veo es que yo hago la declaracion de esta forma
--- Código: Text --- Public Declare Function Inp Lib "inpout32.dll" _ Alias "Inp32" (ByVal PortAddress As Integer)As BytePublic Declare Sub Out Lib "inpout32.dll" _ Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Byte)
Pero dudo que sea el problema, por ahi tengo varios ejemplos del uso del puerto paralelo por si los necesitas.
saludos y suerte :hola:
accept:
hola Tania_D
gracias por la respuesta
en verdad no sabia q la public declare funcion se tenia q poner en un *.bas
estaria encantado si subes algun ejemplo.
SALUDOS
ACCEPT
ciaoooooo
Toph:
Hola accept, adjunto un ejemplo que es para hacer pruebas basicas lo encontre en un tutorial de puerto paralelo aqui: http://yoelocmin.tk/# (en programas)
en el text1 debes poner la direccion del puerto a usar (378) ya que en algunos casos no es esta.
es muy basico :unsure: , tengo mas ejemplos pero necesitarias circuitos para conectar al puerto paralelo.
ojala te ayude
saludos :hola:
accept:
GRACIAS
SLUDOS
ACCEPT
ciaoooooooooo
Navegación
Ir a la versión completa