AT 명령을 사용하여 vb6에서 여러 모바일 #을 보내는 방법

Question

안녕하세요 여러분, vb6.0에서 응용 프로그램을 개발하는 것은 괜찮습니다. # 두 개 이상의 모바일을 보내려고 할 때 # 첫 번째 #에만 보내고 # 다른 하나는 없다. 여기 내 코드를보십시오.

MSComm1.Output = "AT" & vbCrLf 
       Sleep 100 
       MSComm1.Output = "AT+CMGF=1" & vbCrLf 
       Sleep 200 

       MSComm1.Output = "AT+CMGS=" & Chr(34) & tmpM_MobileNum & Chr(34) & vbCrLf 
       Sleep 300 

       MSComm1.Output = "AT+CMGS=" & Chr(34) & tmpF_MobileNum & Chr(34) & vbCrLf 
       Sleep 400 

       MSComm1.Output = TMPMESEJ & Chr(26) & vbCrLf 
       Sleep 500 

당신이 저를 도울 수 있기를 바랍니다.

Answer 1

모뎀을 통해 SMS를 보내려면 AT + CMGS를 사용하는 것이 맞지만 사용자가 명령 구문을 올바르게 따르지 않는다고 생각합니다.

는 다음 보낼 필요가 :

1. AT+CMGS=<Mobile phone number><cr>
2. <Message text><ctrl-Z>

당신은 하나 개의 휴대 전화 번호를 한 번에 하나의 메시지를 보낼 수 있습니다. 그리고 난 당신의 코드는 방법함으로써 <ctrl-Z>

을 보내려고하기 전에 여러 메시지를 보낼 시도하고 볼 수있는 것과 나는 모뎀이 응답을 확인하는 것이 유용 할 것이라고 생각 ASCII 문자 (26)

//////////////////////////////////////// 
// Send message to first mobile number 
//////////////////////////////////////// 

MSComm1.Output = "AT+CMGS=" & Chr(34) & tmpM_MobileNum & Chr(34) & vbCrLf 
// Wait for answer from modem should return ">" 

MSComm1.Output = "Test Message One" & Chr(26) 
// Wait for answer to check if OK came back 

//////////////////////////////////////// 
// Send message to second mobile number 
//////////////////////////////////////// 

MSComm1.Output = "AT+CMGS=" & Chr(34) & tmpF_MobileNum & Chr(34) & vbCrLf 
// Wait for answer from modem should return ">" 

MSComm1.Output = "Test Message Two" & Chr(26) 
// Wait for answer to check if OK came back