Silahkan lihat di menu file dalam folder hammet nama filenya sms.rar. setelah itu coba dulu AT COMMAND nya support gak dengan GSM Modem kamu.untuk coba AT Command kamu bisa coba dengan Hyper Terminal di Windows.semoga membantu.
Regard, Hammet --- In [email protected], "East Flower" <[EMAIL PROTECTED]> wrote: > > Saya buat kode seperti ini di VB6, kok gak jalan yah? > > Private Sub Command1_Click() > Dim PhoneNo As String > MSComm1.CommPort = 7 'Comm Port > MSComm1.Settings = "9600,N,8,1" 'Comm Port Setting String > MSComm1.InputMode = comInputModeText ' Read Text > MSComm1.InputLen = 0 ' Entire buffer > MSComm1.PortOpen = True > PhoneNo = "AT+CMGS=" & Chr(34) & "nohptujuan" & Chr(34) & vbCrLf > MSComm1.Output = PhoneNo > PhoneNo = "Halloo euyyy" & Chr(26) > MSComm1.Output = PhoneNo > End Sub > > Ada yang pernah buat? > > Terimakasih >
