Ir para conteúdo
Fórum Script Brasil

lcs_sp

Membros
  • Total de itens

    201
  • Registro em

  • Última visita

Posts postados por lcs_sp

  1. E o seguinte, tenho um forme com alguns campo text e abaixo um flexgrid apos digitar algumas informaçãoes nestes campo e pressaionar um botão "pesquisar" a flex é carregada, mas essa carga demora alguns segundos, eu queria que um frame ficasse visivel enquanto esta pesquisa e carga da flex estivesse em execução, e apos a carga fica sse invisivel

    Tela

  2. E ai pessoal beleza ???

    E o seguinte, tenho uma pesquisa num formulário que pode demorar um pouco pra carregar (alguns segundos) e eu queria que exibisse um tela de aguarde (um frame com a palavra aguarde), mas ao disparara a função de pesquisa o frame num aparece ele acaba aguardando a pesquisa para exibir, tem como resolver isto ?

    Obrigado

  3. Alexnadre,

    Vá na caixa de ferramentas, clique com o botão direito vá em controles adicionais e selecione o Microsoft Internet Transfer Control ai vai aparece um novo controle ai e só adicionar e inserir o codigo abaixo em um botão

    Private Sub CommandButton1_Click()

    Dim texto As String

    texto = inet1.openurl("http://www.microsoft.com.br")

    MsgBox texto

    End Sub

    Alexnadre,

    Pode ser que no excel não funcione evido a limitações de registros dos componentes se num funcionar ai você vai ter que apelar para um .bat

    crie um arquivo .bat com os comando abaixo

    @echo off

    cls

    echo ----------------------------------------------------

    echo - Sistema de Backup na WEB -

    echo - Modulo DIARIO -

    echo ----------------------------------------------------

    @echo off

    ftp -s:put.txt ftp.dominio.com.br

    crie um arquivo put.txt com os comando para acesso ao ftp ex:

    usuario

    senha

    prompt

    cd dados

    bin

    hash

    mput base.zip

    close

    bye

  4. Vá em Project --> components

    Marque o Microdoft Internet Transfer Control

    irá aparecer um novo componente ca caixa de ferramentas (um computardor com um globo no fundo)

    adicione este item no formulário (por default ele vem com o nome de Inet1)

    insira este código no formulário

    Private Sub Form_Load()

    rtfHTMLDoc = Inet1.OpenURL("http://www.microsoft.com")

    MsgBox rtfHTMLDoc

    End Sub

  5. Daniel,

    Executei na minha máquina e funcionou perfeitamente, só troquei por um usuário válido na minha máquina e troquei o host para 127.0.0.1 (endereço de localhost)

    assim:

    C:\ARQUIV~1\MySQL\MYSQLS~1.1\bin>mysqldump --user=usuario --passw=senha --database basededados --host=127.0.0.1 >teste.sql

    você pode automatizar pelo agendador de tarefas.

    qualquer coisa poste d novo vamos tentar resolver.

  6. Salve galera beleza ??

    Eu desenvolvi uma aplicação na qual eu não cobre pelo desenvolvimento e sim por manutenção mensal, e gostaria de que o sistema tivesse em bloqueio por chave onde ele pedisse uma chave a cada "n" dias, já encontrei um sistema chamado ActiveLock mas este só gera chave de demostração ou uma de liberação total.

    alguém conhece outra maneira ???

×
×
  • Criar Novo...