Page 1 sur 2
imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 18:46
par nico
Bonjour,
Est t'il possible d'imprimer directement sur une imprimante en wifi sans avoir de driver avec l'adresse ip de l'imprimante?
Il me semble avoir vu une ligne de code qui permettait d'envoyer du texte à imprimer directement à l'imprimante.
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 20:32
par falsam
je viens de tester
Code : Tout sélectionner
IP.s = "192.168.?.?" ;Ip Imprimante
Port.i = 9100
InitNetwork()
Connection = OpenNetworkConnection(IP, Port, #PB_Network_TCP)
If Connection
Debug "Ok"
SendNetworkString(Connection, "Test")
SendNetworkString(Connection, #FF$) ;ne pas oublier le Form Feed
EndIf
CloseNetworkConnection(Connection)
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 21:30
par nico
C'est exactement ce que je recherchais, sauf que pour moi, ça ne fonctionne pas, y a t'il une configuration à faire sur l'imprimante?
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 21:54
par falsam
nico a écrit :C'est exactement ce que je recherchais, sauf que pour moi, ça ne fonctionne pas, y a t'il une configuration à faire sur l'imprimante?
Juste connaitre le port en plus de l'adresse IP.
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 21:56
par falsam
Pourrais tu lancer ce code en changeant le texte pour voir si l'impression distante fonctionne. En principe ça devrait fonctionner. je te retournerais ta phrase
Code : Tout sélectionner
IP.s = "85.168.27.54"
Port.i = 9100
InitNetwork()
Connection = OpenNetworkConnection(IP, Port, #PB_Network_TCP)
If Connection
Debug "Ok"
SendNetworkString(Connection, "Phrase de nico")
SendNetworkString(Connection, #FF$)
EndIf
CloseNetworkConnection(Connection)
D'autres peuvent essayer aussi.
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 22:20
par falsam
Apparemment ça fonctionne
Merci Nico pour ce test.
PS : Si d'autres essayent, n'oubliez pas de changer la phrase.
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 22:21
par nico
J'ai lancé et la connexion à été acceptée, pour moi ça ne fonctionne pas.
[EDIT] OK t'as vu.
T'as quoi comme imprimante.
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 22:26
par falsam
nico a écrit :J'ai lancé et la connexion à été acceptée, pour moi ça ne fonctionne pas.
[EDIT] OK t'as vu.
T'as quoi comme imprimante.
J'ai fait un test sur une HP-C310 (Wifi), et tu as envoyé ton impression sur une HP 8500 (Wifi).
Pour les impressions distantes, j'ai redirigé les ip entrantes sur mon routeur, vers l'adresse ip et le port de l'imprimante.
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 22:41
par nico
Une petite question #FF$, ça correspond à quel valeur?
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 22:47
par falsam
nico a écrit :Une petite question #FF$, ça correspond à quel valeur?
J’espère que ça correspond à la séquence de caractère Form Feed (Code ASCII 12).
http://www.purebasic.com/french/documen ... ascii.html
Re: imprimer ,depuis un autre PC
Publié : sam. 29/sept./2012 22:49
par nico
ok, ça correspond à la valeur 12, suffisait de faire un asc en fait.
imprimer ,depuis un autre PC
Publié : dim. 30/sept./2012 13:27
par wood51
Bravo Falsam , tu viens de réinventer le fax
. Y'a t il quelque chose que tu ne sache pas faire ?
Re: imprimer ,depuis un autre PC
Publié : dim. 30/sept./2012 17:05
par nico
Est ce que tu peux laisser ton imprimante connecté à cette adresse 85.168.27.54 ?, j'aimerais faire des tests, penses à mettre des feuilles de brouillon.
Re: imprimer ,depuis un autre PC
Publié : dim. 30/sept./2012 20:05
par falsam
nico a écrit :Est ce que tu peux laisser ton imprimante connecté à cette adresse 85.168.27.54 ?, j'aimerais faire des tests, penses à mettre des feuilles de brouillon.
Elle est connectée depuis hier soir avec un minimum de feuilles (usagées). Si d'autres souhaitent tester les impressions à distance ......
Code : Tout sélectionner
IP.s = "85.168.27.54"
Port.i = 9100
InitNetwork()
Connection = OpenNetworkConnection(IP, Port, #PB_Network_TCP)
If Connection
Debug "Ok"
SendNetworkString(Connection, "N'oubliez pas votre nom :)" + #CRLF$)
SendNetworkString(Connection, "Ligne 1" + #CRLF$)
SendNetworkString(Connection, "Ligne 2" + #CRLF$)
SendNetworkString(Connection, "Ligne 2" + #CRLF$)
SendNetworkString(Connection, #FF$)
EndIf
CloseNetworkConnection(Connection)
Re: imprimer ,depuis un autre PC
Publié : dim. 30/sept./2012 20:48
par nico
T'as reçu un truc?