Ir para conteúdo
Fórum Script Brasil

raphael_suporte

Moderadores
  • Total de itens

    1.378
  • Registro em

  • Última visita

Tudo que raphael_suporte postou

  1. Três amigas, uma noiva, uma casada e uma amante decidiram fazer uma brincadeira: seduzir seus homens usando uma capa, corpete de couro, máscara nos olhos e botas de cano alto, para depois dividir a experiência entre elas. No dia seguinte, a noiva iniciou a conversa: - Quando meu namorado me viu usando o corpete de couro, botas com 12 cm de salto e máscara sobre os olhos, me olhou intensamente e disse: 'Você é a mulher da minha vida, eu te amo'. Fizemos amor apaixonadamente. A amante contou a sua versão: - Encontrei meu amante no escritório, com o equipamento completo! Quando abri a capa, ele não disse nada, me agarrou e fizemos amor à noite toda, na mesa, no chão, de pé, na janela, até no hall do elevador! Aí a casada contou sua história: - Mandei as crianças para a casa da minha mãe, dei folga pra empregada, fiz depilação completa, as unhas, escova, passei creme no corpo inteiro, perfume em lugares estratégicos e caprichei: capa preta, corpete de couro, botas com salto de 15 cm , máscara sobre os olhos e um batom vermelho que nunca tinha usado. Pra incrementar, comprei uma calcinha de lycra preta com um lacinho de cetim no ponto G. Apaguei todas as luzes da casa e deixei só velas iluminando o ambiente. Meu marido chegou, me olhou de cima abaixo e disse: - Fala aí Batman!!! Cadê a janta?
  2. ÁS 23H - CHEGANDO NA BALADA! SELECT MULHER FROM BALADA WHERE (GERAL = 'LINDA' OR GERAL = 'GOSTOSA') AND BUNDA >= 95 AND PEITOS >= 80 AND IDADE BETWEEN '18′ AND '30′ AND CARATER = 'SAFADA' AND ESTADO = 'ESTUDANTE'; ÁS 0H - AINDA NÃO CONSEGUIU NINGUÉM E JÁ ESTÁ COM UMAS CERVEJAS NO SANGUE! SELECT MULHER FROM BALADA WHERE GERAL = 'GOSTOSA' AND BUNDA >= 80 AND PEITOS >= 70 AND IDADE BETWEEN '16′ AND '35′ AND CARATER = 'MAIS OU MENOS SAFADA' AND ESTADO = 'SEM OCUPAÇÃO'; ÁS 1H30 - COMEÇANDO A FICAR DESESPERADO! SELECT MULHER FROM BALADA WHERE GERAL = 'AJEITADA' AND BUNDA >= 70 AND PEITOS >= 40 AND IDADE BETWEEN '16′ AND '40′ AND CARATER IS NULL AND ESTADO = 'LARGADA'; ÁS 3H00 - DESESPERADO!!! SELECT MULHER FROM BALADA WHERE GERAL LIKE '%BAGULHO%' AND BUNDA <> 0 AND PEITOS <> 0 AND IDADE BETWEEN '14′ AND '50′ AND ESTADO = 'EMPREGADA'; ÁS 4H00 - NA FILA PARA PAGAR E IR EMBORA DA BALADA! SELECT MULHER FROM BALADA ÁS 4H30 - ANTES DE SUBIR NO ÔNIBUS! SELECT * FROM BALADA WHERE INSTRUMENTO <> 'PINTO'
  3. tente assim Banco='" & BancoTextBox.Text & "' where codempresa= '" & 6 & "'" lembrando que o 6 está entre aspas simples, o que significa que você está filtrando como se fosse uma string e não um valor numérico
  4. cara.. onde você está colocando esse codigo?? e como assim, " não consigo aceder de novo aos dados"... me passa seu codigo, pois uma coisa é o codigo no Form_load e outra é no botão
  5. cria um botão salvar, e nele coloca a função de UPDATE, não esquece de usar o where para filtra o registro que deseja atualizar e não a tabela toda.
  6. então João, se o que você quer é só preencher, vai como eu uso no VB6, não sei se a mesma forma, mas não custa tentar.. textBox1.text = dr("campo_referente") ou textBox1.text = dr.item("campo_referente")
  7. CORINTHIANS-SP SANTOS-SP SANTO ANDRÉ-SP ATLÉTICO-PR x PALMEIRAS-SP GRÊMIO-RS FLAMENGO-RJ VITÓRIA-BA NÁUTICO-PE CRUZEIRO-MG AVAÍ-SC x FLUMINENSE-RJ
  8. Depois do bebé nascer, o pai, aflito, foi falar com o obstetra. "Doutor, estou muito preocupado porque a minha filha nasceu com cabelos ruivos. Não pode ser minha!" "Que disparate!" disse o médico. "Mesmo que tu e a tua mulher ambos tiverem cabelo preto, podem ter cabelos ruivos nos genes da vossa família." "Não é possível!" insistiu o pai. "Ambas as nossas famílias têm tido cabelos pretos há muitas gerações." "Bem," disse o médico "tenho de perguntar... Com que frequência tu e a tua mulher praticam sexo?" O homem, envergonhado, respondeu: "Este ano tenho andado cansado de trabalhar muito. Só fizemos amor uma ou duas vezes nos últimos meses." "Então aí está!" disse o médico confiante. "É ferrugem!"
  9. JOGO 01: SÃO PAULO-SP JOGO 02: PALMEIRAS-SP JOGO 03: AVAÍ-SC JOGO 04: FLAMENGO-RJ JOGO 05: INTERNACIONAL-RS JOGO 06: FLUMINENSE-RJ x GRÊMIO-RS JOGO 07: GOIÁS-GO JOGO 08: SPORT-PE x ATLÉTICO-PR JOGO 09: ATLÉTICO-MG JOGO 10: BOTAFOGO-RJ
  10. Como fazer uma mulher muuuuito feliz! A história começa assim.... No mais alto pico do Tibet vive o mais sábio homem do mundo. Certa vez um rapaz foi à sua procura e perguntou-lhe: - Mestre dos mestres! Qual o caminho mais curto e seguro para o coração de uma mulher? O mestre respondeu-lhe: - Não há caminho seguro para o coração de uma mulher, filho. Só trilhas à beira de penhascos e caminhos sem mapas, cheios de pedras e serpentes venenosas.. - Mas, então, mestre... O que devo fazer para conquistar o coração da minha amada? Então lhe disse o grande guru: - Fazer uma mulher feliz é fácil. - Só é necessário ser: 1) Amigo 2) Companheiro 3) Amante 4) Irmão 5) Pai 6) Chefe 7) Educador 8) Cozinheiro 9) Mecânico 10) Encanador 11) Decorador de Interiores 12) Estilista 13) Eletricista 14) Sexólogo 15) Ginecologista 16) Psicólogo 17) Psiquiatra 18) Terapeuta 20) Simpático 21) Esportista 22) Carinhoso 23) Atento 24) Cavalheiro 25) Inteligente 26) Imaginativo 27) Criativo 28) Doce 29) Forte 30) Compreensivo 31) Tolerante 32) Prudente 34) Capaz 35) Valente 36) Decidido 37) Confiável 38) Respeitador 39) Apaixonado 40) E, de preferência, RICO!!! - Não cuspa no chão; - Não coce o saco na frente dela; - Não arrote alto. Aliás, não arrote; - Dê flores e muitos.... Muitos presentes; - Corte e limpe as unhas... Não coma as unhas; - Não peide sob o cobertor. Aliás, não peide. - Levante a tampa do vaso antes de mijar. - Deixe ela ter ciúme de você, ela pode; - Use desodorante (que preste); - Dê descarga depois de sair da privada; - Não fale palavrão; - Não seja engraçadinho com os outros; - Não tenha ciúme dela; - Não fique barrigudo. Aliás, não engorde; - Não chegue tarde em casa. - Saia para trabalhar e volte correndo; - Não seja pão-duro. Use pelo menos 2 cartões de crédito; - Não diga que mulher não sabe dirigir; - Não olhe para outras mulheres... Aliás, não existem outras mulheres; Aprenda a cozinhar; - Diga 'eu te amo' pelo menos 05 vezes por dia; - Lave a louça; - Ligue para ela, de qualquer lugar, para avisá-la onde está. - Deixe ela conversar durante horas ao telefone; - Não ronque; - Não seja fanático por futebol; - Faça a barba todos os dias para não arranhá- la; - Nunca reclame de nada; - Repare quando ela cortar o cabelo, mesmo que seja apenas as pontinhas, e diga sempre que ficou lindo... E é muito importante ainda não esquecer as datas do seu: aniversário, noivado, casamento, formatura, menstruação, data do Primeiro beijo; aniversário da mãe, tia, irmão ou irmã mais querida; aniversário dos avós, da melhor amiga... E da cachorra Infelizmente, o cumprimento de todas estas instruções não garante 100% a felicidade dela, porque poderia sentir-se presa a uma vida de sufocante perfeição e fugir com o primeiro traste 'gozador da vida' que encontre. - E o mais importante, meu rapaz... Espere... Volte aqui..... - NÃO... NÃO PULE... NÃO SE MATEEEEEEEEEEEEE!!! COMO FAZER UM HOMEM FELIZ??? É necessário: 1. Sexo; 2. Comida. 3. Cerveja; 4. Futebol.
  11. raphael_suporte

    Bate Papo

    ai Bolão equilibrado, mas concordo com o Quint, poderia ter mais participantes.
  12. isso fabin é a conexão com o banco, para que ele possa executar a consulta no banco
  13. ah claro, você tem que abrir a conexão com o banco né? igual você fez no código acima. vou dar uma olhada aqui para ver no que posso ajudar
  14. Vê se isso já ajuda Var x,y,z:logico // eles não podem ser logicos, como você passa um valor ( tamanho) ele teria que ser inteiro ( no minimo) ou real Inicio se (x<(y+z)) e (y<(x+z)) e (z<(x+y)) então // tente separar a soma para que ele consiga calcular antes de comparar escreva("É um triângulo!") senao escreva("Valores informados não formam um triângulo.") fimse //se(x=y) e (z<>x) e (z<>y) então // não precisa ser assim se(x=y) e (z <> x) então // como você já está comparando X com Y, e usando o "E", ele só será verdadeiro quando os 2 testes forem verdadeiro. escreva("Triângulo Isósceles") senao se (y=z) e (x<>y) então Escreva("Triângulo Isósceles") senao se (x=z) e (y<>z) então Esreva("Triângulo Isósceles") senao se (x<>y) e (x<>z) e (y<>z)então escreva("Triângulo Scaleno") fimse //essa quantidade de "fimse" aqui em baixo é para o resto do programa, correto? fimse fimse fimse fimalgoritmo
  15. o erro é na query, pois você não está informando o valor que deseja filtrar.. Private Sub txtCpf_LostFocus() Set rsSeleçao = New ADODB.Recordset rsSeleçao.Open "SELECT * FROM Clientes WHERE CPF = txtCpf.text" If rsSeleçao.RecordCount <> 0 Then MsgBox "CPF existente", vbInformation + vbOKOnly + vbApplicationModal, "Aviso" End If caso o valor de txt seja string tem que colocar as aspas simples
  16. cara não consegui entender muito bem o que você está querendo, me parece que ao selecionar um funcionário na Combo, ele deverá preencher os dois textbox referente a escolha da combo, pois bem, no evento Combo_change, você terá que pôr a consulta com o valor da combo para preencher o campo que precisa.
  17. pelo que eu entendi, você quer, que ao carregar um determinado form, o mesmo já apareça preenchido, correto?! então todo "item" no VB possui métodos, ações e propriedades... você terá que usar um select na base, usando manipulação com o BD, para carregar o que precisa. Isso deverá ser utilizado na ação de Load na form chamada.. você já usa uma conexão com um banco correto?
  18. Cara, verifica os campos da tabela.. algum campo pode está faltando ou com um nome adverso do que se encontra no seu código. PS: Teria como não escrever tudo com o CAPS ativo, pois pode parecer um xingamento ou coisa do gênero.
  19. poste aqui o que você já fez.. para ajudar melhor na sua dúvida, pois se te passar tudo mastigado, você acaba não fixando e aprendendo
  20. raphael_suporte

    DUVIDAS

    cara te oriento a procurar apostilas e livros para facilitar suas dúvidas...
  21. Eder, eu não conheço muito pouco com o Vista ( na verdade, meu primo tem ele instalado eu mesmo não uso) tem que saber que protocolo é esse, para verificar se o Vista tem suporte para ele.
  22. opa.. faltou uma. DAY: Não quis nem saber, entrei no elevador e PAY DAY
  23. FEEL: Barbante: me da um pedaço desse FEEL para eu amarrar aqui. MICKEY: Afirmativo de queimadura: MICKEY may. TOO MUCH: Legume: quero uma salada de TOO MUCH. HAIR: Marcha de carro: ele engatou a HAIR. MISTER: Sanduíche: eu quero um MISTER can't. MAY GO: Pessoal dócil: ele e tão MAY GO. YOU: Expressão de curiosidade: YOU seu irmão, como vai? YEAR: Deixar partir: ela teve que YEAR. VASE: Momento de jogada: agora e minha VASE. CREAM: Roubar, matar, etc.: ele cometeu um CREAM.. DATE: Mandar alguém deitar: DATE ai. DAY: Conceder: eu DAY um presente para ela. PAINT: Objeto: me empresta o seu PAINT? FAIL: Oposto de bonito: ele e FAIL. RIVER: Pior que FAIL: ele é O RIVER. EYE: Interjeição de dor: EYE que dor de cabeça! TO SEE: Onomatopéia que representa tosse: Acho que vou TO SEE! CAN'T: Oposto de frio: o carro esta CAN'T. MORNING: Nem CAN'T, nem frio: o carro esta MORNING. FRENCH = Dianteira: sai da FRENCH, por favor. HAND: Entregar, dar por vencido: você se HAND?
  24. 'O sero mano tem uma missão...' (A minha, por exemplo, é ter que ler isso!) 'O Euninho já provocou secas e enchentes calamitosas. ' (Levei uns minutos para identificar o El Ninãoo...) 'O problema ainda é maior se tratando da camada Diozanio!' (Eu não sabia que a camada tinha esse nome bonito) 'A situação tende a piorar: o madereiros da Amazônia destroem a Mata Atlântica da região.' (E além de tudo, viajam pra caramba, hein?) Não preserve apenas o meio ambiente e sim todo ele.' (Faz sentido) 'O grande problema do Rio Amazonas é a pesca dos peixes' (Achei que fosse a pesca dos pássaros.) 'É um problema de muita gravidez.' (Com certeza...se seu pai usasse camisinha, não leríamos isso!) 'A AIDS é transmitida pelo mosquito AIDES EGIPSIO.' (Sem comentário) 'Já está muito de difíciu de achar os pandas na Amazônia' (Que pena. Também ursos e elefantes sumiram de lá) 'A natureza brasileira tem 500 anos e já esta quase se acabando' (Foi trazida nas caravelas, certo ?) 'O cerumano no mesmo tempo que constrói, também destroi, pois nos temos que nos unir para realizarmos parcerias juntos.' (Não conte comigo) 'Na verdade, nem todo desmatamento é tão ruim. Por exemplo, o do Aeds Egipte seria um bom beneficácio para o Brasil' (Vamos trocar as fumaças pelas moto-serras) ... menos desmatamentos, mais florestas arborizadas. ' (Concordo! De florestas não arborizadas, basta o Saara!) 'Isso tudo é devido ao raios ultra-violentos que recebemos todo dia.' (Meu Deus... Haja pára-raio!) 'Tudo isso colaborou com a estinção do micro-leão dourado.' (Quem teria sido o fabricante? Compaq ? Apple? IBM?) 'Imaginem a bandeira do Brasil. O azul representa o céu , o verde representa as matas, e o amarelo o ouro. O ouro já foi roubado e as matas estão quase se indo. No dia em que roubarem nosso céu, ficaremos sem bandeira..' (Caraca! Ainda bem que temos aquela faixinha onde está escrito 'Ordem e Progresso'..) '.. são formados pelas bacias esferográficas. ' (Imaginem as bacias da BIC.) 'Eu concordo em gênero e número igual.' (Eu discordo!) 'Precisa-se começar uma reciclagem mental dos humanos, fazer uma verdadeira lavagem celebral em relação ao desmatamento, poluição e depredação de si próprio.' (Putz, que droga é essa?) 'O serigueiro tira borracha das árvores, mas não nunca derrubam as seringas. (Esse deve ter tomado uma na veia) 'Vamos deixar de sermos egoistas e pensarmos um pouco mais em nos mesmos.' (Que maravilha!)
×
×
  • Criar Novo...