Ir para conteúdo
Fórum Script Brasil
  • 0

Como duplicar Registros?


Lucas Lima

Pergunta

Posts Recomendados

  • 0

Você pode por FOR NEXT indica uma variavel com o valor = 1 e até a quantidade que quiser inserir no BD então até que a variavel alcance o valor o codigo de inserir os dados no BD se repetirá, exemplo:

'inseri duas vezes o registro

Dim x As Integer

For x = 1 To 2

codigo para inserir

Next x

'inseri dez vezes o registro

Dim x As Integer

For x = 1 To 10

codigo para inserir

Next x

Link para o comentário
Compartilhar em outros sites

  • 0
Você pode por FOR NEXT indica uma variavel com o valor = 1 e até a quantidade que quiser inserir no BD então até que a variavel alcance o valor o codigo de inserir os dados no BD se repetirá, exemplo:

'inseri duas vezes o registro

Dim x As Integer

For x = 1 To 2

codigo para inserir

Next x

'inseri dez vezes o registro

Dim x As Integer

For x = 1 To 10

codigo para inserir

Next x

Kara brigadão mesmo..

mas nem funcionou oO

eu salvo com o

MeuBanco.Recordset.Update

Link para o comentário
Compartilhar em outros sites

  • 0

Não funcionou ??

Qual erro ele dá ?

Posta aí como está seu código !

Você fez com:

for i=1 to 2
'O código para inserir o registro ficará aqui
next

Obs.:

Verifique se a variável i já está sendo utilizada dentro do código para inserir o registro !

Se você a modificar poderão ocorrer erros !

Link para o comentário
Compartilhar em outros sites

  • 0

é 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?

Link para o comentário
Compartilhar em outros sites

  • 0
Ah, sim, cara !

você pode salvar os três registro que irão continuar iguais em uma variável e na hora de inserir o próximo registro chamar essa variável

Os outros dois valores você insere diretamente no registro !

Entendeu ?

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

Link para o comentário
Compartilhar em outros sites

  • 0

Ficaria mais ou menos como:

dim valor1, valor2, valor3 as string

valor1=inputbox("Digite o valor para o campo1: ")
valor2=inputbox("Digite o valor para o campo2: ")
valor3=inputbox("Digite o valor para o campo3: ")
valor4="teste"
valor5="valor 5"
Onde você pode escrever a variável valor de qualquer jeito, pode ser um campo text, select o que for ! Depois você pode atualizar o recordset da seguinte maneira:
for i=1 to 2
MeuRecordset.AddNew
MeuRecordset("Valor1") = valor1
MeuRecordset("Valor2") = valor2
MeuRecordset("Valor3") = valor3
MeuRecordset("Valor4") = valor4
MeuRecordset("Valor5") = valor5
valor4 = "Este valor aparecerá somente no segundo registro"
valor5 = "Este também !!"
MeuRecordset.Update
next

Perceba que na primeira execução o campo valor1 do recordset ficará como "teste" e o campo "valor5" será "valor 5"

Já na segunda execução o valor dos campos "valor4" e "valor5" serão modificados !

Link para o comentário
Compartilhar em outros sites

  • 0

vai ver q eu não to entendendo direito então.

ó, qual desses dois você quer:

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.

2 - o cara digita todos os dados de um registro. ai ele clica em gravar. dessa vez é salvo um registro com os dados q ele escreveu e logo em seguida, alguns dos dados q ele preencheu são alterados (é você quem altera no codigo e não o usuario) enquanto q otros continuam os mesmos e um segundo registro é gravado sendo Q ELE SO CLICOU EM GRAVAR UMA VEZ.

opcao 1 ou 2??

ou não é nd disso??

Link para o comentário
Compartilhar em outros sites

  • 0

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!

Link para o comentário
Compartilhar em outros sites

  • 0

Ah tá !

Imaginei que fosse a segunda opção^^

Nesse caso você pode desabilitar os textbox que você não quer que sejam modificados e pedir que ele escolha o valor para os outros textbox

Aí quando for inserir os dados você habilita todos os textbox e insere os registros da mesma forma que a primeira vez !

Link para o comentário
Compartilhar em outros sites

  • 0

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

Link para o comentário
Compartilhar em outros sites

  • 0

se são 3 campos, crie 3 variaveis la em cima no general.

antes do update, coloque os valores dos textbox em cada uma dessas variaveis.

depois do addnew de limpar os textboxs, coloque os valores q estavam nas variaveis de volta nos textboxes.

e pronto.

so q ai você tem q ver. não sei o q acontece depois q ele gravar o segundo. os dados dos 3 campos continuam fixos pro tercero??

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...