Decio

Declarado como Public em um módulo deveria funcionar. Tenta assim: Global CONN As ADODB.Connection

Você pode usar o comando system("clear");

Eu tambem nunca vi em nenhum lugar que isso seja possível

Que tipo de combinação você quer fazer? Tipo gerar numeros aleatórios ?

Este não é um problema do DevC++. Quem não deixa trabalhar com interrupções é o sistema operacional.Mesmo que você faça o código em C , vai acontecer o mesmo problema. O DevC++ é um compilador de 32 bits e os arquivos gerados por ele , só rodam debaixo do Windows, que não permite trabalhar com interrupções sem o controle do sistema operacional. Em DOS, como se trabalhava basicamente com um unico arquivo aberto, não era problema deixar que o aplicativo tivesse acesso total a maquina. O Windows que é multi-tarefa não, permite esta facilidade ,para garantir a "estabilidade" do sistema. Se você precisa usar interrupções, você deve fazer isso em nível de device driver. Isto é claro se estivermos falando em plataforma Windows. Se for em Linux é outra historia.

Hum... isto parece um protocolo SSL utilizado para segurança em trafego de informações pela rede, que se utiliza de varios algorítimos de criptografia. Vai ser dificil se for isso. E se você tentar entrar em contato com quem forneceu o certificado não ajuda?

Fiz esta mesma sequencia que você falou e não perdeu a referencia.Usei o VB 6. Como você esta fazendo para incluir o .bas na primeira vez? Se você criar um projeto na unidade C e depois referenciar para o .bas na unidade X , mesmo que você copie os fontes para outra pasta, não deve perder a referencia , que fica salva no arquivo xx.vbp.

Como é esse arquivo? É em texto ou binário?

Não tem como você usar ADO? não se usa mais essa forma de acesso a dados. Em todo caso tenta assim: Set MyRs1 = MyDb1.OpenRecordset("Select * FROM Tabela1", dbOpenDynaset) Se não me engano, eu fazia desta forma e funcionava.

Não sei se é este o seu problema, mas a partir da hora que você preenche a váriavel JUNTAR dentro do loop, ela apaga o antigo conteudo e preenche com o novo. Tem que ser algo assim: JUNTAR=JUNTAR & MaisAlgumaCoisa

Não sei se é o caso do seu problema, mas se for fazer referencia a um objeto que esteja em outro formulário, você precisa dizer a qual form ele pertence. Ex: você tem um TextBox chamado txtForm1 no Formulario chamado Form1 e um TextBox chamado txtForm2 no Formulario chamado Form2 Se você quizer preencher o TextBox do Form1 estando no Form2 , você deve fazer assim: Form1.txtForm1.Text="Decio"E vice-versa.

Eu pensei em algo assim: 'Programa em VB: X = 10 strVar = "Decio" Site = "http://www.enderco.com.br/teste.php?TESTE1=" & X & "&TESTE2=" & strVar Browser1.Navigate Site //Programa em PHP: <?php //Aqui voce recebe a string passada em TESTE1 e TESTE2 , e faz o seu código ?> se você usar a ideia acima utilizando o componente Microsoft Internet Control dentro do VB , vai dar certo.Pelo menos foi isso o que eu entendi.

Você pode chamar a página passando parametros na linha de comando, tipo assim: Pagina.html?Par1=Teste1&Par2=Teste3 Para pegar estes parametros em paginas dinamicas é fácil, porém em Html puro eu não sei como se faz, talvez com JavaScript seja possível.Neste caso você deve entrar no fórum respectivo.

Uma boa pedida também é o Allegro: http://alleg.sourceforge.net

Se você é programador de Visual Basic, uma boa pedida é o HB++ que é muito parecido com o VB: http://www.handheld-basic.com ou o NS-Basic: http://www.nsbasic.com/palm/ Se você programa em C , recomendo o Code-Warrior: http://www.metrowerks.com/mw/default.htm Lembrando que as soluções acima são softwares comerciais e portanto tem que ser comprado. Também para quem programa em C , so que freeware: http://www.eclipseplugincentral.com/displayarticle18.html

Achei este exemplo na Internet, pelo menos copilou sem erro #include <cstdlib> #include <iostream> void MyFunction(); int AdrIO; static char ValIO; using namespace std; int main(int argc, char *argv[]) { system("PAUSE"); return EXIT_SUCCESS; } void MyFunction() { __asm("mov %dx,_AdrIO"); // loading 16 bits register __asm("mov %al,_ValIO"); // loading 8 bits register /* Don't forget the underscore _ before each global variable names ! */ __asm("mov %dx,%ax"); // AX --> DX } :

Infelizmente, estou sem condições de fazer um teste para ver se isto funciona, mas de uma olhada neste site: http://www.functionx.com/bcb/topics/msgbox.htm

Olá, eu apenas encontrei este componente e sugeri o uso, mas eu mesmo nunca fiz uso dele. Me lembro nos velhos tempos do Windows 98 que precisei fazer algo parecido, e não guardei boas lembranças. Espero nunca precisar fazer algo parecido no NT. Abraço.

Seu conceito sobre função esta um pouco errado, tente algo assim: 'No form Private Sub cmdDobro_Click() dRet = Dobro(Text1.Text) MsgBox "o dobro é: " & dRet End Sub 'no módulo: Public Function Dobro(ByVal dblValor As Double) As Double dblValor = CInt(dblValor) * 2 Dobro = dblValor End Function Se não entendeu, algo avisa ai.

Voce pode criar uma função que retorne "0 ou 1" . Após o retorno da função, você faz a verificação e se for falsa, você chama a função de novo, se for verdadeira, você continua.. Obs: Apesar de ser possível usar o comando "goto" dentro de um mesmo bloco de funções, não é aconselhavel o uso.

Não da para para usar um "Select DISTINCT" na hora de abrir o RecordSet? Assim você não teria dados repetidos.

No site da Bematech existe um exemplo : http://www.bematech.com.br/suporte/dwn_fisc_windows.asp So que usa uma dll de alto nível para acesso a impresssora de sua fabricação. Se o que você precisa é apenas saber como é o modelo, pode até servir.

Sem o protocolo de comunicação fica mais dificil. A maioria das leitoras funciona de uma forma simples. Basta você abrir a serial e ao passar um cheque, a leitora já envia os dados.Voce pode pegar o que esta sendo enviado assim: Private Sub MSComm1_OnComm() Select Case MSComm1.CommEvent Case comEvReceive Dim buffer As Variant buffer = MSComm1.Input Buffers = StrConv(buffer, vbUnicode) end select end sub Use o exemplo do Macoratti ou do VBTerm que é um prg exemplo que vem junto com o VB. O que pega mais é iniciar a leitora corretamente com a velocidade,paridade e stop Bits , etc.. E alguns tipos usam um protocolo mais elaborado, tipo usar sinais de controle para poderem enviar\receber dados, enviar algum caracter para confirmar que recebeu dados corretamente. Tente achar o protocolo que vai facilitar muito.

Para separar strings , você pode usar o Split: Dim arrItem() As String Dim strMensagem As String strMensagem = "Parte1,Parte2,Parte3,parte4" arrItem = Split(strMensagem, ",") MsgBox arrItem(0) MsgBox arrItem(1) MsgBox arrItem(2) MsgBox arrItem(3)

A unica coisa que sei é que existem duas empresas que fazem a homologação para este tipo de software que são a Software Express (http://www.softwareexpress.com/) e Seven PDV ( http://sevenpdv.com.br ) . Entre em contato para ver em que eles podem te ajudar, Estas empresas devem garantir a correta comunicação entre o seu software de Automação Comercial, que deve estar dentro da conformidade da lei . Lembrando que a legislação determina que a emissão do comprovante de pagto feito por cartão de crédito\débito, deve ser feito somente com uso de um ECF (Emissor de Cupom Fiscal ), o que lhe obriga a cohecer também a legislação referente a este equipamento, o que pode ser conseguido no site da Receita Federal http://www.fazenda.gov.br Não posso lhe ajudar muito, pois não conheço bem o assunto, mas boa sorte.