Ir para conteúdo
Fórum Script Brasil

Graymalkin

Veteranos
  • Total de itens

    8.257
  • Registro em

  • Última visita

Tudo que Graymalkin postou

  1. Pelo que entendi do erro, o mesmo está reportando que dbo_Pagamentos.pag_valor é uma campo do tipo texto e por isso não pode ser utilizado com a função agregada Sum. Abraços, Graymalkin
  2. Graymalkin

    Impressora

    Acho que só olhando pelo nome dela mesmo. Que eu saiba não existe uma propriedade para distinguir isso. Abraços, Graymalkin
  3. No Office 2003 esse aplicativo tem o nome de SetLang.exe e fica em: Arquivos de programas\Microsoft Office\OFFICE11. Basta usar a função Shell() para chamá-lo. Abraços, Graymalkin
  4. Mas, qual o erro apresentado quando o objeto é criado via ASP? Abraços, Graymalkin
  5. Sim, de fato o componente Inet não espera o arquivo terminar de ser baixado. Entretanto, acho que você pode fazer isso olhando a propriedade StillExecuting do mesmo. Abraços, Graymalkin
  6. Use o método Save do ADODB.Recordset. Abraços, Graymalkin
  7. Esse já é o comportamento normal. Tem certeza de que se tratam de listboxes? Abraços, Graymalkin
  8. Como strings são tratadas como vetores de caracteres, você pode usar a função High() para obter o maior índice do(a) vetor/string. Vale lembrar que uma string, quando não declarado o seu tamanho, tem um tamanho de 255 caracteres (por isso o retorno de high() será 255). Esses caracteres ficam preenchidos com o valor do caracter nulo (chr(0)), daí para saber o tamanho da string é só percorrê-la até encontrar o primeiro nulo. Exemplo: program t; var s : string; cont, i : integer; begin s := 'teste'; for i:=1 to high(s) do if s[i]=chr(0) then break else cont := cont+1; writeln(s); writeln(cont); readln; end. Mas, por que não usar a função length() diretamente? Abraços, Graymalkin
  9. Não sei se existe uma função para isso, mas você pode simplesmente fazer um loop for para isso. Abraços, Graymalkin
  10. Supondo que você está armazenando os números gerados em algum local, basta que ao gerar um novo número, procure-se na lista dos já gerados se ele existe. Caso positivo, gera-se outro e repete-se o processo; caso negativo, usa-se ele mesmo. O mesmo princípio pode ser usado para saber se ele existe n vezes dentro do grupo. Abraços, Graymalkin
  11. E se for no VB6, dê uma olhada na rotina Kill. Abraços, Graymalkin
  12. Você sabe percorrer todos os registros de uma tabela? Você sabe como gravar um arquivo texto? Se souber ambos, você já tem uma possível solução. Caso não saiba o segundo, procure aqui no fórum e você achará. Já para o primeiro, dê uma olhada na propriedade Eof e nos método MoveNext. Abraços, Graymalkin
  13. Ao que parece realmente não dá pra mudar seu tamanho, mas você já deu uma olhada no MS Calendar Control? Ele permite alterar o tamanho. Abraços, Graymalkin
  14. Claro que o ORDER BY funciona com o adOpenDynamic. Só uso ele e o adOpenStatic e nunca tive esse problema. O erro "Rowset does not support fetching backward." apareceria se você usasse o adOpenForwardOnly, que só permite o avanço e não o retrocesso do cursor. Abraços, Graymalkin
  15. Você tem que "dobrar" a aspa simples do texto que você quer inserir. A propósito, isso já passou aqui pelo fórum. Veja um exemplo: INSERT INTO tabela (codigo, nome) VALUES (1001, 'Joana D''Arc'); Para isso, você pode usar a função Replace(). Abraços, Graymalkin
  16. Não seria "Sister"??? Brincadeirinha, hein? Abraços, Graymalkin
  17. Graymalkin

    Opc

    O que é um OPC Server? Abraços, Graymalkin
  18. Acho que falta um... TBAgenda.Index = "campo" ... antes do Seek. Mas, por que você não usa o método FindFirst? Acho ele muito mais simples de se usar. Abraços, Graymalkin
  19. Normalmente o fluxo de execução só segue após o término de uma função (há quem possa dizer que a função Shell() é uma exceção, porém não é). No entanto, o que existe na função Baixar pode fazer com que a execução continue antes de baixar o arquivo (mas, note que a função de fato terminou). O que existe nela? O ideal seria mostrar o código da função. Abraços, Graymalkin
  20. Em CommandAnterior e CommandProximo você deveria chamar as rotinas Preenche e Preenche2, não? Abraços, Graymalkin
  21. Bom, se o problema é como fazer o loop veja o código abaixo: Dim item As ListItem For Each item In ListView1.ListItems MsgBox item.Text Next item Já deu uma luz? Abraços, Graymalkin
  22. Uma vez que um programa em Fortran (ou qualquer outra linguagem) possa ler e gravar um arquivo texto, tudo é possível. (Mas existem maneiras melhores de se fazer isso, só não sei em relação a Fortran). Você poderia dar mais detalhes? Abraços, Graymalkin
  23. Além do exemplo do William, você encontrará outros se você fizer uma busca no fórum. Abraços, Graymalkin
  24. Graymalkin

    Datagrid

    Mas, no banco de dados, do computador do cliente, os valores estão armazenados corretamente? Abraços, Graymalkin
  25. O And ali *faz* parte da SQL e não do código, por isso o certo é: rs.Open "SELECT * FROM senha WHERE Usuário='" & user & "' And senha = '" & pass & "'", cn, adOpenKeyset Abraços, Graymalkin
×
×
  • Criar Novo...