Novamente venho recorrer ao conhecimento de vocês...
Tenho a seguinte situação:
O usuário entrou no sistema informando corretamente seus dados de acesso e senha.
Dentro do sistema estou disponibilizando a opção de alteração dos dados cadastrais e da senha.
SQLUSer1 = "SELECT * FROM user WHERE condcod='"&SESSION("parte1")&"' AND prediocod='"&SESSION("parte2")&"' AND unidadecod='"&SESSION("parte3")&"'"
SET RSUser1 = Server.CreateObject("ADODB.Recordset")
SET RSUser1 = Conexao.EXECUTE(SQLUSer1)
IF RSUser1.EOF THEN
Response.Write "<script>alert('O Usuário não cadastrado. Certifique-se de ter informado corretamente os códigos.');javascript:history.back(-1);</script>"
ELSE
SQLUSer2 = "UPDATE user SET tppessoa='"&request.form("tipofj")&"', usercpf='"&request.form("docusu")&"', usercnpj='"&request.form("docusu")&"', usernome='"&request.form("nomeusu")&"', useremail='"&request.form("emailusu")&"', userpass='"&request.form("senhausu")&"' WHERE condcod='"&SESSION("condcod_adm")&"' AND prediocod='"&SESSION("prediocod_adm")&"' AND unidadecod='"&SESSION("unidadecod_adm")&"'"
Set RSUser2 = Server.CreateObject("ADODB.Recordset")
Set RSUser2 = Conexao.EXECUTE(SQLUSer2)
Response.Write "<script>alert('Alteração concluída com sucesso.');javascript:history.back(-1);</script>"
END IF
RSUser1.Close
Set RSUser1 = Nothing
Não dá mensagem de erro, mostra o alert 'Alteração concluída com sucesso' mas simplesmente não atualiza o banco!!!
Pergunta
renatacm
Bom dia, pessoal!!!
Novamente venho recorrer ao conhecimento de vocês...
Tenho a seguinte situação:
O usuário entrou no sistema informando corretamente seus dados de acesso e senha.
Dentro do sistema estou disponibilizando a opção de alteração dos dados cadastrais e da senha.
SQLUSer1 = "SELECT * FROM user WHERE condcod='"&SESSION("parte1")&"' AND prediocod='"&SESSION("parte2")&"' AND unidadecod='"&SESSION("parte3")&"'" SET RSUser1 = Server.CreateObject("ADODB.Recordset") SET RSUser1 = Conexao.EXECUTE(SQLUSer1) IF RSUser1.EOF THEN Response.Write "<script>alert('O Usuário não cadastrado. Certifique-se de ter informado corretamente os códigos.');javascript:history.back(-1);</script>" ELSE SQLUSer2 = "UPDATE user SET tppessoa='"&request.form("tipofj")&"', usercpf='"&request.form("docusu")&"', usercnpj='"&request.form("docusu")&"', usernome='"&request.form("nomeusu")&"', useremail='"&request.form("emailusu")&"', userpass='"&request.form("senhausu")&"' WHERE condcod='"&SESSION("condcod_adm")&"' AND prediocod='"&SESSION("prediocod_adm")&"' AND unidadecod='"&SESSION("unidadecod_adm")&"'" Set RSUser2 = Server.CreateObject("ADODB.Recordset") Set RSUser2 = Conexao.EXECUTE(SQLUSer2) Response.Write "<script>alert('Alteração concluída com sucesso.');javascript:history.back(-1);</script>" END IF RSUser1.Close Set RSUser1 = NothingNão dá mensagem de erro, mostra o alert 'Alteração concluída com sucesso' mas simplesmente não atualiza o banco!!!
O que pode ser?
Bjocas...
;oÞ
Link para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados