Est-il possible d'ouvrir 1 tiroir caisse depuis une appli. Access ?
Est-il possible d'ouvrir 1 tiroir caisse depuis une appli. Access ?
La réponse, tu t'en doute est oui....
Comment ?
Aucune idée, mais je pense que tu dois envoyer une séquence ESC a un port précis ou quelque chose comme ca.
Merci,
pour le reste, je suppose que j'aurai plus d'infos avec le manuel du tiroir?
Il me restera encore à apprendre comment communiquer avec 1 port en VB
Ceci est une suggestion :
Pour communiquer avec un port regarde si tu peux faire un
Open "COM1:" for Binary as monNumeroDeFichier.
C'est une vielle méthode pour accéder aux port série (ici Com1) d'un système.
A+
j'ai une application access qui a ouvert quelque milliers de fois le tiroir caisse (toutes les deux/trois minutes depuis plusieurs années)
j'ai "fauché" le composant mscom dans visual basic pour piloter le port serie
il faut enplus récuperer msadodc.ocx
je l'ai installé dans un formulaire que j'ai appelé rs232
' utilisation du composant MSComm (recupere dans Visual Basic) que j'ai appelé rs232
remarque: j'utilise le meme composant pour piloter l'imprimante ticket
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25 DoCmd.OpenForm "rs232" [Forms]![RS232].no_port = 2 [Forms]![RS232].RS232.CommPort = 2 [Forms]![RS232].RS232.Settings = "9600,N,8,1" [Forms]![RS232].RS232.PortOpen = True j'envoi ensuite une sequence escape ' ouverture tiroir [Forms]![RS232].envoi = Chr(27) & Chr(112) & Chr(0) & Chr(30) & Chr(10) [Forms]![RS232].envoi_rs232 DoCmd.close acform,"rs232" attention tous les tiroirs caisse n'ont peut_etre pas la meme sequence escape pour s'ouvrir Public Sub envoi_rs232() If IsNull(Me.envoi) Then Exit Sub End If If Len(Me.envoi) = 0 Then Exit Sub End If Me.RS232.Output = CStr(Me.envoi) End Sub
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager