Ir para conteúdo
Fórum Script Brasil

Pinguimbera

Membros
  • Total de itens

    18
  • Registro em

  • Última visita

Tudo que Pinguimbera postou

  1. No caso então, você deveria usar ao invés de INTEGER, usar STRING, ficaria assim: Public nome1 As string Private Sub nome() nome1 = txt.Text If nome1 = "marcelo" Then InputBox ("OK") End If End Sub Private Sub Form_Load() txt.Text = "" End Sub * ( ali nakele inputbox sse for só uma mensagem de ok, você pode utilizar o msgbox, ficando assim: msgbox "Ok" ) Abraços
  2. Este Quote é de outro fórum e soluciona sua questão:
  3. alguém pode dar uma solução? :( o tópico tava quase na 2º página xD
  4. Desculpe-me, um instante: [ AISUGHAsuiouaISOhAUOIhauaSIOUHOiauhusioa] ok desculpe-me novamente. *Você está na área errada jovem amigo. Bom, Browser é reconhecido como navegador, no windows 98, é chamado de Internet Explore ( onde você navega. ) Bom o erro você não explicou direito, mas talvez seja somente localizar a foto que você deseja inserir no seu Blog. Deve haver um botão 'Procurar' e deve abrir uma caixa para você localizar a imagem. abraços
  5. Pinguimbera

    Jogo da Forca

    não consegui separar letra por letra aqui, mas ' i ' precisa ser byte? manda um Dim i as integer e depois seta ele i=0
  6. eu tentei essa conexão mas ele da erro também: CON.Open "Provider=MS Remote;Remote Provider=Microsoft.Jet.OLEDB.4.0;Data Source=banco01.mdb;Remote Server=http://127.0.0.1:8090\" e o select da pau: rs.Open "Select * from login where usuario='" & campotxtusuario.Text & "' and senha='" & campotxtsenha.Text & "'", CON, adOpenKeyset, adLockOptimistic no caso dá conexão primeira la em cima, o remote server seria o q?? e o data source ia pegar da onde?
  7. Sinceramente dei uma travadinha ao ler, não entendi tão bem.. Mas vamos lá garoto! Quando você está chamando os dados do campo 'memo' para os campos de texto do VB, ele irá tentar chamar também os dados que forem NULL (sem dados). Você pode fazer um "IF" antes de chamar o rs!observacao ex: If !observacao = "" Then Else txtObs.Text = !observacao End If Mais sinceramente, eu não entendi sua pergunta... Ai em cima, só dei uma rapidinha que talvez lhe dê uma idéia de como arrumar seu erro. Caso contrário da uma explicada melhor.. * Mas tipo, não da bug não.. Ele tem que ler sempre, nulo ou não. Seu Select está certinho? Faz uns testes separados só com este campo memo em outro projeto do vb.. Abração
  8. Boa noite (ótima madrugada para quem está ligado neste momento)! Estou à tempos procurando intensamente na internet, sobre esta minha dúvida! Estou fazendo um exemplo em minha casa de um programa qualquer, porém só quem tem usuario e senha pode fazer o "form2.show" aparecer.. Tenho um banco de dados no Access, com a tabela [ login ], que tem os campos: usuario e senha. No VB, existem 2 forms. O primeiro é o login. E e se o campo de login e senha estiver correto, ele irá entrar no form2. ( Isto foi com ajuda do Graymalkin, que fez o select para mim a muito tempo atrás através de um ado ). Até ai tudo bem. Passando alguns dias deixado de lado estes arquivos, estou tentando passar um nível acima. Minha dúvida: Eu agora quero enviar o executável para meu amigo. Mas somente o executável. E da casa dele, ele terá que conectar ao Banco de Dados da minha casa. Já tentei por milhões de diversas formas, mas nenhuma funciona e da erro de conexão com o bando de dados. Ex: Meu amigo, está com executável e quando ele entrar no programa dele irá fazer uma conexão um banco de dados do IP (exemplo): 200.159.120.120. ( irá abrir a conexão com o BD da minha casa ) Após isto, ele irá digitar o login: Rafael e a senha: 123 e clicar CONECTAR. Após isto, quero que somente confira com um select ( " tabela login, quando usuario = campousuario.txt e senha = camposenha.txt , msgbox "bem vindo rafael", form2.show" ) somente isto. Sei que embolo tudo, mas tento exemplificar de diversas maneiras. Abraços e conte comigo sempre!!
  9. Pois não, ao seu dispor. Qualquer coisa poste novamente que logo quando chegar do trabalho analizo! Abraços
  10. Bom estou sem o VB aqui neste computador, mas tente alguma coisa sobre ROW e Columms (linha e coluna).. talvez você possa um select no dado que você deseja e jogar os dados do select no textbox..
  11. Também estava com um problema parecido com este ontem (10/03/2008), pois meu MSFlexgrid não estava dando refresh e ele estava ligado à um ADO. Quando eu colocava o código de RECORDSET no MSFLEXGRID ele não dava mais completar (quando aperta . ), parece que seu recordset não apresenta mais opção. Aproveitando a pergunta do caro amigo dono do tópico, como eu faço para atualizar os dados de u msflexgrid que está ligado à um adodc. Ex: Adodc está ligado à uma tabela no access, com "select * from tabelas...." E o MSflexgrid está com Datasource do adodc1 e mostrando todas as colunas. Ele mostra, porém quando eu cadastro algum outro dado nos campos acima dele, ele não atualiza, quais códigos devo utilizar? Abraços!
  12. Bom, fiquei a noite toda tentando fazer algumas coisas, depois de uma googada e uns search em foruns mas nada deu... Dúvida: Tenho um arquivo chamado EXEMPLO.TXT Nele contém: Sistema eusouatoa 1000 Digite seu nome erro eu preciso que quando eu disser para o VB ler a linha 3, uma variavel X irá receber "DIGITE SEU NOME". exemplo: form_load: form1.caption = 1º linha do exemplo.txt 2º dúvida.. mesma coisa da de cima porém... tem como no EXEMPLO TXT eu identificar melhor tipo assim? CapdoForm = "Sistema eusouatoa" InterTimer = 1000 Dnome = "Digite seu nome" ai no vb eu declaro umas variáveis que vão receber esses do exemplo.txt ex: Dim nomedoform as string nomedoform = EXEMPLO.TXT>> CapdoForm form1.caption = nomedoform * eu me compliquei bastante, acho que estou meio desordenado após muitas tentativas. Abraços
  13. Ótimo, queria mesmo saber isto! Ainda não testei mas já gravei o código! Abraços
  14. tentei e deu isso: Nenhum valor foi fornecido para um ou mais parâmetros necessários. e também quero que ele mostre só o dado do ADRIANO, e não todos os dados hein... tipo uma logica assim para recordsource: select "tal" da tabela geral onde coluna nome for = usuario ai mostrara todas as informações de 'usuario' (ADRIANO)
  15. Essa dúvida é pros feras: Criei uma tela de login. beleza ele olha o login se o login estiver certo ele pega o nome que você digitou na caixa de login e envia para a string usuario e depois chama o form2. (form2.show) bom, no form2 tem 1 datagrid.. mas eu quero que nesse datagrid apareça somente as informações da pessoa do login. eu criei um ADODC, para o nome do banco de dados etc... olha o banco de dados: acc.mdb (no acess) no acc.mdb tem as seguintes tabelas: Login geral Na tabela login, contem usuario e senha ( nem precisa preocupar, isso eu já fiz) agora na geral tem as seguintes colunas: Nome - sexo - cidade - telefone RESUMO RAPIDO: 1º Form, digitei o login: ADRIANO - Vai conferir se tem adriano na tabela LOGIN e vai falar que tem e vai aceitar e login.text = usuario ( irei mandar o usuario que está escrito no login.text, no caso usuario é uma string >>GLOBAL<< dentro de um module e vai receber o nome ADRIANO) e depois irá abrir o FORM2. No form2, já sabendo que posso utilizar a string usuario para qualquer form, porque ela é global, sei que usuario vale ADRIANO. Agora como eu faço para um DATAGRID aparecer somente as informaçoes do Adriano e não de todos nomes cadastrados? Preciso por oque no RecordSource do ADODC? HELP Exemplo da tabela geral com as colunas nome, sexo, idade, telefone. Nome - sexo - cidade - telefone ADRIANO - Masculino - Campinas - 65656565 ROSANA - Feminino - SUIÇAI - 56532332 ALBERTO - MASCULINO- LIMA - 6888686 quero que apartir da string usuario = adriano, no datagrid apareça as informações dele. FIZ CONFUSAO MAS DESCULPE-ME
  16. Gostaria de saber como faço para pegar os itens de uma Dirlistbox e inserir em uma ComboBox? Explicando melhor...: Tenho uma ComboBox. Ela irá receber em sua lista, o nome de todas as pastas que está aparecendo na Dirlistbox. A Dirlistbox já está direcionada à uma certa pasta (Dir1.path = "c:\teste"). Como fazer isto? Abraços
  17. normalmente as páginas que conseguimos fazer isto elas são em php. via visual basic, devemos ter conhecimento das TAGS que iremos utilizar nos comandos para que se imprima as informações. Exemplo. No site google.com.br, iremos utilizar exemplo como se ele fosse feito em php e o campo de pesquisa iria se chamar textbox: $inftext = textbox.text bom já sabemos que no google.com.br temos uma string que se chama $inftext que irá receber o valor que o usuário digitar no campo de pesquisa, ex: você digita no campo de pesquisa: Script logo no php irá: $inftext = textbox.text $inftext = "Script" Ai você já tem nas mãos para fazer no visual basic, exemplo de uma label1: no form load: label1.caption = textphp agora você precisa registrar uma string que fosse exemplo: Dim conect as String conect = (geturl = http://www.google.com.br/index.php#$inftext) Dim textphp as string textphp = conect agora o valor escrito no LABEL seria: SCRIPT, no caso acima que você digitou no campo de pesquisa. *sou apenas um amador iniciante, não sei se está certo, concerteza contém bastante erro. mas tento ajudar :P abraços
  18. Bom dia.. ! Queria saber se em um MODULE criado além de conseguir poder registrar as strings etc eu consigo também fazer com as strings recebam dados. Ex: Module1 dim nome as String nome = "Pinguim" * eu não consegui que ele recebesse o valor de nome no modulo, somente no FORM. Eu posso fazer este tipo de operação acima somente em module1? ou eu preciso identificar ele (dim nome..) e somente em FORMS que eu coloco ele para receber um valor? 2º Duvida: como eu faço para que um valor de uma string seja global, QUE O VALOR DESSA STRING (SEU DADO) SEJA O MESMO PARA TODO E QUALQUER FORMS. ex: se eu der o valor: nome = "Pinguim" ele seja valido para qualquer form que eu usar pedindo text1.text = nome, pois no meu VB aki se eu ponho um valor para tal string no form1 já no form2 o valor não existe. obrigado, ta meio confuso essas 2 duvidas :P hehehe
×
×
  • Criar Novo...