Graymalkin

E qual o código todo (em VB) que você está utilizando para executar aquela SQL? Abraços, Graymalkin

Bom, já que você insiste em fazer a consulta, dê uma olhada neste tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=25935. Nele tem um exemplo de como fazer uma consulta a um banco de dados utilizando VB.NET e ADO.NET. Abraços, Graymalkin

O que seria "vbkeys"? As constantes (vbKeyA, vbKeyB, etc.)? Bom, um jeito simples de se fazer isso é assim, no evento KeyPress: código = Asc(LCase(Chr(KeyAscii))) If Not (código >= 97 And código <= 122) Then KeyAscii = 0 End If Vale ressaltar que só serão aceitos os caracteres de a-z e de A-Z e mais nenhum outro (inclusive ç e Ç, caracteres acentuados e o backspace serão bloqueados). Abraços, Graymalkin

Como assim perde a filtragem por data? Como fica o código final, juntando as duas? E, se você fez lá no Access basta copiar e colar no VB. Abraços, Graymalkin

Sim, pela propriedade State desse objeto. Se ela estiver com o valor de adStateClosed é porque está fechada. Verifique aí. Abraços, Graymalkin

De uma forma ou de outra, quando se trabalha com arquivos textos, você terá que reescrever o arquivo todo no disco novamente. Portanto, para gravar no começo do arquivo basta que você leia ele todo para uma string (ou para um vetor), concatene o novo começo ao começo da string e grave novamente o arquivo no disco. Abraços, Graymalkin

Experimente com a função BitBlt da API Win32. Abraços, Graymalkin

O Connection1 está realmente aberto? Pelo erro, parece que não... Abraços, Graymalkin

Aí vai: ListView1.Items.RemoveAt(2) Abraços, Graymalkin

Dê uma procurada sobre a função agregada Count e a cláusula GROUP BY. Acho que elas vão resolver o problema. Abraços, Graymalkin

Não seria mais fácil se você colocasse o campo de login como chave primária (sem repetições) e utilizasse um bloco Try... Catch para detectar se ocorre algum erro no momento do cadastro? Abraços, Graymalkin

Não, não é totalmente garantido. Como eu disse no post citado, o melhor é que você crie o pacote de instalação com DLLs do sistema mais antigo em que o programa possa rodar (no caso, o Win98). Abraços, Graymalkin

Que erro vermelho??? Veja o código que usei e que funcionou (tal qual eu falei no outro post): #include <iostream> #include <iomanip> #include <stdlib.h> using namespace std; char texto[10]; int main() { char *texto = ::texto; cout << "Digite uma palavra: "; cin >> texto; cout << "Valor Local Texto = " << texto << endl; cout << "Valor Global Texto= " << ::texto << endl; system("pause"); return 0; } Certo? Graymalkin

Só um... afinal de contas, qual seria o resultado de Ord("ab")? 9798? Além de não ter sentido, se você aplicasse o IntToHex() a esse valor você não estaria recebendo o resultado esperado. Se você pode fazer com um basta percorrer a string toda pegando caracter por caracter. Abraços, Graymalkin

Desejo muito boa sorte com o novo emprego! Que tudo dê certo! Um abraço forte, Graymalkin

Mude a propriedade Style dele para csDropDownList. Dessa maneira ele só vai aceitar a seleção de um item (e não a digitação livre). Abraços, Graymalkin

Sem falar que para alterar um arquivo texto você precisa reescrevê-lo totalmente. Isso porque é totalmente imprevisível se o registro alterado terá exatamente o mesmo tamanho do anterior (caso seja, dá até pra alterar atuando no arquivo como um arquivo binário - mas realmente não sei se o Delphi tem essa opção). Realmente um banco de dados (por mais simples que seja, como Access, dBASE, etc.) é muuuuiiiitttooo melhor. Abraços, Graymalkin

Por "converter o texto para hexadecimal", você quer dizer pegar cada um dos valores ASCII/ANSI dos caracteres do texto e transformá-los em hexadecimal? Se for, você pode utilizar Ord() para obter o código ASCII/ANSI de um caracter e a função IntToHex() para transformar um inteiro em hexadecimal (o resultado é uma string). Abraços, Graymalkin

Abs. Progr'amador. É... cheguei tarde... Mas, boas dicas, Progr'amador! Abraços, Graymalkin

Qual o tipo de relacionamento que você criou entre as tabelas (a multiplicidade)? Abraços, Graymalkin

Dê uma olhada nestes tópicos a respeito disso: http://scriptbrasil.com.br/forum/index.php?showtopic=49812 http://scriptbrasil.com.br/forum/index.php?showtopic=39520 Para isso, dê uma olhada neste tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=33480 Abraços, Graymalkin

Uma idéia seria você percorrer a ListView para cada um dos itens (processos) procurando saber se ele já existe lá. Se ele não existisse, bastaria acrescentá-lo na ListView. O processo contrário também poderia ser feito, a fim de se remover da ListView os processos que não estão mais sendo executados. Abraços, Graymalkin

Experimente assim: rs.Open "SELECT * FROM cabecacomand WHERE nomedaloja LIKE '%" & txtloja.Text & "%' and datadacomanda between DateValue('" & txtdata.text & "') and DateValue('" & txtdata1.text & "');", cn, adOpenDynamic, adLockOptimistic Veja se dá certo aí... não testei. Abraços, Graymalkin

Não, ele é independente. Tecnicamente falando, você pode utilizar ele *no lugar* do CDONTS. Como o título do tópico é "Componentes De E-mail - 1!", ou seja, "Componentes" (no plural), decidi apresentar ele como mais um dos "componentes" existentes. Algumas características interessantes dele são: * você pode optar entre e-mail puro ou HTML; * autenticação; * inclusão de anexos às mensagens; * você pode embutir uma figura diretamente no código HTML da mensagem (não é um link: é a imagem mesmo - codificada em Base64). Ele foi totalmente desenvolvido em Python (e acompanha o código-fonte para quem quiser extendê-lo), e compilado como um componente COM, ou seja, pode ser utilizado em qualquer linguagem dê suporte ao COM (como VBScript, Visual Basic, Python, Delphi, Ruby, Java e xHarbour, por exemplo). Obrigado.

Eu é que agradeço! Agora vou poder incluir essa informação no Py.Sendmail (já tinham me falado dela, mas a pessoa que me falou não disse qual era e não retornou o e-mail no qual eu perguntei). Valeu! Para isso você vai ter que dar uma pesquisada sobre a codificação MIME de mensagens de e-mail. Só pra ter uma idéia, um e-mail com o que você quer seria formado por: Content-Type: multipart/mixed; boundary="===============1124912375==" MIME-Version: 1.0 From: de@servidor.com.br To: para@servidor.com.br Subject: Assunto --===============1124912375== Content-Type: text/html; charset="iso-8859-1" MIME-Version: 1.0 Content-Transfer-Encoding: quoted-printable caro <b>Graymalkin</b>... --===============1124912375==-- Se isso tudo aí chegar em uma mensagem, o leitor de e-mail vai interpretar e mostrar direitinho. Falou? Graymalkin