Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. engracado... comigo as vezes acontecem umas coisas parecidas aqui no forum...
  2. acho tb q você devia chamar o getc() depois de salvar o valor do ch na string. esse seu codigo não ta pulando o primeiro caracter?? while( ch != EOF && ch != 13 && ch != 10 ){ username[i] = ch; ch = getc(arquivo); i++; } username[i] = 0;[/code] se não funcionar, poste um exemplo do texto q esta no txt e qual parte você precisa capturar.
  3. o arquivo deve estar salvo com uma quebra de linha (enter) no final, tente fazer assim: while( ch != EOF && ch != 13 && ch != 10 ){ ch = getc(arquivo); username[i] = ch; i++; } username[i] = 0;[/code]
  4. qual componente você usa?? esse tópico pode ajudar: http://scriptbrasil.com.br/forum/index.php?showtopic=122749 se eu entendi, você preenche o selection formula (o tópico q passei acima tb ensina como faz), e filtra somente pelos clientes q estao na lista.
  5. você fala o '\ 0'?? mas não tem problema, é so concatenar as strings ue. alias o problema seria se não tivesse '\ 0'. qual codigo você ta usando no c?? melhor moverem esse tópico de volta.
  6. o q acontece de errado?? se numero esta como tipo numerico no banco de dados, não use aspa simples: sql = "update tbl set nome = '" & str4 & "' where numero = " & NUM
  7. eu tb, mas acontece q dessa vez então, eu não tinha processo pra finalizar. na verdade, o arquivo nem tinha sido aberto depois do ultimo boot. de qualquer modo, depois disso tudo, eu tenho evitado usar opcoes de apagar arquivos em qualquer programa.
  8. tente abrir assim: rs.Open "Select * From TBL_1 WHERE ID = " Cells(startRow, 1), cn, adOpenKeyset, adLockOptimistic, adCmdTable
  9. kuroi

    strings no vb6

    no .net as strings tem o metodo ToCharArray() q resolveria isso pra você. no vb6, você teria q pegar cada caracter usando o Mid(). ou você pode declarar uma funcao ToCharArray() q copie toda a string pra um array. assim: Public Sub ToCharArray(ByRef x As String, ByRef a() As String) If x = "" Then Exit Sub ReDim a(Len(x) - 1) Dim i As Integer For i = 0 To Len(x) - 1 a(i) = Mid(x, i + 1, 1) Next End Sub[/code] ai você simplesmente acessa assim: [code]Dim minhastring As String, meuarray() As String minhastring = "aabbabababababaaababbba" ToCharArray minhastring, meuarray MsgBox meuarray(0) 'a MsgBox meuarray(1) 'a MsgBox meuarray(2) 'b MsgBox meuarray(3) 'b MsgBox meuarray(4) 'a ... ...
  10. é, o bittorrent tb cria o arquivo inteiro vazio e depois vai preenchendo os dados a medida q o download vai sendo feito. eu não lembro agora, mas acho q quando aconteceu esse problema pra mim, o download já estava completo e eu já tinha gravado os arquivos no dvd e não precisava mais deles. normalmente eu sempre excluia os arquivos do torrent na mao pelo windows explorer, mas dessa vez, por acaso eu tava com o bittotorrent aberto e selecionei a opcao "Apagar e Excluir Dados", ou coisa assim (existe uma opcao q so exclui o torrent da lista, de modo q o programa não o carregue mais pra continuar o download ou o seed, mas q os arquivos continuam no hd, mas não foi essa q selecionei). os arquivos realmente foram apagados e não podiam mais ser encontrados no hd, mas o espaco continuou ocupado...
  11. onde ta declarado esse InsereValortxtBox()?? talvez você esteja acessando um textbox txtSalarioAnual q não é o mesmo q esta no formulario ou coisa assim. veja ai, ou então poste o codigo intero do metodo de onde você chama o InsereValortxtBox() pra ver se a gente consegue identificar o problema.
  12. tenta trocar todos os seus ponto-e-virgulas por virgulas.
  13. acho q não funciona se você puser asterisco na pasta de destino. e se tiver um usuario chamado "usuario1" e outro chamado "usuario2"?? como ele vai saber pra onde copiar??
  14. kuroi

    números no vb6

    você pode usar alguma biblioteca preparada pra trabalhar com numeros grandes assim. mas desconheco alguma pra vb6, já q nunca precisei usar. sei q existe essa pra c: http://gmplib.org/ não sei se da pra usa-la no visual basic, mas você pode tentar ver isso. ela pode trabalhar com numeros de qualquer tamanho desde q caiba na memoria. agora, quanto a tentar usar string e mandar o visual basic fazer conta, é uma opcao. mas agora se você quer usar numeros com bilhoes de digitos, é complicado usar string... 1 bilhao de caracteres ocuparia 1 giga na memoria num sistema de 32 bits. ou seja, primero de tudo, você tem q ver se tem condicoes fisicas pra isso. fora isso, o visual basic não seria indicado pra isso, já q se você for tentar usar funcoes mid() ou coisa assim pra ler a string, seu esforco sera em vao, já q as funcoes de string do visual basic, todas recebem parametros by value (por copia). ou seja, se você tem uma string de 1 giga na memoria, quando você chamar o mid(), ele vai querer copiar esse 1 giga inteiro pra outra posicao. o melhor q você poderia tentar fazer seria uma dll em c, assim você poderia criar funcoes q recebam a string by ref (por referencia). usar arquivos como você comentou, seria uma opcao pra driblar o limite de memoria. o problema é q pra ler os dados do arquivo você teria q trazer os dados pra memoria. trazer tudo de uma vez ia dar no mesmo problema acima. então, você teria q tentar dar um jeito de dividir os dados acessados aos poucos. você teria q fazer um algoritmo muito muito bem estudado. mas eu acho q você ta otimista se espera q uma operacao com numeros desse tamanho leve so uma hora. principalmente se você for usar hd. de qualquer modo, se você não conseguir implementar nenhuma biblioteca pronta, e for tentar fazer na mao, o visual basic não é o mais recomendado pra algoritmos q exijam muito processamento assim. se você quer fazer isso num programa em visual basic, o melhor mesmo seria fazer essa parte do calculo numa dll numa outra linguagem como c/c++, e acessa-la pelo visual basic. a e nunca tentei ficar preenchendo uma string pra tentar encontrar um limite, nem nunca li nd sobre isso, mas acho q em visual basic as strings não tem limite, cabe o quanto couber na memoria.
  15. verdade, acho q o change seria ate melhor. se você fizer no keydown, ele deve mudar o foco se você clicar na flecha pra movimentar o cursor por exemplo, e ai você teria q usar algum codigo a mais pra impedir isso. acho q você tb poderia usar um SendKeys "{TAB}" pra mudar o foco tb, assim não precisa ficar escrevendo o nome do proximo controle. se o if vai ter uma instrucao so, você pode fazer o if todo em uma linha e não precisa de end if, testa la o codigo q eu postei exatamente como ta.
  16. kuroi

    SQL + PHP

    moverei pra php.
  17. kuroi

    Pesquisa não funciona

    deve ser por causa dos espacos no link. tenta escrever o link assim: <a href="NoticiaCompleta.asp?id=<%=Listar("ID")%>"><%=Listar("Titulo")%> </a>
  18. so as vezes não. com o dolar no valor q ta, qualquer jogo de qualquer console sai muito mais barato comprando importado (no playasia por exemplo) do q comprando no brasil, mesmo considerando o frete. ate no ebay acho q você encontra o jogo lacrado bem mais barato. dizem q dependendo da loja, quando o jogo chega no brasil, as vezes o governo te cobra um imposto de 40% do valor ou coisa assim, mas nunca aconteceu comigo.
  19. kuroi

    Pesquisa não funciona

    isso deve ser porque você não ta passando nenhum Request("id"). nem por post nem por querystring.
  20. não, no vb6 não tem mesmo a propriedade AutoTab. a não ser q você inclua o textbox do vba entre os componentes. no visual basic, você faria por keydown: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If Len(Text1.Text) = Text1.MaxLength Then Text2.SetFocus End Sub[/code] antes mude a propriedade KeyPreview do form para true.
  21. pode ser. mas não conheco essa opcao. pelo q soube, o arquivo q é apagado continua la, so q o sistema entende q não, considera o espaco como livre, então arquivos novos podem ser salvos no local onde ele estava. e enquanto o conteudo inteiro dele tiver la, o arquivo pode ser recuperado. mas o espaco é considerado livre e deveria aparecer como livre. de qualquer forma acho q eu q não to prestando atencao no q faco, por isso não to entendendo, é o mais provavel. mas a explicacao pra isso é q os fabricantes de hd lancam o hd considerando 1kB como 1000 bytes. e na verdade 1kB corresponde a 1024 bytes. da mesma forma, eles consideram q 1MB = 1000kB e q 1GB = 1000MB, mas na verdade 1MB = 1024kB e 1GB = 1024MB. isso da a diferenca.
  22. kuroi

    Pesquisa não funciona

    cintia, se é autonumeracao, use o codigo q o bareta já passou.
  23. kuroi

    Suit case

    suit?? você ta falando do select case?? se for, você pode tentar fazer como esta nesse post: http://scriptbrasil.com.br/forum/index.php...st&p=582974
×
×
  • Criar Novo...