Newsgroup: it.comp.appl.access
Titolo: stampa diretta sulla porta 9100

Buongiorno a tutti,
dovrei interfacciare ad un mio programma una stampantina con porta
ethernet.
La stampante accetta comandi Esc/Pos, e ho necessita di inviare i comandi
di stampa direttamente sulla porta 9100, che � quella utilizzata dalla
stampante.
Per maggior chiarezza, fino ad ora ho utilizzato lo stesso sistema ma per
le porte seriali, ma non ho trovato soluzione per la porta Ip.
In Access � possibile aprire direttamente, la porta 9100???
Grazie 1000.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Quale modello di stampante usi?
Ciao, Carlo 

 Ciao, Carlo



Queste stampanti hanno i driver per Windows...una volta settato l'ip della 
stampante questo viene visto come una porta stampante e dunque puoi inviare, 
per esempio, un report (opportunamente dimensionato). O no?
Ciao, Carlo 

 Ciao, Carlo
Si tutto vero quello che dici Carlo, ma...
Il gestionale che ho sviluppato ha sempre utilizzato le stesse stampanti
con dati che viaggiano sulla porta RS232 inviando comandi Esc Pos,
ed ora per semplicit� di cablaggio delle stampanti volevo passare a quelle
ethernet quindi aprendo direttamente la porta 9100 e mandando gli stessi
comandi.
Comodissimo anche perch� non ti devi preoccupare della formattazione dei
report e soprattuto + affidabile e + veloce che utilizzare la stampante
del O.S.
In rete ho trovato qualcosa, ma il codice che ho trovato si riferisce ad
un aggetto o a un ocx che non riesco ne ha capire di che cosa si tratti ne
tantomeno a reperire, questo � il codice che ho trovato, tu ci capisci????
'//
'//- INIZIO CODICE
'//
Option Compare Database
Option Explicit
Dim Printer(100)
Dim PrintIp(100)
Private Sub CmdPrint_Click()
Dim Str As String
Ws.CONNECT PrintIp(1), 9100
DoEvents
End Sub
Private Sub Form_Load()
Printer(1) = "LRC Printer"
Printer(2) = "Home Printer"
PrintIp(1) = "192.168.0.20"
PrintIp(2) = "161.122.2.11"
With CboPrint
AddItem Printer(1)
AddItem Printer(2)
End With
End Sub
Private Sub Ws_Connect()
Ws.SendData TxtText.Text
DoEvents
Ws.Close
MsgBox ("Message has Been Printed ")
End Sub
'//
'//- INIZIO CODICE
'//
Grazie per l'interessamento, 
Gaetano.


 ha scritto nel messaggio 
news:hm124o$lgn$1...@news.newsland.it...

Ciao Gaetano
mi sembra che il codice proposto possa funzionare con file di testo (o invio 
di una sequenza di testo).
L'ocx in questione � l'MSWinsock di Microsoft che dovrebbe gia trovarsi in 
c:\Windows\System32.
Qualora non fosse presente occorre scaricarlo per esempio da qui:
http://www.ascentive.com/support/new/support_dll.phtml?dllname=MSWINSCK.OCX
alla posizione "Alternatively", e registrarlo per come riportato.
A questo punto devi aggiungerlo in una maschera di Access.
Richiede un minimo di conoscenza...
Ciao, Carlo

 Ciao, Carlo
Grazie ci provo.


 Ciao, Carlo
Funziona che � una meraviglia,
grazie per la dritta!!!!


 grazie per la dritta!!!!
Grazie anche a te per il feedback.
Perch� non ne fai un piccolo articolo da pubblicare sui siti collegati?
Ciao, Carlo 

 Ciao, Carlo
Appena ho un p� di tempo ci provo,
ma a chi dovrei inviarlo??



A noi di Accessgroup per esempio
