Rafael Portal

Olá Graymalkin, é o seguinte.... Eu sei usar tratamento de erros.. o problema é que em função de eu ser principiante não consigo tratar todos.... Então meu problema é que pelo menos o programa não fique fechando na cara do cliente toda hora que eu me esquecer de tratar algum erro.... Tipo eu quero saber se existe alguma forma de que o programa não feche de uma forma genéria... Que não importe o erro que aconteça ele continue rodando.... Tem como fazer isso????????????? Agradecido, Rafael Portal

Gente como sou principiante minhas aplicações são geradas mas ainda tem erros... Bom o que eu quero saber... Como é que se fazer para quando gera um erro de Run-time para que o programa não feche?? Espero que tenham entendido minha pergunta.. Desde já muito obrigado.. Rafael Portal

Olá, gente é o seguinte, eu gostaria de pegar o último registro cadastrado na minha tabela... isso se faz como sql ? como ? ou será que se eu usar o Recordset.MoveLast vai me trazer o q eu preciso.. ?? Alguém poderia clarear minhas idéias? Agradecido... Rafael Portal

Olá gente, é o seguinte estou tentando fazer uma consulta bem simples mas está acontecendo um problema estranho.... Tipo estou usando ADO e banco ACCESS tá o que acontece eu uso este sql: sSql = "Select distinct Empresa from Clientes where Empresa LIKE '%" & sConsulta & "%'" ORDER BY CodCliente" Simples né.. eu quero buscar todas as empresas referentes ao que for passado como parâmetro para meu sConsulta... Bom mas acontece o seguinte... Quando eu faço a consulta aparece somente o primeiro resultado por exemplo: eu faço a consulta digitando "Banri" vai me aparecer todos os "Banrisul" dai digamos que temos um monte de resultados que tenham o nome "Banco Banrisul", bom ai está o problema eu tenho vários clientes só que da mesma empresa... Dai só aparece o primeiro cliente achado... e não aparece mais ninguém... Tirando o distinct não aditanta (caso alguém pense que é isso), bom eu preciso MUITO da ajuda de alguém... Agradeço muito espero que tenham entendido a minha dúvida Rafael Portal

Bom se eu entendi o que tu pertuntou acho que tu deveria colocar a mascara no evento GotFocus do Text: Private Sub Text1_GotFocus() Text1.Text = "__-_______" End Sub Bom e a segunda dúvida acho que é parecido com o que aconteceu comigo a pouco tempo, se você está usando Access você tem que mudar o valor "permitir comprimento zero" do seu atributo "Nome", acho que assim funciona.... Espero ter ajudado.. Rafael Portal

Gente é o seguinte... estou tentando buscar dados de data para uma mascara.... Estou usando banco de dados Access, bom o problema é o seguinte, a minha mascara está configurada assim: tudo bem, mas no Access está configurado para inserção de data como "Data abreveada" que tem a mascara assim: bom eu usei assim achando que não ia dar problema, mas aconteceu que quando eu insiro um data do tipo: A inserção é feita corretamente, e quando eu quero buscar estes dados novamente no banco eles são trazidos perfeitamente, mas quando eu insiro desta forma: Vejam que agora o mês tem um zero ao lado... na configuração do Access tendo zero a inserção é feita desta forma: Tá dai o problema é que quando eu vou trazer os dados para a mascara novamente acontece o seguinte erro: Presumi que não tem como eu passar a data para a mascara se os valores não são do tamanho da mesma... Eu só gostaria de saber como é que se resoluciona este problema..... Muito obrigado mesmo... Rafael Portal

Então ficaria assim: ADD FOREIGN KEY Minha_Estrangeira REFERENCES Tabela_Referencia (ChavePrimaria) Dai quando eu for fazer um select eu uso o nome "Minha_Estrangeira" isso né? Bom se é assim minhas dúvidas estão tiradas.... obrigado Gladiador.

Bah gente eu preciso saber isso!!! Por favor me ajudem!!!!!

Olá gente a minha dúvida é a seguinte, estou usando MySQL pela primeira vez para fazer o trabalho de conclusão para o técnico em informática... Bom a questão é a seguinte, quando eu crio uma chave estrangeira tipo: ADD CONSTRAINT Meu_Apelido FOREIGN KEY Minha_Estrangeira REFERENCES Tabela_Referencia (ChavePrimaria) Bom tipo ali aonde eu coloco "Meu_Apelido", eu gostaria de saber tipo... quando eu for usar um Select no meu programa.... eu vou usar o APELIDO ou eu vou usar o nome que eu dei ao campo que seria "Minha_Estrangeira" Espero que vces tenham entendido a minha dúvida..... Eu fico MUITO agradecido se puderem me ajudar.... Rafael Portal

Olá gente, é o seguinte tipo eu tenho um text do qual eu fiz uma verificação só para digitar número, usar o BS e espaço, tudo bem, mas quando eu dou um select na tabela (só que este campo pode ser em branco ou não), ele dá a seguinte mensagem de erro: e o código que eu estou usando para a verificação é seguinte: Private Sub TxtTelefone_KeyPress(KeyAscii As Integer) If KeyAscii <> 8 And KeyAscii <> 32 Then If Not (KeyAscii >= 48 And KeyAscii <= 57) Then KeyAscii = 0 End If End If End Sub E a atribuição: FAtualizaClientes.TxtTelefone.Text = Rs!Telefone Então o que eu quero dizer, por exemplo quando não existe o telefone.... eu quero passar um valor em branco para o text... já tentei liberando o espaço em branco mas não funcionou... alguém sabe a solução?????? Muito agradecido, Rafael Portal

Gente eu tenho uma dúvida que é seguinte... Tipo.. eu tenho um campo que é do tipo "Número" em um banco de dados Access, só que eu quero passar valor em branco ou não quando vou inserir dados mas quando eu insiro valor em branco ele dá um erro dizendo que é tipo de dados incompatível na expressão de critério. Bom eu fiz uma verificação antes de fazer a inserção tipo... se o text for "" então eu passo Empty mas mesmo assim continua dando erro... Alguém sabe me dizer o que eu tenho que fazer para que eu consiga passar valor em branco para um campo do tipo "Número"????? Muito obrigado mesmo. Rafael Portal

Bom gente estou tentando inserir valor de data da seguinte forma: #" & MskData.text & "# ' Está certo???? Bom e antes eu verifiquei para ver se é em branco, por que não é obrigatório este campo: if MskData.text = "" then MskData.text = Empty end if Tá dai quando eu insiro os dados acontece o seguinte erro: O que está errado??? Muito agradecido mesmo, Rafael Portal

Gente e minha dúvida é a seguinte eu gostaria de saber como é que eu posso especificar no Access que eu posso especificar valores nulos, para que eu possa inserir valores tipo... Insert into Clientes(Nome, Aniversario, Empresa, Cargo, Endereco, Numero, Complemento, Cep, Bairro, Municipio, Estado, Pais, Celular, Fax, Email, Site, Partido, CodConsultor) Values ('', '12/12/2004', 'Aqui tem dado', '', '', '', 'Aqui tem dado', '', '', '', '', '', '', '', '', '','', 0) Tipo... estou pergutando isso, por que quando eu passo valores no Insert, aparece uma mensagem de erro dizendo que o valor não pode ser nulo, então eu pergunto se tem como eu passar um valor nulo válido pelo VB, ou como especificar se o valor pode ser nulo no Access, enfim não sei fazer nenhum dos dois, quem poder me ajudar, ficarei agradecido, Rafael Portal

Tipo... e acontece uma coisa muito estranha... Se eu inserir mais uma coluna no ListView ele funciona!!!! Mas o problema é que eu quero DUAS colunas e não TRÊS por que se forem 3 colunas, uma vai ficar em BRANCO!!!!! Bom se alguém souber a solução por favor me ajudem....

Gente é o seguinte estou tentando carregar um ListView mas está acontecendo um problema.... aparece a seguinte mensagem de erro: Esete é o código: Me.Lvw.ListItems.Clear sSql = "Select * from Observacao where CodCliente = " & CodCliente & " and Data = '" & Data & "'" AbreBanco (sSql) Do While Rs.EOF = False Set Lvw = Me.Lvw.ListItems.Add(, , Rs!CodCliente) Lvw.Text = Rs!Hora Lvw.SubItems(1) = Rs!Obs 'Aqui é aonde gera o erro Rs.MoveNext Loop Rs.Close Eu gostaria de saber, o que está errado???? Como posso resolver???? Agradecido, Rafael Portal

Opa até me apavorei (rsrs), abraço Alan.

No Evento KeyPress coloca este código... No caso eu criei um campo para valores logo estou liberando os números e vírgula: If KeyAscii <> 8 And KeyAscii <> 44 Then If Not (KeyAscii >= 48 And KeyAscii <= 57) Then KeyAscii = 0 End If End If Espero ter ajudado... Rafael Portal

Gente é o seguinte, estou fazendo uma aplicação em que eu tenho um FormMDI e os outros são todos Child, só que tem um problema um dos meus Forms é bem grande, mas quando eu abro ele, ele aparece diminuido cortando todos os componentes que tem dentro dele, alguém saberia me dizer o que está acontecendo????? Fico muito agradecido mesmo... Rafael Portal

Alguém sabe me dizer como é que se cria os menu pop-up no VB??? Tipo o menu aquele que aparece quando você clica com o botão direito... Sites, apostilas, sujestões, dicas o que for é bem vindo... Agradecido. Rafael Portal

Olá, estou fazendo alguma coisa parecida, mas não entendi o que você quer fazer... Tipo... você quer que a em cada registro ele mude de linha???? Rafael Portal

Tem como eu fazer como que só seja possível inserir números em um text????? Agradecido.. Rafael Portal

Gente alguém sabe me dizer como é que eu faço para que tipo... No evento LostFocus de um text eu coloque tipo uma mascara de R$ #.###,## entenderam???? Na verdade nem precisa ser no evento LostFocus eu só quero é que fique formatado daquela forma, não sei como se faria isto no Mask dai por isso é que eu estou perguntando para fazê-lo no Text, gente qualquer ajuda é bem vinda... Muito agradecido... Rafael Portal

Fico agradecido se tiver ajuda de pessoas que participam do forum, e não pessoas que não tem o que fazer...

Olá, Gente é o seguinte, gostadia de saber se existe alguma maneira de eu atribuir um valor a um contador e quando eu fechar o projeto, este valor continuar atribuido ao meu contador para que quando eu abrisse o programa novamente eu pudesse ler o valor que está contigo na variável e continuar utilizando exatamente de onde eu parei, é o seguinte eu já testei uma forma que é gravar o valor em um arquivo Txt, e quando eu abro o programa eu verifico o valor armazenado no Txt e atribuo a variável, mas eu gostaria de saber se existe outra forma de fazer isso, alguém poderia me ajudar???? Desde já muito agradecido. Rafael Portal

Bom Decio, é o seguinte, já que você falou que inserir dados é tranquilo eu te pergunto digamos que eu fosse fazer uma inserção: Insert into [Plan1$](???????) values (??????) Aonde eu coloquei "??????" é a minha dúvida, tipo como eu faço para especificar os atributos da tabela???? Se não existem os campos.... E dai os valores vão ser inseridos aonde????? Tipo eu quero especificar a coluna.... E inserir os dados nela... Tem como ???????????????????????????? Rafael Portal