Graymalkin

Dê uma olhada no OdbcConnection, pois acredito que por ele você poderá fazer o desejado. Abraços, Graymalkin

Experimente fazer... If nc < 16 Then ... ao invés de... If nc <= 16 Then ... e veja se dá certo. Foi o único problema que eu achei testando o código. Abraços, Graymalkin

Sim, mas vale lembrar que isso só vale para arrays dimensionados na declaração (e não para arrays dinâmicos). Abraços, Graymalkin

Não tão idiota assim, já que está *quase* certo: If #4/20/2006# < #5/1/2006# Then MsgBox "Maio é maior do que Abril" Ok? Graymalkin

Ela não vai te retornar o nome do arquivo recentemente criado, mas sim todos os nomes de arquivos de um determinado diretório. Exemplo: pasta = "d:\temp\" arq = Dir(pasta, vbArchive) Do While arq <> "" Debug.Print arq arq = Dir Loop Certo? Graymalkin

Meu site agora é: http://www.gs.kitbr.com/. Ele está fora do ar, por enquanto, mas ainda nesta semana ele estará de volta. Abraços, Graymalkin

Uma caixa de texto (TextBox) com a propriedade MultiLine como True. E a respeito daquele "nc"? Ele não deveria ser zerado em alguma parte do loop? Abraços, Graymalkin

Então, é isso mesmo. Em MSN.MyContacts você tem todos os seus contatos e pode pegar qualquer um (ou todos) e passá-los para o método InstantMessage(). Você não vai poder obtê-los a partir da listbox porque ela está guardando somente uma string, e não o objeto todo. Experimente utilizar o método InstantMessage() dentro daquele loop que você fez para listar os contatos. Abraços, Graymalkin

Eu não tenho esta biblioteca do MSN aqui, mas creio que para o método InstantMessage() você deveria passar um objeto IMessengerContact. Mas, você pode saber isso através daquele balãozinho amarelo que aparece com a assinatura da função. Abraços, Graymalkin

Não seria... i:='%'; ...? Graymalkin

O que você tem que passar para o método InstantMessage()? Graymalkin

Sim, você poderia criar um segundo programa só para apagar o executável do primeiro e chamá-lo quando este fosse fechado. Através da função FindWindow teria como você saber se a janela do primeiro já foi fechada e daí apagar o executável; ou você poderia simplesmente estimar o tempo que o seu programa leva para ser fechado (coisa de segundos) e fazer com que o segundo esperasse o determinado tempo antes de apagar. Abraços, Graymalkin

Você não sabe obter o item clicado na DBGrid? É esse o problema? Se for, provavelmente este DBGrid está ligado a um DataSource, certo? Que por sua vez tem um DataSet associado, correto? Então, é só pegar o respectivo campo do DataSet, já que o ponteiro da tabela é alterado de acordo com a seleção na DBGrid. Certo? Graymalkin

Você também pode fazer isso através da função GetAdaptersInfo. Você encontra a declaração dela e um exemplo no API-Guide: http://www.allapi.net/ ou http://www.mentalis.org/ Abraços, Graymalkin

Você já experimentou fazer uma outra busca dobrando a última letra (como no caso do "ff")? Abraços, Graymalkin

Experimente fazer uma busca pela função ShellExecute aqui no fórum e creio que você vá encontrar o que quer. Abraços, Graymalkin

Nós podemos ajudá-lo a fazer, se você quiser. Ou seja, você vai fazendo e a medida que as dúvidas forem surgindo você as coloca aqui. Certo? Graymalkin

Não se você fizer: Redim Preserve matriz(tamanho) Abraços, Graymalkin

Você está chamando a delegate de forma incorreta e além disso, o método deve ter, obrigatoriamente, a mesma assinatura da delegação. Abaixo está a parte corrigida: public delegate void mudaTexto(ListBox lista, String texto); public void changeText(ListBox lista, String text) { if (lista.InvokeRequired) { mudaTexto a = new mudaTexto(changeText); lista.Invoke(a, new object[] { lista, text }); } else { lista.Items.Add(text); } } Para mais detalhes sobre delegates, dê uma olhada neste tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=72745 Abraços, Graymalkin

Aquele "nc" não deveria ser zerado em alguma parte do loop? E, outra coisa, a MessageBox tem um limite de caracteres para exibição. Experimente mostrar a string em uma caixa de texto multiline. Abraços, Graymalkin

Que eu saiba não existe tal função. Mas, você pode fazer isso redimensionando o vetor, desde que ele seja declarado sem um tamanho inicial (e posteriormente redimensionado): Dim k() ReDim k(10) For i = 0 To 9 k(i) = 5 Next i For i = 0 To 9 Debug.Print k(i), k(i) = Empty Next i ReDim k(10) 'Aqui estou "zerando" ele For i = 0 To 9 Debug.Print k(i), k(i) = Empty Next i Certo? Graymalkin

Já experimentou tirar aquele "Exit For" de dentro do loop? Acho que ele não cai bem no caso. Abraços, Graymalkin

Acredito que você teria que definir AutoRedraw como True antes de desenhar na mesma. Experimente mudar nas propriedades do próprio controle e não via código. Abraços, Graymalkin

Esta idéia é abordada neste tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=39501 Abraços, Graymalkin

O que você entende por "abrir uma URL"? Abrir o navegador padrão com uma determinada URL? Mostrar o site no seu próprio form, de acordo com a URL? Receber os dados de uma página requisitando uma URL? Se for o primeiro, faça uma busca aqui no fórum pela função ShellExecute; já se for o segundo, faça uma busca pelo componente WebBrowser; e se for o terceiro procure pelos componentes Inet e/ou Winsock. Abraços, Graymalkin