Ir para conteúdo
Fórum Script Brasil

Matheus Freitas

Membros
  • Total de itens

    12
  • Registro em

  • Última visita

Sobre Matheus Freitas

Matheus Freitas's Achievements

0

Reputação

  1. kkkk!! Os Banco de dados era se de teste mesmo e me esqueci de apagar. mas o certo e o Banco2.valeu e o deve não ter dado certo por causa da localização do Banco,kkk Bem so tenho mesmo a agradecer mesmo a vocês que me ajudaram a tirar esta duvidas, e tirar um "peso das costas" que era este trabalho. Obrigado e vlw pela Ajuda! :lol: :lol: :lol:
  2. Ta ai o trabalho http://www.4shared.com/file/VqeCqSr8/Concluso.html so tem mudar o caminho do banco de dados!! vlw Tirei a nota Máxima kkkkk vlw Abração
  3. Cara olha só. Hj e o dia de apresentar o meu TCC. Portanto deixei, e não fiz este esquema. vlw pela ajuda de vocês. Não te estressa, vo upa ele no 4 Shared e te passo o link OK. so pre ti ver a encrenca q fiz!!! não vale rir dos meus códigos OK ISto e tudo que meus curso de Técnico me forneceu de conhecimento. Aprendi mais aqui, lendo apostilas e coversando com vocês do q lá!!! :wacko: Mas eu vou fazer uma FACULDADE agora e vou entrar mais a fundo na Programação... Depois posto o link Abraço vlwwww" Abraço e Sucesso pra vocês :rolleyes:
  4. Bem olha só? Fiz uma tabela de Vendas; (frmVendas) Coloquei la CodVenda Cliente Produtos DataCompra Valor Compra Parcela Valor Parcela OK Fiz 2 outro Form de Pesquisa ( Clientes e Produtos) e neles coloquei um DATAGRID, UM COMMAND BUTTON e um ADODC e fiz uma especie de pesquisa. Clientes (frmPesquisa1) Direcionei o ADODC para o banco e coloquei a seguinte SQL select Nome,Endereço,Bairro,Telefone,Limite, Rg from Clientes no DATAGRID coloquei o seguinte Private Sub DataGrid1_Click() frmVendas.txtCliente = DataGrid1 End Sub e no Botão coloquei Private Sub cmdOk_Click() Unload Me End Sub na tabela Produtos(frmPesquisa2) coloquei as mesmas coisa so trocando o SQL e o nomes dos texts. Private Sub cmdOk_Click() Unload Me End Sub Private Sub DataGrid1_Click() frmVendas.txtProduto = DataGrid1 End Sub Entaun na tabela Vendas (frmVendas) la do inicio do lado de Clientes eu coloquei um Botao que chama a pesquisa de Clientes no caso a Pesquisa1 (frmPesquisa1), la se seleciono o nome do Cliente aperto o botao OK. e o campo CLIENTE aparece preenchido com o nome da pessoa. no lado de Produtos coloquei outro botão que chama a outra pesquisa (frmPesquisa2), faço o mesmo esquema e da anterior. Porem como as pessoas podem comprar mais de 1 produto por vez queria ir armazenando estes produtos em um DATAGRID no proprio formulario para depois salvar no banco. todos juntos entende. Senao eu teria q fazer uma venda por vez com cada produto separado. Teria como fazer isto agrupar varios produtos em um so banco. E complicado derrepente nem vo fazer isto. mas se der vou fica mais com cara de sistema de vendas. kkkkkkkk vlw abraços a vocês
  5. A pesquisa dos clientes eu consegui fazer, agora so falta a mais complicada que e a dos Produtos
  6. Ok, consegui fazer vlw mesmo cara, o Grafico ficou legal. so pra as duas ultimas duvida ultima duvida mesmo. To querendo fazer uma coisa na tabelas vendas. Em cliente: queria fazer uma pesquisa na tabela Cliente para selecionar o nome! e em Produtos queria fazer a pesquisa do produto e quando seleciona se um produto aparecesse no DataGrid, no caso teria como selecionar mais de um produto, onde armasenaria eles no banco? Se tem como,como poderia fazer isso se não for complicado demais se não entender o que quero fazer posta ai! Agora é serio e a ultima vez q encomodo vlw abraços
  7. Eu quero fazer o gráficos de produtos com os seguintes campos codProduto Produto Marca Peso Fornecedor Preço e queria q fosse ordenado por Fornecedor sera q sabe, não tenho ideia de nenhum código
  8. o video do Danleonhart que ficou muito bom, parabens sugere praticamente a mesma coisa que o seu. Deste jeito eu não consegui fazer no entanto aproveitei algumas ideias de vocês. A minha solução foi criar um evento Timer .dando um Refresh apos 2 segundos eu ter ADD um novo Record. AGORA SO FALTA A ULTIMA PARTE QUE COM CERTEZA E BEM CHATO MAS ACHO QUE PODEM ME AJUDAR já Q PERCEBI QUE vocês ENTENDEM BASTANTE DE SQL. Mas so que este não consegui fazer nada, que são os gráficos, a única coisa que fiz foi colocar o DataSource e o Data Member no MSCHART mas não e o resultado esperando. Alguma ideia, esta e a ultima vez que incomodo vocês :blush:
  9. Bem desculpe minha ignorância mas como ficaria este código já que não tenho nenhuma noção de como fazer? e se possivel pode me explicar mais ou menos como monta os gráficos no VB com o banco de dados do ACCESS Estou baixando seu video, pois somos dois entaun, aprendendo por apostilas, videos e as que não consigo fazer, peço ajuda de vocês. :lol: Mais futuramente pretendo me formar na area de programação. acho muito legal e e uma area q estao presisando, mas como estou começando.... sempre ocorre algum probleminha. valeu a vocês q estão me ajudando!! Abraço
  10. este erro foi meu Agora a minha duvida e bem facil de responder. Coloquei um data grid no projeto so que ele não atualiza, vocês sabem o porque uso o DataGrid1.Refresh e também o Adodc1.Refresh mas não atualiza, somente depois que fecho e abro novamente mas não funciona
  11. Bom dia O index realmente estava preenchido mas o erro continua. Private Sub cmdGravar_Click() esse ficou assim agora ok? mas ainda continua dando o erro do mesmo jeito fica amarelo aquele ali em cima e o que esta logo abaixo fica cinza o.TEXT. If txtNome.Text = "" Then --->___FICA_CINZA_O_.TEXT___ Como disse ainda continua dando erro em todos os lugares onde tem q ir .TEXT e .ENABLEB Não sei se ajuda mas quando boto o ponto depois do txtNome so aparece para botar o .COUNT .ITEM .LBOUND e .UBOUND :unsure: Os nome dos texts eu já confiri pensei que fosse alguma coisa do tipo, mas acho que não e pois já revisei todos. valeu pela dica abraço :rolleyes:
  12. Boa Tarde, sou um iniciante na programação fiz o Técnico em Informática, estou fazendo meu trabalho de conclusão, mas parei pois esta dando um erro q vou mostrar abaixo, que não consigo saber o porque do erro! :wacko: Private Sub cmdGravar_Click(Index As Integer) ---> ____FICA AMARELO AQUI____ If txtNome.Text = "" Then MsgBox "Campo Obrigatório!", vbInformation, "Erro" txtNome.SetFocus Exit Sub End If If txtNome.Text <> "" Then ---> _____O .TEXT FICA CINZA_____ tbCliente.AddNew tbCliente("codCliente") = txtCliente.Text tbCliente("Nome") = txtNome.Text tbCliente("Endereço") = txtEndereço.Text tbCliente("Bairro") = txtBairro.Text tbCliente("Telefone") = txtTelefone.Text tbCliente("Rg") = txtRg.Text tbCliente("Limite") = txtLimite.Text tbCliente.Update End If cmdGravar.Enabled = False cmdNovo.Enabled = True cmdDeletar.Enabled = True cmdFechar.Enabled = True conConexao.Refresh End Sub E não adianta apagar o text porque dai da erro no .Enabled la em baixo o ERRO q da e o seguinte Compile error: method or data member not found este comando e no botao gravar mas o erro da em todos os command butons: GRAVAR, DELETAR, NOVO. Alguma ideia do que seje, s quiserem posto os outros códigos também. Desculpe se fiz alguma coisa errada no tópico, sou novo por aki. Desde já agradeço
×
×
  • Criar Novo...