[Resolvido]Conectando com a rede atraves de um form

Senhores, estou criando este projetinho baseado em um projeto que montei em excel, e estou com um problema que agora nao sei nem como pesquisar na net.
Abrindo o FormularioCorridasConvenio, no botao googlemaps, abro um outro form de pesquisa, que quando clico em pesquisar esta aparecendo o problema...


O tipo definido pelo usuario nao foi definido...

Sub fnPesquisarDistânciasETemposNoGoogleMaps( _
ByVal strEndereçoDePartida As String, _
ByVal strEndereçoDeChegada As String)
''' ALeXceL@Gmail.Com: 2007-10-28
''' ALeXceL@Gmail.Com: 2012-04-14 Rev.01
Dim oKm As Object
Dim oTempo As Object
Dim oAll As Object
Dim oDIV As Object
Dim strRoteiro As String
Dim strKm As String
Dim strTempo As String
Dim aRoteiro() As String
Dim intItem As Integer
Dim objDIV_TravelMode As MSHTML.HTMLDivElement
Dim strTitle As String
Dim objA As MSHTML.HTMLAnchorElement
Dim objLI As MSHTML.HTMLLIElement
Dim lblChegadaRetornado As String
Dim lblPartidaRetornado As String

Esse tipo de erro costuma ser falta de referência. Ou você precisa adicionar alguma referência ou verificar se tem alguma delas escrito AUSENTE na lista de referências.

Salve Criquio,

Na verdade eu já tinha analisado se tinha alguma referencia ausente, não encontrei, e para adicionar referencias não tenho esta experiencia...

continuo no aguardo de uma luz.

Provavelmente existe alguma dll ou ocx que acompanha o exemplo. Se sim, precisa registrá-la. Ou ver em um exemplo funcional que referências estão marcadas. Talvez alguma ligada a HTTP ou algo assim referente à protocolo de Internet. Você tem algum exemplo funcional disso?

Senhores,

consegui resolver o problema da falta de referencia no meu projeto mas agora o problema é outro.

Agora ele se conecta com a rede, faz a pesquisa, mas não retorna para os forms nenhuma informação, ja pesquisei aqui no forum mesmo e se da como resolução do problema o seguinte código e ou similares:


Form_FormularioCorridasConvenio.lstMsg.Value =" Aguarde um momento por favor..."
Form!FormularioCorridasConvenio!lstMsg = " Aguarde um momento por favor..."
( esta é somente uma das informações que o codigo deveria retornar )

mas no meu caso não retorna nada, não preenche nenhum campo.

O modulo é chamado no botão pesquisar do formulariogooglemaps

Alguem por favor e agradeço desde ja, poderia dar uma olhada no anexo?

obs. do que pesquisei, as diferenças dos outros topicos que encontrei aqui são que não é de um form para outro e nem é no evento open do form nem no evento click de um comando e sim um codigo dentro de um Modulo, não entendo se isto tem a ver mas...

Fabio Pradella

Você está a utilizar listbox para as mensagens, a recomendação é uma Label (Rotulo).

Alterei as listbox`s das mensagens e as linhas de referencia no código.

Teste e veja as diferenças;


Forms!FormularioCorridasConvenio.Form!lstMsg.Caption = " Aguarde um momento por favor..."

Bom dia Jpaulo,


que mancada a minha, falta de atenção mesmo, mas estou aqui para aprender inclusive com os erros, ja estou modificando todo o projeto e fazendo as correções.


Muito obrigado.

Fabio Pradella

Obrigado pelo retorno o forum agradece.

JPaulo,

ja fiz as modificações transformando os comandos em label, mas se voce olhar o ultimo bloco do codigo,( Modulo 1 ), ele dependendo da distancia ( km ) retornada, manda para o formulario "CorridasConvenio" valores pre definidos,( mas estes comandos são caixas de texto, tem como reconstruir este trecho do codigo mantendo a caixa de texto? ou tenho outra alternativa?

Senhores,


Consegui resolver o ploblema repassando as referencias.


Obrigado a todos