Ir para conteúdo
Fórum Script Brasil

Graymalkin

Veteranos
  • Total de itens

    8.257
  • Registro em

  • Última visita

Tudo que Graymalkin postou

  1. Se você tiver pelo menos a base de lógica de programação e orientação a objetos, não vejo problemas em iniciar com .NET. Mas, se não for o caso, realmente eu recomendaria que você se interasse com estes dois assuntos antes de prosseguir. Abraços, Graymalkin
  2. Graymalkin

    Vb+site

    Se o site suportar alguma tecnologia de páginas dinâmicas (ASP, PHP, ASP.NET, Python, etc.) você pode fazer com que o seu programa em VB envie instruções para o site através de parâmetros na URL. Por exemplo, se o seu site tivesse ASP e uma página chamada cadastra.asp que requisitasse dados do imóvel para realizar o cadastro, bastaria chamar a seguinte URL: http://www.seusite.com.br/cadastra.asp?codImovel=01&nomeImovel=Teste&valorImovel=2000 Note os parâmetros passados ali. Esta chamada poderia ser feita através do componente WebBrowser ou por Winsock. Outra maneira seria se conectar diretamente ao banco de dados para incluir, mas vai depender de qual é o banco. Outra possibilidade seria enviar por FTP um arquivo texto com os novos imóveis e o site executar de tempos em tempos uma atualização com base nesse arquivo. Como você vê, existem diversas possibilidades. Abraços, Graymalkin
  3. Graymalkin

    Ajuda Com Arquivos

    A lógica de excluir um registro eu expliquei neste tópico aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=73262 Abraços, Graymalkin
  4. Por que você passa 0 para o segundo parâmetro de WinExec? Este é justamente o valor de SW_HIDE, que deveria ter o efeito de *não* mostrar (esconder, do Inglês 'hide') a janela. Experimente passar SW_SHOW ao invés do 0 e veja se o resultado é o esperado. Abraços, Graymalkin
  5. É só juntar as strings. Exemplo: var i : integer; var unidade : string; begin for i:=65 to 90 do begin unidade := chr(i) + ':\'; if GetDriveType(PAnsiChar(unidade))=5 then WinExec(unidade + 'Office Xp Com Front Pager\INSTALAR.EXE', 0); end; end; Aí é um problema muito específico, já que só acontece com ele, não é? Abraços, Graymalkin
  6. Sim, você pode fazer isso com VBA. O exemplo abaixo vai limitar o conteúdo da célula C2: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row = 2 And Target.Column = 3 Then s = Trim(Str(Target.Value)) If Len(s) > 5 Then Target.Value = Left(s, 5) End If End If End Sub Basta colar o código acima na Plan1 no VBA (ALT+F11). Este código será executado para qualquer célula que seja alterada na planilha Plan1, mas só fará a verificação e alteração da célula C2 porque eu coloquei para verificar a coluna (3) e a linha (2). Se o conteúdo desta célula for maior que 5 caracteres (ou dígitos), o conteúdo da mesma é alterado para somente 5. Certo? ;) Graymalkin
  7. É, dei uma pesquisada sobre o assunto mas não encontrei um jeito simples de se fazer isso. A maneira que imaginei seria converter o arquivo para Base64 (o mesmo formato utilizado para anexos de e-mail, entre outras coisas) e daí armazená-lo no documento, em um macro. Esta macro iria criar o arquivo .swf automaticamente no disco e depois mostrar a animação. O único inconveniente disso seria que apareceria aquela pergunta sobre existir macros no documento e se o caboclo quer ou não ativar o suporte a macros. Se ele disse que não, a coisa não vai funcionar. Posso tentar fazer um exemplo se você quiser (até porque isso tudo é só um hipótese que bolei). Abraços, Graymalkin
  8. Graymalkin

    Ajuda Com Arquivos

    Quais são exatamente as suas dúvidas? Você não quer que a gente faça o exercício para você, né? ;) Graymalkin
  9. Sim, você tem que utilizar a função atoi() (array to integer), para converter uma string em inteiro. Abraços, Graymalkin
  10. Provavelmente você vai ter que mudar os captions das labels e outros elementos do form (o que não é difícil). Mas, talvez você tenha que mudar strings (que ficam entre aspas duplas) também no código. Abraços, Graymalkin
  11. Se você postar aqui como você faz o download talvez fique mais fácil de te ajudar. Abraços, Graymalkin
  12. Você precisa realmente informar o caminho completo, não tem como adivinhar onde está o programa se você não informar a unidade (D:, E:, etc.). O que você pode fazer é descobrir qual a letra do CD-ROM do caboclo: var i : integer; var unidade : string; begin for i:=65 to 90 do begin unidade := chr(i) + ':\'; if GetDriveType(PAnsiChar(unidade))=5 then ShowMessage(unidade + ' é um CD-ROM!'); end; end; Daí é só juntar a unidade com o caminho que você já sabe. Certo? ;) Graymalkin
  13. Graymalkin

    Chatterbot

    Talvez a A.L.I.C.E.? http://www.alicebot.org/ Você só teria que personalizar as perguntas/respostas nos arquivos XML que compõem o "cérebro" do bot. Abraços, Graymalkin
  14. Graymalkin

    Sequencia

    Veja se seria isso: h1 = timeserial(7, 30, 0) do s = left(h1, 5) h1 = timeserial(hour(h1), minute(h1)+30, 0) s = s & " - " & left(h1, 5) response.write s & "<br />" loop until h1 = timeserial(9, 30, 0) Certo? ;) Graymalkin
  15. Resposta aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=75433 Abraços, Graymalkin
  16. Graymalkin

    Menssagem De Erro.

    Hehehe... sem problemas. :D Isso (confundir as coisas e não enxergar o erro a primeira vista) é normal neste meio (acontece comigo o tempo inteiro!). Abraços, Graymalkin
  17. Vá no menu Exibir -> Barra de Ferramentas e marque o "Visual Basic". Na barra que aparecer, aperte no botão "Modo de design" e no botão "Caixa de ferramentas de controle". Na outra barra que vai aparecer, aperte em "Mais controles" e escolha "Shockwave Flash Object" na lista que vai aparecer. Aparecerá uma caixa com um "X" no documento. Clique nela com o botão direito do mouse e escolha "Propriedades". Na propriedade Movie (da janela que apareceu) coloque o caminho (c:\pasta\arquivo.swf) do arquivo flash. Saia do modo de design (com o mesmo botão que entra) e você verá a animação sendo executada na tela. Abraços, Graymalkin
  18. Testei aqui no Borland C++ 5.5 e funcionou corretamente: #include <string> #include <iostream> using namespace std; void funcRefnome(string&); int main(int argc, char *argv[]) { string nome; cout << "Digite seu nome:" << endl; cin >> nome; funcRefnome(nome); cout << "Nome:" << nome << endl; } void funcRefnome (string& n) { n[0] = '~'; } Certo? ;) Graymalkin
  19. Você pode postar a parte do código que dá o erro ou que não funciona? Ficaria mais fácil de visualizar o problema. Abraços, Graymalkin
  20. Graymalkin

    Menssagem De Erro.

    Ok, mas eu digo no seu programa. Tem que ser alguma das linhas com "cin >> ", mas seria interessante saber qual delas. Já experimentou fazer um programa isolado só com um "cin >> objeto;" e ver se ele funciona? Abraços, Graymalkin
  21. Graymalkin

    Toolbar

    Cara, você tem alguma noção do que você vai precisar? Você sabe alguma linguagem de programação? Isso não é uma coisa muito simples de se fazer, e vai exigir bastante código e pesquisa. Procurando no Google eu achei um tutorial sobre como fazer uma toolbar para o IE: http://www.codeproject.com/atl/ietoolbartutorial.asp Mas, o lance de fazer com que ela toque um som que provirá da sua rádio já é outra história. Você vai precisar ter um componente do lado do cliente que receba os dados (e terá que enviá-los a partir do servidor) e que toque o som. Abraços, Graymalkin
  22. Mas, você está utilizando o mesmo objeto para ambos: objAdapter = new sqldataAdapter(strsql,objconnection) objAdapter = new sqldataAdapter(strsql1,objconnection) Acredito que deveriam ser diferentes. Abraços, Graymalkin
  23. É quantidade de posts dos visitantes. Na versão anterior do fórum isso não era mostrado. Abraços, Graymalkin
  24. Graymalkin

    Macro

    Hummm... agora é "Visual Básico"... :P De qualquer maneira, dê uma olhada na opção de "Inspeção de variáveis" (ou Watcher) aí no seu "Visual Básico". Abraços, Graymalkin
  25. Graymalkin

    Menssagem De Erro.

    Qual é a linha do erro exatamente? Abraços, Graymalkin
×
×
  • Criar Novo...