MSComm1.CommPort = 2 'Sets the Com Port number (this can be changed here) MSComm1.Settings = "9600,n,8,1" 'Sets the Baud rate (9600 in this case) MSComm1.PortOpen = True 'opens the port MSComm1.Output = Chr$(27) + "p" + "0" + "zz" 'Sends a pulse to the Com Port MSComm1.PortOpen = False 'Closes the port when finished
agus mustofa <[EMAIL PROTECTED]> wrote: klo gak salah dulu saya pake dll (library) untuk membuka port serial. Mungkin juga bisa dicoba pake mscomm, soalnya seinget saya mesin itu terbuka dengan hanya mendapat trigger 1 atau 0 (true-false). coba disearch aja dll nya, dulu juga saya cari pake google. salam A.Mustofa ----- Original Message ---- From: antoni toni <[EMAIL PROTECTED]> To: [email protected] Sent: Saturday, February 17, 2007 7:20:59 AM Subject: [indoprog-vb] Pont of sales Hai teman-teman, mau tanya : Koding untuk koneksi dari VB ke mesin cash register gmana yach ??? Ketika ditekan enter, mesin tsb akan keluar sendiri. (seperti di supermarket) Thank's. ------------ --------- --------- --- __________________________________________________________ Be a PS3 game guru. Get your game face on with the latest PS3 news and previews at Yahoo! Games. http://videogames.yahoo.com/platform?platform=120121 [Non-text portions of this message have been removed] ---------------------------------------------------------------------------------------------------------------------------- * Kursus Visual Basic - XBasicPro Jl. Denai No. 92 Medan - Flexi:77374922 - HP:08196043579 Send instant messages to your online friends http://uk.messenger.yahoo.com [Non-text portions of this message have been removed]
