ramon

O visual basiuic possui alguma diretiva tipo define do c E se existe uma parecida com os ponteiros do c

É realmente! Não tinha visto, mas agora vi

A minha versao é 1.3

Essa é uma petição para que a Microsoft continue a dar suporte e atualizações das linguagens VB6 e VBA, pode não dar em nada, mas vale a pena pensar o contrário. http://www.classicvb.org/petition/ Parece ser algo sério, pois quem for MVP assina em separado. Por favor, divulgue para o resto dos membros." Lá do site: "With both VBs in the same IDE, it should be possible to extend the development environment to provide a high degree of interoperation between them. That will allow the developer to use both in the same solution, with the interop handled seamlessly by the framework." Ou "Com ambos os VBs no mesmo IDE, seria possível estender o ambiente de desenvolvimento para prover um alto grau de interoperação entre eles. O que permitirá ao desenvolvedor usar ambos na mesma solução, com a interoperabilidade controlada sem "remendos" pelo framework." (tradução minha) Não sei se vinga também não, mas fica aí um canal pra gente se manifestar. Afinal, VB é baba! Contribua!

Ok! você teria alguma sugestão em vez de usar um banco de dados desconectado para organizar a posicoes dos meus times usar algum outro meio

Sim agora funcionou Gostaria claro se fose possivel uma breve explicação dos codigos que você postou For Each informação In dados For Each dado In informação Debug.Print dado Next dado Next informação O que o each e o in fazem

Eu tenho esta versão gostaria de saber se ela tem limitacoes ou ela é free e sem limites

Cara não funcionou aqui Coloquei o Debug.print para testar o que tem dentro da matriz dados e da erro

tenho um site e to com um probleminha....to desenvolvendo com o Dreamweaver e fiz uma pagina separada com um formulario de contato, e pra não ter que ultilizar um "mailto", que pode ser meio inconveniente, no caso da pessoa q acessa o site não ter outlook configurado, a outra alternativa é um javascript , que eu não acho na internet...Se alguém tiver ai manda ai....Valeu....

Não eu quero em vez de apresentar os dados numa MSHFlexGrid1.DataSource passar ela para uma matriz Como alterar esta parte do codigo Set MSHFlexGrid1.DataSource = rsDesconectado rsDesconectado.Close Set rsDesconectado = Nothing

Como alterar este codigo para ser apresentado numa listbox ou ser armazenado numa matriz pois não estou conseguindo alguém poderia me ajudar, pois sinceramente não conheco nada de banco de dados Private Sub Form_Load() Dim i As Integer Dim rsDesconectado As ADODB.Recordset Set rsDesconectado = New ADODB.Recordset rsDesconectado.Fields.Append "Time", adChar, 40 rsDesconectado.Fields.Append "Pontos", adInteger rsDesconectado.Fields.Append "SaldoGols", adInteger rsDesconectado.ActiveConnection = Nothing rsDesconectado.CursorLocation = adUseClient rsDesconectado.Open rsDesconectado.AddNew rsDesconectado("Time").Value = "Grêmio" rsDesconectado("Pontos") = 3 rsDesconectado("SaldoGols") = 1 rsDesconectado.AddNew rsDesconectado("Time").Value = "Santástico Futebol Show" rsDesconectado("Pontos") = 9 rsDesconectado("SaldoGols") = 13 rsDesconectado.AddNew rsDesconectado("Time").Value = "Juventude" rsDesconectado("Pontos") = 4 rsDesconectado("SaldoGols") = -3 rsDesconectado.AddNew rsDesconectado("Time").Value = "Caxias" rsDesconectado("Pontos") = 4 rsDesconectado("SaldoGols") = 1 rsDesconectado.Sort = ("Pontos desc, SaldoGols desc") Set MSHFlexGrid1.DataSource = rsDesconectado rsDesconectado.Close Set rsDesconectado = Nothing End Sub

o erro esta na declaracao Dim txtncomanda As Integer Pois você esta declarando um nome de um componente Remova a declaracao que funcionara sem problemas

Como é gerado os caracteres tipo se eu colocar 128. como que é gerado? alguém poderia me dar uma pequena explicação sobre o assunto

Bom você precisa comprar o programa Visual Basic 6 ou Visual Studio 6 que acompanha alem vb tambem o C++6, java etc. E estudar bastante atraves de apostilas, livros e postar suas duvidas ai no forum para a galera te ajudar Bom é isso que eu te recomendo

Bom consegui resolver aqui simplesmente fiz o contrario da outra rotina Valeu pela sua ajuda!

Bom usei este agora Open Caminho For Binary As #1 Dados = Input(LOF(1), 1) Dados = Criptografia(Dados) Close #1 mas ta muito lento teria como acelerar isto esta lento na descriptografia uma vez que eu to descriptografando tudo de uma vez só gostaria saber se da para melhorar a descriptografia

beleza so mais uma duvida Para gravar uso Open Caminho For Binary As #1 For Y = 0 To 100 For X = 0 To 50 For Z = 0 To 20 Put #1, , Criptografia(banco(Y, X, Z) & "@") Next Z Next X Next Y Close #1 E para carregar ta dando pau Open Caminho For Binary As #1 Dados = Split(Input(LOF(1), 1), "@") Close #1 I = 0 For Y = 0 To 100 For X = 0 To 50 For Z = 0 To 20 banco(Y, X, Z) = dados(I) Next Z Next X Next Y Eu teria que descriptografar ae é to me apertando para fazer isto você teria alguma sugestão para funcionar

a instrucao put consegue concatenar o conteudo de uma variavel para um arquivo não existe uma funcao que concatena o conteudo de uma variavel para uma outra pois pelo que vi a gravacao é rapida e na verdade a instrucao put esta sim concatenando não é?

bom então mais rapido do que isso não dá? outra teria como gravar no arquivo tudo em uma linha continua pois a o print grava linha por linha e o arquivo figa muito grande ou teriei que usar na forma binaria

é do propio forum veja http://scriptbrasil.com.br/forum/index.php?showtopic=31417

Sim ela usa a funcao len para isso teria algum jeito de acelerar a minha função ou você tem uma funcao que faca criptografia mais rapidamente e que poderia postar ai

já mas antes de gravar no arquivo eu quero criptografar para depois salvar num arquivo ae que ta o problema

mas você ta fazendo a comparacao como se a minha matrix tive-se 1byte em cada vetor E seu tive-se uma palavra com 20 caracteres "Este site é bom" ai aumentaria o limite

não entendi esta parte conteúdo = string(200*20*13, chr(0)) como que eu faco para esta variavel ficar sem um limite especifico

ou de wav para mp3