Graymalkin

Já usei o do BOL (smtp.bol.com.br), porém você tem que acessar a conta de recebimento (POP3) pelo menos uma vez, durante a conexão, antes de poder enviar. Abraços, Graymalkin

Ah, então a coisa é mais simples do você que imagina. . A .NET já tem tipos e funções próprios para lidar com tempo e com cálculos de tempo. Veja o exemplo abaixo: Dim inicial As DateTime = Now() 'Hora atual Dim final As DateTime = inicial.AddHours(1) 'Acrescenta 1 hora à hora atual MsgBox(inicial.ToString()) MsgBox(final.ToString()) Dim diferença As TimeSpan = final.Subtract(inicial) 'Calcula a diferença (subtraindo) entre o tempo final e inicial MsgBox(diferença.ToString()) O código acima já faz tudo que você precisa. Basta agora adaptar ao seu caso (colocando em um Timer, por exemplo, para poder ir atualizando na tela automaticamente). Abraços, Graymalkin

Mas, e os resultados das outras 998 chamadas? Ainda que na 999 você pudesse voltar para a primeira, provavelmente você ainda não teria o resultado final. Considere a seguinte função para calcular o fatorial de um número: int fat(int n) { if (n==0 || n==1) return 1; else return n*fat(n-1); } Ao calcular o fatorial de 5, por exemplo, na última chamada o retorno seria o 1, e não uma nova chamada, porém todas as chamadas anteriores estariam pendentes esperando suas respectivas chamadas (a primeira espera a segunda, a segunda espera a terceira, a terceira espera a quarta, e assim por diante). Ao "desempilhar" é que o cálculo é feito (uma vez que os valores só são multiplicados após serem "conhecidos"; a primeira chamada fica esperando a segunda retornar algo para poder multiplicar, só que a segunda fica esperando a terceira para poder multiplicar e retornar, e assim por diante). Não sei se sua função faz algo diferente disso, mas se for o caso e se você puder postá-la aqui, creio que ficará mais fácil de ajudar. Abraços, Graymalkin

Não sei como está a sua função, mas se ela utilizar um loop, basta que a cada iteração você verifique a marcação (de cada uma das checkboxes) e faça os cálculos. Acho que fica melhor se você postar o código e um exemplo do que você quer e qual seria o resultado correto. Abraços, Graymalkin

Qual seria o erro? E você definiu a propriedade MDIChild dos forms para True? Abraços, Graymalkin

Acho que o ideal seria definir o fim da listagem com qualquer outra coisa, tipo "---FIM---". Dessa forma, bastaria mudar o While para: While Range("A" & l).Value <> "---FIM---" Certo? Abraços, Graymalkin

Ao invés de colocar uma Label sobre a imagem, escreva diretamente nela, utilizando as propriedades CurrentX e CurrentY para definir a posição e o método Print para escrever. Abraços, Graymalkin

Dê uma olhada nesta página: http://mailformat.dan.info/body/html.html. Foi ela que me auxiliou quando precisei implementar isso na minha biblioteca para envio de e-mail (http://www.graymalkin.globalhosts.com.br/pysendmail.asp). Abraços, Graymalkin

Na máquina cliente? Não, você não precisa desse conhecimento. Pelo menos não no caso do Inno. O ISTool (http://www.istool.org) faz tudo pra você através de uma interface amigável (arrasta-e-clica). O ISTool importa automaticamente a listagem de arquivos necessários. Para isso, basta informar para ele o arquivo setup.inf criado pelo Package & Deployment Wizard. Abraços, Graymalkin

Tente o do iG (smtp.ig.com.br). O do BOL (smtp.bol.com.br) eu sei que funciona, porém tem que fazer um certo "gatilho" já que o BOL só permite o envio depois que você acessa, pelo menos uma vez, o servidor POP (de recebimento). E não, você *não* precisa do IIS ou do PWS para executar arquivos VBS. Inclusive, acho que o Win98SE já vem com o suporte a VBScript já instalado. Se não vier, basta baixar no site da Microsoft. Abraços, Graymalkin

Veja se é isso que procuras: Set m_objDOMPessoa = CreateObject("MSXML.DOMDocument") E, acho que você pode referenciar a biblioteca de XML no VBA também (assim como faz no VB). Dê uma olhada nas opções do VB e você deverá achar uma opção chamada Referências (ou References) semelhante a existente no VB. Abraços, Graymalkin

Não me lembro de nenhuma marca ou modelo no momento, mas basta procurar qualquer um que ligue na porta do teclado, como falei anteriormente. Quanto a gerar o código, em geral eles não acompanham o software, mas você pode usar o Corel para isso ou ainda qualquer outro programa (inclusive você pode criar o seu próprio também). Para criar o seu próprio, dê uma olhada nesta página do site do tio Macoratti: http://www.macoratti.net/codbar.htm Abraços, Graymalkin

Humm... não é a minha praia. Abraços, Graymalkin

Eu também queria saber isso. Se você achar algo, por favor, me dê um toque. ByVal você usa quando quer que a função receba uma cópia do valor que você está informando. ByRef é quando você quer passar uma referência à variável local para a função. Veja estas duas funções: function Teste(byval x as integer) as integer x = x+1 Teste = x end function function Teste2(byref x as integer) as integer x = x+1 Teste2 = x end function Ambas recebem um parâmetro (x) e incrementam-no (x = x+1) e por fim retornam o valor incrementado (Teste = x e Teste2 = x). A diferença é que a primeira recebe x por valor (ByVal) e a segunda por referência (ByRef). Ao utilizar, você notará a diferença: dim a as integer a = 4 msgbox Teste(a) msgbox a msgbox Teste2(a) msgbox a Note que o valor de "a" fica *inalterado* após a utilização da primeira função (a do ByVal). Todavia, após utilizar a segunda função (a do ByRef) o valor da mesma é alterado. Isso porque no caso do ByVal o "x" dentro da função ficou com o mesmo valor de "a", porém no caso do ByRef o "x" dentro da função ficou referenciando o mesmo local onde "a" está (ou seja, x=a). Sacou? Dê uma olhadela neste post: http://scriptbrasil.com.br/forum/index.php?showtopic=41838 Abraços, Graymalkin

Com o Excel instalado no máquina (no caso, no servidor) você pode fazer isso por automação. Dê uma procurada por CreateObject na sala de Visual Basic (não aqui no .NET) e você deverá achar exemplos. Abraços, Graymalkin

Suponho que você esteja fazendo a pesquisa por meio de uma Query, não? Se for, bastará fazer: label1.caption := inttostr(query1.recordcount); Onde "label1" deve ser substituído pela sua Label. A propriedade RecordCount sempre tem o valor da quantidade de registros da query. Abraços, Graymalkin

Veja abaixo: #include <stdio> #include <conio> void pausar() { printf("\nPressione alguma tecla para continuar..."); getch(); } int main() { printf("teste"); pausar(); } Seria isso que você quer? Abraços, Graymalkin

Vamos começar pelo mais simples: ArrayList. Um ArrayList é simplesmente uma forma de você armazenar dados em uma lista que vai aumentando a medida que é necessário. Em um Array comum você precisa definir o tamanho ou então ficar redimensionando manualmente sempre que necessário. Um ArrayList já faz isso pra você. Exemplo: Dim a As New ArrayList() Dim elemento As Object a.Add(13) a.Add("palavra") a.Add(1.618) MsgBox(a(0)) MsgBox(a(1)) MsgBox(a(2)) O código acima adiciona três elementos (13, "palavra" e 1.618) na arraylist "a" e depois mostra todos esses elementos. Agora vamos para dois que são bem semelhantes: SortedList e HashTable. Note que no código acima, para exibir os elementos tivemos que informar seus índices (0 para o primeiro, 1 para o segundo e 2 para o terceiro). Na SortedList e na HashTable temos a liberdade de definir quais serão nossos índices e os mesmos não precisam ser numéricos. Um exemplo de HashTable: Dim h As New Hashtable() h.Add("nome", "Junior") h.Add("nickname", "Graymalkin") MsgBox(h("nome")) MsgBox(h("nickname")) Veja que me referi ao primeiro item pelo seu índice "nome" e ao segundo pelo seu índice "nickname". Em uma SortedList o mesmo ocorre, porém as chaves sempre estão em ordem. Um exemplo de SortedList: Dim s As New SortedList Dim elemento As Object s.Add(50, "teste") s.Add(20, "teste2") For Each elemento In s MsgBox(elemento.key) Next Veja que apesar de ter inserido o 50 primeiro e depois o 20, a ordem que aparecerá será ao contrário (o 20 vem primeiro que o 50). E agora, por último, o mais complexo deles: o DataSet. Um DataSet é uma maneira de se agrupar uma série de DataTables, que são tabelas. Essas tabelas tem colunas (columns), que são os campos, e linhas (rows), que são os registros. Como esse é um assunto bem a parte, e não tem muito haver com o que você pediu antes (ArrayList, SortedList e HashTable), não vou me estender muito sobre ele. No site do tio Macoratti você encontra mais informações: http://www.macoratti.net Abraços, Graymalkin

Não entendi bem o seu código, mas porque você não faz simplesmente... TotalMin = Format(Val(TotalMin), "00") ... para formatar, ao invés de verificar se é menor que 10 e concatenar um zero na frente? E o que você quer exatamente? Calcular o período de tempo entre dois horários distintos e mostrá-lo no formato hh:mm:ss? Abraços, Graymalkin

Se sua intenção é atualizar os dados no BD de acordo com os dados modificados no DataSet, você tem que procurar sobre o método Update do seu DataAdapter (OleDbDataAdapter ou SQLDataAdapter). Abraços, Graymalkin

Basicamente uma DLL é um repositório de funções/rotinas que são úteis para mais de um programa. Para outros detalhes, dê uma olhada nestes posts: http://scriptbrasil.com.br/forum/index.php?showtopic=31941 http://scriptbrasil.com.br/forum/index.php?showtopic=25031 http://scriptbrasil.com.br/forum/index.php?showtopic=25651 http://scriptbrasil.com.br/forum/index.php?showtopic=23679 Abraços, Graymalkin

Procure leitores que são ligados no lugar do teclado (eles possuem uma extensão para você ligar o teclado propriamente). Ao passar o leitor sobre um código você terá, literalmente, o código "digitado" (é como se alguém estivesse digitando os números no teclado). Ao final, em geral, é pressionado um Enter também. Com isso, basta ter uma caixa de texto (Edit) e programar para quando o Enter for pressionado ele pegar o código que está escrito (acabou de ser escrito, aliás) e fazer o que você quiser. Abraços, Graymalkin

Você deveria ter um DataSource *só* para o DBCombo, afinal de contas ele terá uma tabela só dele, e o outro para a tabela que você está utilizando (na qual a escolha do DBCombo será gravada), não? Abraços, Graymalkin

Sempre faça uma busca pelo fórum antes de postar, ok? Quanto a sua dúvida, dê uma olhada nestes dois posts: http://scriptbrasil.com.br/forum/index.php?showtopic=26595 http://scriptbrasil.com.br/forum/index.php?showtopic=33901 Abraços, Graymalkin

Note que quando você "compila o projeto", você obtém um *executável* e não um "projeto compilado". O que o Package & Deployment Wizard pede é justamente o *projeto*, ou seja, o seu projeto em VB (aquele arquivo .VBP) e não o arquivo executável (.EXE). Abraços, Graymalkin