Adicionado exemplo de VB6 para o envio de SMS