MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Envio de SMS via ACCESS

    Compartilhe

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Envio de SMS via ACCESS

    Mensagem  silvasantos em Dom 07 Abr 2013, 19:04

    Olá, procurando pela net encontrei o exemplo em anexo que envia SMS via Acccess sem gateway, somente utiliza o celular plugado via cabo, blootooth ou modem usb.
    Funciona perfeitamente, somente gostaria de implementar o envio para os registros de uma tabela pois no mesmo exemplo, somente envia preenchendo um campo de texto pré- determinado.
    Se alguém puder dar alguma idéia ou alterar o modelo ficaria muito grato, ou se alguém somente precisar do exemplo fica registrada a contribuição.

    [Você precisa estar registrado e conectado para ver este link.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Ter 16 Abr 2013, 19:58

    E para emviar um registros ou todos?

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Ter 16 Abr 2013, 20:30

    Olá, então para enviar para um destinatário é só selecionar a porta e abrir a mesma, inserir o numero desejado e enviar, somente não consegui inserir uma tabela onde possam ser selecionados os destinatários para onde serão enviados a mensagem.
    Alguma idéia?

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Ter 16 Abr 2013, 21:42

    Estou baixando o exemplo, irei analisar e retorno.

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Ter 16 Abr 2013, 22:34

    Veja se é isto..

    Selecione o Destinatário nacombo, depois clique na caixa texto onde se insere a mensagem..

    Cumprimentos.
    Anexos
    TEST_SMS.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (78 Kb) Baixado 221 vez(es)


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Ter 16 Abr 2013, 23:34

    Olá, antes de mais nada, obrigado pela atenção.
    Quanto ao exemplo, acredito que não me expressei claramente, na verdade gostaria de enviar o sms para vários destinatários ao mesmo tempo, ex.:
    Poderia ser um determinado grupo de registros previamente filtrados por uma consulta sde acordo com algum critério tal como sexo, idade...
    Ao clicar em um botão, enviar a mensagem para esses registros.



    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 00:16

    Realmente não se expressou bem...

    Creio eu que o procedimento utilizado pelo sistema envia o SMS a cada fone... Portanto teriamos que criar uma combo de seleção multipla e fazer um loop pelos itens selecionados na mesma enviando a cada loop o SMS...

    Compreendeu?

    Cumprimentos


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 00:32

    É isso mesmo que gostaria.
    Pelos meus testes anteriormente, ele envia a cada número, já havia tentado colocar um loop mas me enrosquei em fazer o sistema ler um registro de cada vez.

    Em um módulo:

    Public Declare Function GetTickCount Lib "kernel32" () As Long
    Dim lngTickStore As Long

    Public Sub SlowDown(Delay)
    lngTickStore = GetTickCount()
    Do While lngTickStore + Delay > GetTickCount()
    DoEvents
    Loop
    End Sub


    E em cada loop do código:

    SlowDown (5000) '5 segundos

    Utilizei esse método para gerar o loop para não travar o sistema em cada busca.

    Inserindo manualmente o código a seguir consigo enviar o sms se utilizar varias caixas de texto:

    Ao clicar de um botão:

    TxtReply.Value = Null
    TxtCommand.Value = Null
    TxtCommand.Value = "AT+CMGF=1": Call CmdSend_Click
    TxtCommand.Value = "AT+CMGS=" & Chr(34) & Text27.Value & Chr(34): Call CmdSend_Click
    TxtCommand.Value = Text29.Value & Chr(26): Call CmdSend_Click

    SlowDown (5000) '5 segundos

    TxtReply.Value = Null
    TxtCommand.Value = Null
    TxtCommand.Value = "AT+CMGF=1": Call CmdSend_Click
    TxtCommand.Value = "AT+CMGS=" & Chr(34) & Text28.Value & Chr(34): Call CmdSend_Click
    TxtCommand.Value = Text29.Value & Chr(26): Call CmdSend_Click

    E assim por diante, mas não tive a habilidade de enviar através de uma combo ou qualquer outro método.
    Se não for incômodo, poderia tentar fazer um modelo utilizando a combo ou outro método como mencionado?

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 03:07

    Amanha vejo isto pra ti...

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 03:15

    Sem problemas, até mais!

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 03:35

    Transforme a combo que criei em uma listBox, nas propriedades, aba "Outras" no ítem Seleções Multiplas coloque como Simples.

    No botão SEND o seguinte código:



    Private Sub CmdSend_Click()
    Dim StrMovel As String
    Dim Count As Integer

    If Me.lstDest.ItemsSelected.Count = 0 Then
    MsgBox "Selecione ao menos um contato!", vbCritical, "ATENÇÃO"
    Exit Sub
    Else
    For Count = 0 To Me.lstDest.ListCount - 1
    If Me.lstDest.Selected(Count) Then
    'Aplico o numero do celular selecionado na lista à variável
    StrMovel = Me.lstDest.Column(2, Count)

    If Write_Port(StrMovel) <> Len(StrMovel) Then 'Write_Port. The function that sends the command
    MsgBox "Error writing to comm's"
    Exit Sub
    End If
    End If
    Next Count

    Write_Port (Chr$(13)) 'Chr$(13) stands for the key "Enter".
    'This way the target machine realizes
    'the end of a command
    'Me.TxtCommand = ""
    End If
    End Sub


    Podes incluir no código caso haja necessidade procedimento que atrase um pouco o loop pelo for, caso o envio demore um pouco...
    Um procedimento como um Pause...

    A caixa texto txtComand não será mais necessária.

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 04:02

    Amanhã pela manhã faço os testse e te respondo se deu certo, e por enquanto obrigado!

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 14:54

    Olá novamente!
    Fiz os devidos testes e constatei que o sistema não envia a mensagem...
    No CmdSend_Click o sistema originalmente verifica se as portas estão ok e envia o comando inserido ao modem.
    Acredito que se conseguirmos fazer o sistema ler a lista apartir do botão Command31_Click, funcioná, pois verifiquei que é nessa linha que ele seleciona o destinatário:

    TxtCommand.Value = "AT+CMGS=" & Chr(34) & Text27.Value & Chr(34): Call CmdSend_Click

    Onde está Text27.Value , se houver como selecionar os telefones em cada loop automaticamente na lista acredito que funcionará, na verdade seria necessário fazer o sistema a cada destinatário executar os comandos:

    ' aqui ele limpa as confirmações dos comandos
    TxtReply.Value = Null

    ' aqui ele limpa as o comando executado anteriormente
    TxtCommand.Value = Null

    ' aqui ele verifica através do Call CmdSend_Click se a porta está ok e envia o comando ao modem
    TxtCommand.Value = "AT+CMGF=1": Call CmdSend_Click

    ' aqui ele seleciona o destinatário no Text27.Value e novamente verifica a porta e envia ao modem
    TxtCommand.Value = "AT+CMGS=" & Chr(34) & Text27.Value & Chr(34): Call CmdSend_Click

    ' aqui ele seleciona a mensagem no Text29 e novamente verifica a porta e envia ao modem
    TxtCommand.Value = Text29.Value & Chr(26): Call CmdSend_Click

    'E aqui fariamos ele fazer um loop e selecionar o próximo da lista e executar os comandos novamente.

    Se tiver alguma idéia, agradeceria muito.

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 16:45

    Perdoe-me não havia percebido a aba SMS Sender... Nesta aba esta o botão SEND que por sua vez ativa o outro botão na segunda aba....

    Verei isto.

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 17:12



    Private Sub Command31_Click()
    Dim Count As Integer

    If Me.lstDest.ItemsSelected.Count = 0 Then
    MsgBox "Selecione ao menos um contato!", vbCritical, "ATENÇÃO"
    Exit Sub
    Else

    For Count = 0 To Me.lstDest.ListCount - 1
    TxtReply.Value = Null
    StrMovel = Empty
    StrMovel = "AT+CMGF=1": Call CmdSend_Click
    If Me.lstDest.Selected(Count) Then
    'Aplico o numero do celular selecionado na lista à variável
    StrMovel = Me.lstDest.Column(2, Count)
    StrMovel = "AT+CMGS=" & Chr(34) & StrMovel & Chr(34): Call CmdSend_Click
    StrMovel = Text29.Value & Chr(26): Call CmdSend_Click
    End If
    Next Count
    End If
    End Sub

    '============================================================================

    Private Sub CmdSend_Click()
    If Write_Port(StrMovel) <> Len(StrMovel) Then 'Write_Port. The function that sends the command
    MsgBox "Error writing to comm's"
    Exit Sub
    End If
    Write_Port (Chr$(13)) 'Chr$(13) stands for the key "Enter".
    'This way the target machine realizes
    'the end of a command
    'Me.TxtCommand = ""
    End Sub



    Algo assim...

    Cumprimentos.
    Anexos
    TEST_SMS.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (89 Kb) Baixado 122 vez(es)


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 17:30

    Agora sim está enviando, mas apenas para o primeiro selecionado da lista, só falta o sistema aguardar uns 2 segundos (anteriormente verifiquei que se for ralizado múltiplos envios, é necessário esta pausa entre os destinatários)a cada envio e fazer o envio para o próximo da lista.

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 17:32

    Explique melhor.. porque não envia ao segundo?


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 17:38

    Crie um módulo e o nomeeie de mdlDiversos...

    Nele:


    Public Function Pause(NumberOfSeconds As Variant)
    On Error GoTo Err_Pause

    Dim PauseTime As Variant, start As Variant

    PauseTime = NumberOfSeconds
    start = Timer
    Do While Timer < start + PauseTime
    DoEvents
    Loop

    Exit_Pause:
    Exit Function

    Err_Pause:
    MsgBox err.Number & " - " & err.Description
    Resume Exit_Pause

    End Function


    E onde deseja o pause:

    Pause X onde X será o numero de segundos.

    Ex.:

    Pause 2

    Cumprimentos


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 18:40

    Eis
    Anexos
    TEST_SMS.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (50 Kb) Baixado 229 vez(es)


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 18:53

    Funciona!
    Mas...
    Ao enviar a mensagem aparece no celular de destino:

    AT+CMGF=1
    AT+CMGS="XXXXXXXX"
    Mensagem de teste

    Onde XXXXXXXX é o número do destinatário, e as vezes aparece o número de outro destinatário e não o do qual recebeu a mensagem.


    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 19:40

    Bem amigo... Infelizmente so posso até aqui, pois não tenho como testar para voce....

    Faça testes e tente observar como a mensagem é enviada... e va modificando ate obter o resultado esperado.

    Sucesso!

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Qua 17 Abr 2013, 19:46

    Tranquilo.
    Agradeço muito a sua atenção e vou tentar me virar daqui.
    Até a próxima!

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qua 17 Abr 2013, 20:18

    Em obtendo resultado esperado poste o exemplo aqui.
    O Fórum agradece o retorno.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    Guima
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 26/09/2010

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  Guima em Sab 29 Jun 2013, 18:36

    Ola,

    Fiz um teste com o primeiro modelo citado, mas tá dando erro "error writing to comm's".

    Alguém pode me ajudar a resolver?


    Fiz os testes num Samsung Galaxy Tab 7 e em um Iphone 4


    Obrigado desde já

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Sab 29 Jun 2013, 18:46

    Qual exemplo baixou?

    Baixe o ultimo exemplo disponibilizado, Aguarde o silvasantos responder ele é a pessoa mais indicada para testar.
    Infelizmente não tenho como testar o exemplo.


    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    Guima
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 26/09/2010

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  Guima em Sab 29 Jun 2013, 19:00

    Ola Moderador!

    Baixei o primeiro e o último, mas em ambos o problema foi o mesmo.

    Agradeço sua ajuda e vou aguardar então o SilvaSantos.

    Saudações


    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Dom 30 Jun 2013, 02:21

    Olá, pode dar mais detalhes?
    Verificou se a porta do modem do celular aparece na lista de hardware do seu pc?
    Qual método utilizou? via cabo ou bluetooth?




    Guima
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 26/09/2010

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  Guima em Dom 30 Jun 2013, 03:09

    Ola SilvaSantos!

    Utilizei via cabo.

    Já com relação a porta do modem realmente tive dúvidas nesse caso, pois nao apareceu como available, mesmo após espetar o cabo e atualizar.

    Desde já obrigado

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Dom 30 Jun 2013, 03:18

    Então, é necessário que a porta esteja devidamente listada no gerenciador de dispositivos, no caso verifique com o dispositivo desconectado quais portas existem e depois plugue e veja quais foram adicionadas posteriormente e vá testando no bd.

    Guima
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 26/09/2010

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  Guima em Dom 30 Jun 2013, 03:26

    Pois é, meu problema a ai. Até vi isso em outro fórum, mas no meu windows não lista porta NENHUMA em gerenciador de dispositivos. Eu utilizo o Windows 7 Professional. Nesse caso muda algo ?

    Mais uma vez obrigado

    silvasantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 29/01/2012

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  silvasantos em Dom 30 Jun 2013, 03:41

    O ideal seria que testasse em outro pc ou outra versão do windows para detectar se o problema é do dispositivo ou do sistema operacional, pois se as portas não estiverem listadas não irão funcionar no bd, outra solução é tentar via bluetooth, e depois de instalado e pareado verificar a porta com que o sistema definirá para o dispositivo.

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Dom 30 Jun 2013, 04:09

    De uma pesquisada no Google sobre integracão do teu celular e windows 7, é possível que encontre alguma coisa.. até mesmo alguma atualização apra que funcione.


    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qui 10 Abr 2014, 01:16

    Boas SilvaSantos, pode me ajudar com este exemplo?

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12246
    Registrado : 01/03/2011

    Re: [Resolvido]Envio de SMS via ACCESS

    Mensagem  HARYSOHN em Qui 10 Abr 2014, 02:41

    Dúvida resolvida

    Resolução:
    Para o modem funcionar deve estar desocupado, ou seja, não estar conectado a internet ou outros tipos de serviços
    Deve ser utilizado exclusivamente para a função.

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

    sawagner
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 25
    Registrado : 12/05/2016

    Alteração para 64 bist

    Mensagem  sawagner em Qui 12 Maio 2016, 16:37

    Está dando um erro na biblioteca pois meu windows é 64 bits. Algué sabe como alterar a biblioteca de 32 para 64 bits?

    jefersonborba
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 25/01/2013

    Versão 64bits

    Mensagem  jefersonborba em Ter 09 Ago 2016, 01:52

    Meus caros, tentei executar o código apresentado por vocês na versão 64bits do Access, há solução?

      Data/hora atual: Ter 06 Dez 2016, 05:45