-
Total de itens
8.257 -
Registro em
-
Última visita
Tudo que Graymalkin postou
-
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
-
Acho que só olhando pelo nome dela mesmo. Que eu saiba não existe uma propriedade para distinguir isso. Abraços, Graymalkin
-
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
-
Mas, qual o erro apresentado quando o objeto é criado via ASP? Abraços, Graymalkin
-
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
-
Use o método Save do ADODB.Recordset. Abraços, Graymalkin
-
Esse já é o comportamento normal. Tem certeza de que se tratam de listboxes? Abraços, Graymalkin
-
Função Lenght() Pascal
pergunta respondeu ao M@luco Belez@ de Graymalkin em Outras Linguagens de Programação
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 -
Não sei se existe uma função para isso, mas você pode simplesmente fazer um loop for para isso. Abraços, Graymalkin
-
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
-
E se for no VB6, dê uma olhada na rotina Kill. Abraços, Graymalkin
-
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
-
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
-
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
-
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
-
Não seria "Sister"??? Brincadeirinha, hein? Abraços, Graymalkin
-
O que é um OPC Server? Abraços, Graymalkin
-
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
-
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
-
Em CommandAnterior e CommandProximo você deveria chamar as rotinas Preenche e Preenche2, não? Abraços, Graymalkin
-
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
-
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
-
Além do exemplo do William, você encontrará outros se você fizer uma busca no fórum. Abraços, Graymalkin
-
Mas, no banco de dados, do computador do cliente, os valores estão armazenados corretamente? Abraços, Graymalkin
-
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