Graymalkin

No seu BD do Access clique em "Módulos" e depois clique em "Novo". Será aberto então o editor do VBA com um novo módulo. Neste, cole a seguinte rotina: Public Sub Atualizar() On Error Resume Next DoCmd.DeleteObject acTable, "TABELA" On Error GoTo 0 DoCmd.TransferDatabase , "dBASE III", "c:\pasta", acTable, "arquivo.dbf", "TABELA" End Sub Lembre-se de salvar clicando no disquete (terceiro ícone da barra de ferramentas). No seu programa em VB você poderá usar o seguinte código para chamar esta rotina Atualizar() que está no BD: Screen.MousePointer = vbHourglass Dim a As New Access.Application a.OpenCurrentDatabase "CAMINHO_DO_SEU_MDB" a.Run "Atualizar" a.CloseCurrentDatabase a.Quit Screen.MousePointer = vbDefault Faça referência a "Microsoft Access Object Library" pela opção "References..." do menu "Project". Antes de executar o código acima, certifique-se de que o seu próprio programa *não* esteja com a respectiva tabela aberta. Só abra a tabela após a atualização terminar. Abraços, Graymalkin

Por que você não utiliza ADO? Realmente você não vai conseguir com DAO porque o mecanismo JET que possui essa funcionalidade é o 4.0 (que é utilizável com ADO). Abraços, Graymalkin

O Corel Draw serve para isso? Eu já criei e modifiquei fontes através de um software chamado High-Logic Font Creator. Abraços, Graymalkin

Do While e While são a mesma coisa. A diferença seria entre usar estes ou Loop While (no qual realmente a execução ocorreria uma vez). O que eu aconselho é dar uma limpada no código (retire toda a parte HTML) e fazer o teste novamente. Caso ocorra o erro, mostre exatamente qual é a linha em que ele ocorre (no código limpo). Abraços, Graymalkin

Um exemplo: SELECT * FROM Clientes WHERE Sexo='F' AND Idade<=25; No caso acima você estará selecionando apenas os clientes cujo sexo é feminino E (AND) a idade é menor ou igual a 25 anos. Outro exemplo: SELECT * FROM Clientes WHERE Crédito>=2000 OR Data_Cadastro<DateValue('01/01/2004'); Neste outro exemplo você está selecionando apenas os clientes cujo crédito é de R$ 2000,00 OU (OR) cuja data de cadastro seja anterior a 01/01/2004. Se você não tem noções de lógica booleana, dê uma olhada no famoso tópico Não To Entendendo Esta Expressão.... Abraços, Graymalkin

Não é INF e sim INI, e você pode dar uma olhada neste tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=43106 Se você usar a busca deverá encontrar mais informações. Abraços, Graymalkin

Sinceramente, o mais sensato no seu caso seria utilizar um banco de dados. Ele seria rápido e mais prático do que a matriz. Faça o teste com um banco do Access e garanto que você vai gostar. Abraços, Graymalkin

O problema aí é o caminho do arquivo teste.bat. Como você não está especificando ele todo, usa-se o caminho relativo e então procura-se o arquivo teste.bat no diretório corrente. E na verdade ele não está no diretório corrente e sim na raíz. Basta, no arquivo bat você colocar: dir c: /s c:\teste.bat Note o "c:\" na frente de "teste.bat". Aí sim vai funcionar. Abraços, Graymalkin

Eu fiz um código bem simples para importar uma tabela DBF para uma tabela do Access, do mesmo jeito que ocorreria se você clicasse com o botão direito na janela de tabelas e escolhesse "Importar...". Só que está lá no serviço, mas pode deixar que hoje mesmo eu pego e posto aqui. Abraços, Graymalkin

A dica é usar "WITH COMPRESSION" e acho que você não usou o todo-poderoso Google, já que logo o primeiro resultado já deu a resposta: http://www.google.com/search?que=%2BAlter+...lient=firefox-a O link para a solução, caso aí apareça diferente, é: http://www.grahamwideman.com/gw/tech/acces...ss2kunicode.htm Certo? ;) Graymalkin

Acho que seria mais fácil se você especificasse o que quer fazer, daí a gente tenta ajudar. Agora, manipular o conteúdo dos arquivos? Não sei se arquivos de lote serviriam bem para isso não. Abraços, Graymalkin

Então, o seu problema é a velocidade. Mas, você não pode me dizer o que está na matriz? Talvez eu pudesse sugerir uma outra maneira de armazenar os dados, desde que você me dissesse o que existe nela. Abraços, Graymalkin

Isso já foi discutido neste tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=90073 E, no caso em questão, 677Kb é muito para um *único* registro. O que você quer guardar nesta estrutura? Abraços, Graymalkin

Claro... :huh: . O cálculo é seu, você pode colocar o que quiser nele, correndo apenas o risco do resultado ficar aquém ou além do verdadeiro. Abraços, Graymalkin

Qual é exatamente o processo que mais se aproxima dos 100%? Basta você localizá-lo, encerrá-lo e verificar de onde ele está sendo executado (talvez você o ache no Registro). Abraços, Graymalkin

Você quer trocar os valores dos campos? Ou você quer os registros ordenados (uns em relação aos outros) da tabela? Se for o primeiro, você pode simplesmente pegar os valores, colocá-los em um vetor e ordená-los através de qualquer método de ordenação (bolha, quicksort, etc.). Se for o segundo, é só usar uma SQL do tipo: SELECT * FROM tabela ORDER BY c1, c2, c3, c4, c5; Certo? ;) Graymalkin

Para "contar" as linhas você poderia fazer algo assim: linhas = f.readlines() qtlinhas = len(linhas) print qtlinhas Isso tendo em mente que "f" é um objeto file-like e que está posicionado no início do arquivo. Abraços, Graymalkin

Geralmente eu crio duas funções para isso, as quais chamo de AjustaE() para espaços à esquerda e AjustaD() para espaços à direita: Public Function AjustaD(ByVal texto As String, ByVal tamanho As Integer) As String Dim s As String s = Space(tamanho) LSet s = texto AjustaD = s End Function Public Function AjustaE(ByVal texto As String, ByVal tamanho As Integer) As String Dim s As String s = Space(tamanho) RSet s = texto AjustaE = s End Function Daí é só usar: ? AjustaD("JOÃO", 10) ? AjustaD("JOAQUIM", 10) Certo? ;) Graymalkin

Você só não terá o tamanho preciso dela. Se ela não for fixa e você quiser ter o tamanho preciso dela, sim. Abraços, Graymalkin

Que eu saiba não tem uma função para isso, então você teria que calcular manualmente. Se a string for de tamanho fixo você pode até fazer igual ao seu exemplo do Byte, mas se for de tamanho variável você deve considerar o tamanho dela como sendo 10 bytes + o comprimento dela. Abraços, Graymalkin

Não, VBScript não é Visual Basic. Assim como JavaScript não é Java. Ambas as linguagens de script (VBScript e JavaScript) tem a origem de suas sintaxes nas respectivas linguagens (Visual Basic e Java) mas é só esta a semelhança entre ambas. Abraços, Graymalkin

Experimente usar a função DateValue() e passar a data como uma string (ou seja, entre aspas simples). Se você quiser fazer do seu jeito, acho que você vai precisar inverter o dia com o mês. Já usando DateValue() você poderá passá-la normalmente. Abraços, Graymalkin

Qual é a mensagem de erro? Abraços, Graymalkin

Bom, se este outro software pôde fazer isso, então provavelmente você também poderá criar um que o faça. Só que você vai precisar fazer muita pesquisa sobre o assunto (eu mesmo não tenho idéia de como obter a imagem da câmera sem um componente próprio dela que o faça). Abraços, Graymalkin

Ótima explicação, Fernando! :) Abraços, Graymalkin