Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

tiopirata

[Resolvido] condicoes para acoes no banco

Recommended Posts

Pessoal, preciso de uma ajuda de vcs...

o meu codigo abaixo nao esta funcionando como deveria, ele realiza as acoes no banco independente de qq coisa...e nao era pra ser assim

eu queria que ele pegasse o campo digitado, comparasse com o cadastrado no banco,

se fosse diferente, realizasse o insert abaixo, senão, deixa quieto...

mas do jeito que esta ai não esta funcionando...

se alguem puder dar uma luz :)

valeuu

 

 

 

ASP
'----Busca registro cadastrado do campo data da proxima atuacao, se for alterado é registrado

sqlbb = "SELECT data FROM tabela Where campo= '" & campo & "' AND dta='" & modificaData(dta) & "' "

set rs88 = db.execute(sqlbb)

Response.Write sqlbb

'----------------------------------------------------------------------

 

if rs88.EOF = false then

if (txtdtProxima <> rs88("campodt").value) then

Response.Write txtdtProxima

'----Insere Acao na tb de Auditoria

sqlxx="INSERT INTO tabela (campo, campo, ccampo, campoe,campo, campo,campo,campo) VALUES " &_

"('" & campo& "','" & campo& "','" & campo& "','" & campo& "','" & campo& "',GetDate(),'bla','" & campo& "')"

set rs = db.Execute (sqlxx)

Response.Write sqlxx

 

end if

end if

 

'----Busca registro cadastrado do campo data de previsao, se for alterado é registrado

sqlyy = "SELECT dataFROM tabela Where campo= '" & campo& "' AND dta='" & dta& "' "

set rs99 = db.execute(sqlyy)

Response.Write sqlyy

'----------------------------------------------------------------------

 

if rs99.EOF = false then

if (txtdtatendimento <> rs("campodt").Value) then

Response.Write txtdtatendimento

 

'----Insere Acao na tb de Auditoria

sql1="INSERT INTO tabela(campo, campo, campo,campo,campo, campo,Acao,campo) VALUES " &_

"('" & campo& "','" & campo& "','" & campo& "','" & campo& "','" & campo& "',GetDate(),'bla2','" & campo& "')"

set rs = db.Execute (sql1)

Response.Write sql1

 

end if

end if

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta aqui:

ASP
if rs88.EOF then

'----Insere Acao na tb de Auditoria

sqlxx="INSERT INTO tabela (campo, campo, ccampo, campoe,campo, campo,campo,campo) VALUES " &_

"('" & campo& "','" & campo& "','" & campo& "','" & campo& "','" & campo& "',GetDate(),'bla','" & campo& "')"

db.Execute (sqlxx)

Response.Write "cadastrado com sucesso"

Else

Response.Write "Não cadastrado"

end if

 

essa é a lógica

Compartilhar este post


Link para o post
Compartilhar em outros sites

na verdade deveria ver quando o EOF é verdadeiro ou seja quando nao ha registros para inserir o outro

Compartilhar este post


Link para o post
Compartilhar em outros sites

na verdade deveria ver quando o EOF é verdadeiro ou seja quando nao ha registros para inserir o outro

 

Valeu cara!!

com essa dica agora consegui!!!

valeu mesmo!!!

falowww

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.