BlackZeroX, ¿como decirlo sin sonar gay?
Sos un tierno
Tuve que cambiar algunos comandos AT pero funcionó EXCELENTE
Sos un tierno

Tuve que cambiar algunos comandos AT pero funcionó EXCELENTE
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú

| |-+ Resultados de la búsqueda
Páginas: [1]
No se encontraron resultados
Páginas: [1] AT 'son comandos AT
OK
AT+CMGF=1 'manejar el mensaje en formato texto
OK
AT+CMGW="+666" 'mandar sms a este numero
> Testeo de texto largo para probar bla bla bla bla bla bla bla bla bla. 'contenido del sms a enviar
+CMGW: 14398
OK
AT+CMSS=14398
+CMSS: 20
OKSub Espera(Segundos As Single)
Dim ComienzoSeg As Single
Dim FinSeg As Single
ComienzoSeg = Timer
FinSeg = ComienzoSeg + Segundos
Do While FinSeg > Timer
DoEvents
If ComienzoSeg > Timer Then
FinSeg = FinSeg - 24 * 60 * 60
End If
Loop
End SubMSComm1.InputLen = 0
MSComm1.CommPort = "3" ' Com3 Port
Espera (1)
MSComm1.Settings = "57600,n,8,1"
Espera (1)
MSComm1.PortOpen = True
Espera (1)
MSComm1.Output = "AT" & Chr(10)
Espera (1)
MSComm1.Output = "AT+CMGF=1" & Chr(10)
Espera (1)
MSComm1.Output = "AT+CMGW=" & "+666" & Chr$(13) & Chr(13) & Chr(10)
Espera (1)
MSComm1.Output = "Contenido sms aca" & Chr(26)
sino me entenderían que NO es ilegal y que NO estoy entrando a ningún servidor ajeno para probar/demostrar/investigar.
AT
OK
AT+CMGF=1
OK
AT+CMGW="001"
> 001
+CMGW: 14593
OKAT+CMGD=14593AT+CMGD=14593,4AT+CMGD=?
CitarLa Policía eslovena identificó y detuvo la semana pasada a un joven de esa nacionalidad de 23 años, conocido como 'Iserdo' por el alias que usaba en Internet, como sospechoso de haber creado esta red, que según el FBI podría haber afectado de ocho a doce millones de equipos en todo el mundo.