Discussion :

[JetLibre]

Bonjour

la commande MSComm1.OutPut "ATDT 0123456" pour faire un appel via une carte fax/modem mais avec VB6

je cherche la commande avec Visual Studio 2012

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        DialModem()
    End Sub
 
    Sub DialModem()
                   'Appel le numero via un modem installer sur COM3.
         Using comX As IO.Ports.SerialPort = My.Computer.Ports.OpenSerialPort("COM3", 15200, 0, 8, 1)
 
            comX.DtrEnable = True
            comX.Write("ATDT 98639784" & vbCrLf)
 
        End Using
    End Sub

lorsque j’appuie sur la bouton 2 j’entends un click (ouverture du port) mais la composition du numero ne se fait pas.

[Graffito]

Essayer ";\r" au lieu de vbcrlf

Aussi insérer un Write de la commande ATZ avant de composer le premier numéro.

[JetLibre]

Merci GRAFFITO pour ton aide mais ça n'a pas marché

ni ATZ ni \r