Lucas Lima

Tenho meu relatorio, filtro ele atraves do parametro que criei, porem, se eu adicionar um noo registro em meu banco de dados ele simplesmente não atualiza os valores que coloquei naquele campo "Default Values" como faço para que ele atualize dinamicamente? outro ponto, é quanto a organização desses valores como faço para deixalos em ordem numerica, mesmo se não houver alguns numeros? Exemplo: "1, 2, 3, 5, 6, 7, 8, 9, 11..." ao invés de: "1, 10, 11, 111, 12, 124, 2, 21, 235, 3...." Desde já meu Muito Obrigado, parabens pelo desempenho em sua carreira grande Abraço Lucas Lima

Ola Pessoal Criei um formulario no Data Report Adicionei dois novos GroupHeader e tenho o seguinte erro: "Report Sections do not match data source" para programar, usei apenas as propiedade desde já meu muito obrigado abraços

Pessoal Tenho um DataGrid, e nele quero filtrar dados de 3 bancos de dados como faço isso? Abraços

Kara num ta dando não queria fazer essa soma no vb mesmo não no sql

Tenho um DataGrid em que realiso 3 consultas: A primeira pesquiso um Codigo da revista na primeira coluna(CodigoRevista) digito em um textbox, e ele encontra normalmente A segunda, pesquiso a Edição da revistas (pois são varios codigos iguais, porem com edições diferente) na segunda coluna (EdiçãoRevista) essa pesquisa é a partir do registro que esta selecionado da pesquisa anterior digito em um texbox, e ele encontra normalmente A Terçeira, pesquiso um codigo de banca (Pois são varias edições distribuidas em bancas diferentes), essa pesquisa é realizada apartir do registro que esta selecionado da pesquisa anterior digito em um text box, e acontece normalmente Porem, se eu digito um valor na em um dos textbox, e troco esse valor desconfigura todas as pesquisas anteriores o cursor não volta pra pesquisa anterior Isso tem Solução? Ai Vai Meu Codigo: 'Primeira Pesquisa Private Sub TxtCodigoRevistaEncalheRevistas_Change() BancoRevistasOperações.Recordset.MoveFirst BancoRevistasOperações.Recordset.Find "CodigoRevista LIKE '" & TxtCodigoRevistaEncalheRevistas & "'" If TxtCodigoRevistaEncalheRevistas.Text = "" Then BancoRevistasOperações.Recordset.MovePrevious If BancoRevistasOperações.Recordset.BOF Then BancoRevistasOperações.Recordset.MoveFirst If BancoRevistasOperações.Recordset.EOF Then Conexao.rsRevistasOperações.MoveLast If (DGRevistasOperações.SelBookmarks.Count <> 0) Then DGRevistasOperações.SelBookmarks.Remove 0 End If End If End If End If End Sub 'Segunda Pesquisa Private Sub TxtEdiçãoRevistaEncalheRevistas_Change() BancoRevistasOperações.Recordset.Find "EdiçãoRevista LIKE '" & TxtEdiçãoRevistaEncalheRevistas & "'" If TxtEdiçãoRevistaEncalheRevistas.Text = "" Then BancoRevistasOperações.Recordset.MovePrevious If BancoRevistasOperações.Recordset.BOF Then BancoRevistasOperações.Recordset.MoveFirst If BancoRevistasOperações.Recordset.EOF Then BancoRevistasOperações.Recordset.MoveLast If (DGRevistasOperações.SelBookmarks.Count <> 0) Then DGRevistasOperações.SelBookmarks.Remove 0 End If End If End If End If End Sub 'Terceira Pesquisa Private Sub TxtCodigoBancaEncalheRevistas_Change() BancoRevistasOperações.Recordset.Find "CodigoBanca LIKE '" & TxtCodigoBancaEncalheRevistas & "'" If TxtCodigoBancaEncalheRevistas.Text = "" Then BancoRevistasOperações.Recordset.MovePrevious If BancoRevistasOperações.Recordset.BOF Then BancoRevistasOperações.Recordset.MoveFirst If BancoRevistasOperações.Recordset.EOF Then BancoRevistasOperações.Recordset.MoveLast If (DGRevistasOperações.SelBookmarks.Count <> 0) Then DGRevistasOperações.SelBookmarks.Remove 0 End If End If End If End If End Sub Desde já Meu Muito Obrigado!

Como Faço para que o Registro não salve se houver algum campo em branco? sei que devo usar a condição IF.... Then porem teria que fazer uma para cada campo?? ou tem alguma forma de fazer tudo de uma vez? abraços

Kara Deu Certoooo!!! sim, eles continuam fixos pra quanto eu Quiser mas ainda tem um porem um desses campos é uma Data, ta dando erro sera que a variavel deve ser diferente? Desde já Mue Muito Obrigado a todos! Kuroi e Jhonatan Queiroz Pela Paciennnnncia abraços

Meu Codigo, bem especifico, e estou tentando ao maximo me expressar... 1º - (Salvei meu registro, com os 5 campos preenchidos!) BancoRevistasOperações.Recordset.Update 2º - (Logo apos esse Addnew, quero que os valores que coloquei nos 3 primeiros campos do registro anterior, continuem os mesmo, e só irei alterar os dois ultimos) BancoRevistasOperações.Recordset.AddNew 3º - (O foco ira direto para o 4º campo, pois os 3 primeiros já estaram preenchidos) 'TxtCodigoBancaRevistasOperações.SetFocus 4º - (Aqui, apenas os dois ultimo campos, estarão em branco, e habilitados para alterações) TxtCodigoBancaRevistasOperações.Text = "" TxtReparteRevistasOperações.Text = "" TxtCodigoBancaRevistasOperações.Locked = False TxtReparteRevistasOperações.Locked = False Vlw galera, sepuderem me ajudar ficarei extremamente agradecido

tem como dar um exemplo disso ai Macedo?!? abraços

Num é bem isso Jhonatan acontece que não quero apenas que ele tranque os campos e sim, que ele pegue as informações do registro anterior( para estes campos)

hsuahsuahsua Brigado pela paciencia kara! definitivamente Opção 1 1 - o cara digita todos os dados de um registro. ai ele clica em gravar. é salvo dessa vez SOMENTE UM registro. ai alguns campos desse primero registro vao ter o mesmo valor no segundo. e esses campos devem estar preenchidos nos textbox quando ele for salvar o proximo. mas alguns outros campos ele pode preencher. e ai quando ele clicar em gravar MAIS UMA VEZ ele grava o segundo registro. é exatamente o que preciso fazer! se puder me ajudar... Um abraço!

Kara, num to sacando nada!.. sou novato, inesperiente, da uma força

é so um exemplo, você q sabe com o q vai preencher as variaveis. imagino q você va pegar os valores do formulario não?? isso mesmo, como faço assim!?!?!?

não entendi =/ porque o Imput Box?

Entendi a Ideia! Mas como salvo eles numa variavel vou te passar meus campos os campos os quais quero manter são txtcodigorevistasoperações.text txtdatarevistasoperações.text txtediçãorevistasoperações.text meu banco: BancoRevistasOperações.Recordset

é o seguinte quando eu salvar quero que salve dois registros iguais e o segundo registro salvo fique na tela com apenas alguns campos habilitados e em branco para sofrerem alterações a minha ideia e necessidade, e salvar um proximo registro, com tres campos com valores iguais aos do registro anterior (na tela são 5 campos, apensa dois mudarei) sem ter que digitar esses campos novamente essa é minha Ideia! seria mais ou menos assim: 'Digitei meu cadastro todo 'Algum comando que não sei, para salvar esse cadastro duas vezes bancorevistasoperações.recordset.movelast txt1.text = "" txt2.text = "" txt1.locked = false txt2.locked = false essa é a rotina que desejo! COmo salvo eles numa variavel?

certo, porem o valor do campo deve ser igual do registro anterior como faço isso?

Como assim Amigo??? sou leigo =/ você poderia me dar um exemplo?

Simplesmente o For Next não executa Olha como coloquei Dim X as Integer For X = 1 to 2 MeuBanco.recordset.Update Next X foi isso ele faz o Update normalmente, porem uma vez só como se não existisse o For Next Vlw a Força! ABraços!

Kara brigadão mesmo.. mas nem funcionou oO eu salvo com o MeuBanco.Recordset.Update

Como Duplicar Registros? Tenho um formulario, e salvo as informações em um banco de dados SQL porem, ao clicar em gravar gostaria que gravasse o mesmo registro duas vezes Como faço isso? Abraços

Ola Pessoal Minha duvida é, Como faço para somar todos os valores de uma coluna do meu Datagrid e exibir o resultado dessa soma em um TextBox????? Lembrando que esse DataGrid exbe Valores de uma tabela em SQL Meus Dados: DataGrid = DGRevistasOperações Tabela Banco de Dados (SQL) = RevistasOperaões Coluna a Ser Somada (SQL) = Reparte TextBox = TxtQuantidadeDistribuidaRevistasOperações.Text Obrigado desde já! Abraços

Olá Pessoal Estou criando um sistema, com banco de dados em SQL já esta tudo funcionando direitinho, porem um dos bancos de dados tem os campos Codigo (sem a auto numeração), Data, Titulo, e Edição. Esses quatro campos, gostaria que não mudassem quando eu apertasse o Botão Novo, com a função "MeuBanco.recordset.AddNew que eles se mantivesse os mesmos valores como faço essa Rotina? desde já agradeço Abraços

Vlw Amigo!

Olá Pessoal Tenho um Sistema Ligado a Um Banco de Dados SQL 2000 E um dos campos é o Codigo, o qual gostaria que houvesse uma numeração automatica... COmo faço para estabelecer essa numeração automatica!? é na tabela do SQL, ou no TextBox no VB? Desde já meu Muito Obrigado Abraços