kuroi

Membros
  • Total de itens

    7.410
  • Registro em

  • Última visita

Reputação

0 Neutro

Sobre kuroi

Contatos

  • Website URL http://

Últimos Visitantes

12.056 visualizações
  1. Conexão (Cliente/Servidor) Enviando Arquivo ?

    Densyy, você deve abrir o arquivo como binário (Open For Binary) e salvar os dados num array de Byte, como é feito no exemplo: http://stackoverflow.com/questions/2456110...e-into-an-array Depois disso, se já tiver conseguido fazer funcionar as conexões do Winsock, deve ser só enviar o array com o .SendData() e receber com .GetData(), informando no parâmetro type que o tipo recebido deve ser um Byte Array. Nunca tentei, mas imagino que funcione. Depois de receber, você grava chama um outro Open For Binary, e dessa vez em vez de usar o Get (como no primeiro link que passei), você usar o Put pra fazer o caminho inverso (passar do array pro arquivo). Mas no caso de arquivos grandes, acho melhor mandar aos poucos. EDITADO: Mas numa rede local, o FileCopy() também vai resolver, como sugeriu o Matheus - desde que haja as devidas permissões.
  2. ADODB

    Movido para Visual Basic. Azelha, você teria que percorrer o RecordSet pra acessar todos os registros, com MoveNext. Só que não entendi onde você quer mostrá-los. Se você só tem um TextBox pra cada campo, você só pode mostrar 1 registro por vez. Mas o código seria esse: rs.Open "select * from tblProduto", cnn, adOpenDynamic, adLockReadOnly Do While Not rs.EOF '//Enquanto não chegar ao final do Arquivo txtMarca = rs.Fields(2) '//Leio os campos txtModelo = rs.Fields(3) rs.MoveNext '//Movo ao próximo Registro Loop[/code] Só que, no exemplo, ele vai percorrer todos e o usuário só verá o último.
  3. Tela congelada

    Hum... porque vejo muitas macros que ficam movimentando o cursor, sempre selecionando a célula que se quer editar e alterando pelo ActiveCell por exemplo. Então a tela congelada seria quando programamos sem essa movimentação. Por exemplo, em vez de mover o cursor pra célula "B3", eu acessaria direto pelo Range("B3").Value, certo?? Ou existe um comando específico que "congela a tela" ou algo assim??
  4. Duvida em relacao a esse exercicio!

    Tópico fechado por duplicação. Respostas aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=172876
  5. Tela congelada

    Queria saber exatamente o seria a "tela congelada"...
  6. Ajuda com objetos

    Leonardo, você pode fazer: Me.Controls("LblTeste" & TextBox1.Text).Enabled = True Mas acho mais fácil transformar as Label em array de Label e acessar pelo índice.
  7. VBScript - ERRO DE SINTAXE(On Error Goto)

    No VBScript, as variáveis são todas Variant, você não precisa (e nem pode) declarar o tipo dela. On Error GoTo também não funciona no VBScript (On Error Resume Next deve dar certo). Veja no segundo post desse tópico que o cara ensina uma técnica pra contornar esse problema, tratando o erro de pouco em pouco: http://stackoverflow.com/questions/157747/...-error-handling
  8. Novo Monitor

    Nosso querido colaborador Jhonas assume hoje o cargo de Monitor de nosso fórum, cargo este que acabou ficando vazio por tempo demais, mas que agora passa a ser ocupado por um nome de peso. Jhonas esteve durante um bom tempo mantendo a ordem na sala de Delphi, e agora será de grandíssima ajuda para que cuidemos bem deste nosso fórum. Com certeza, a escolha foi mais do que acertada, valeu Jhonas.
  9. Ajuda

    Movendo pra Outros Assunto. Não tive esse problema que você falou.
  10. INPUTBOX MASCARA

    Veja: http://www.freevbcode.com/ShowCode.asp?ID=1214 Acho que esse assunto também já saiu no fórum antes, dê uma pesquisada pois acredito que também já discutimos outras opções.
  11. acessar pagina da internet via vb6

    Procure exemplos de utilização do componente WebBrowser. O difícil será se for necessário digitar o captcha pra acessa a informação que você precisa.
  12. VB 2008 Copilação

    Movido para .NET. É necessário que o usuário tenha o .NET Framework numa versão correspondende àquela usada para desenvolver o aplicativo.
  13. [Ajuda] VB 2010 programação basica

    Movido para .NET.
  14. A .ocx está salva em C:\Windows\System32\?? Se a .ocx é de 32 bits e o windows de 64, deve ser gravada em C:\Windows\SysWOW64\ E, para registrar, você deverá usar o regsvr32 que está em C:\WINDOWS\SysWow64\, ou seja, o seguinte comando: C:\Windows\SysWOW64\regsvr32.exe Master.ocx Caso ele reclame de falta de permissões, você terá que acessar pelo prompt de comando como administrador. Crie um atalho para o cmd, clique com o botão direito nele e selecione a opção Executar como administrador. Então, execute o comando descrito acima.
  15. Boasfesta, você está usando o FindWindow() para encontrar a janela?? Se sim, fique procurando o tempo todo. Quando encontrar, use o SetForegroundWindow() e feche-a com SendKeys {ENTER} e depois continue a procurar. Deste modo sempre que aparecer uma janela, ela será fechada, não importa quantos programas estejam rodando simultaneamente, seja um ou sejam vários, desde que o programa que feche as janela fique o tempo sendo executado. Pra não pesar muito, é bom não colocar o FindWindow() dentro de um While, o melhor é usar um Timer. Uns 100 milissegundos de intervalo deve estar bom.