Ir para conteúdo

POWERED BY:

Arquivado

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

gpassarelli

Error:'80004005'

Recommended Posts

entra em contato com eles ou ve se tem um painel tipo Plesk de administracao e veja as permissoes

Compartilhar este post


Link para o post
Compartilhar em outros sites

entra em contato com eles ou ve se tem um painel tipo Plesk de administracao e veja as permissoes

 

Cara coloquei a opcao de controle geral para todos as possibilidades, e ainda assim continua dando o erro...:S

Compartilhar este post


Link para o post
Compartilhar em outros sites

todas as permissoes estaun corretas....

testando no localhost, funciona...

Compartilhar este post


Link para o post
Compartilhar em outros sites

apenas para teste, tente executar um SELECT normal depois um simples update

Compartilhar este post


Link para o post
Compartilhar em outros sites

option explicit

'declaro as var

dim conexao, conDBQ, constring, rs, SQL, varcodigo, varlogin, varsenha, varemail

'recupero as var

varcodigo=trim(request.form("codigo"))

varlogin=trim(request.form("login"))

varsenha=trim(request.form("senha"))

varemail=trim(request.form("email"))

' retiro qqer erro de digitaçao do user ,no caso ( aspas simples ')

varlogin=replace (varlogin,"'","")

varsenha=replace (varsenha,"'","")

varemail=replace(varemail,"'","")

'crio a conexao%>

<!--#include file="conn/conexao1.asp"-->

<% 'abro a conexao

call abreconexao

'crio o rs

set rs=Server.createobject("ADODB.Recordset")

'crio a SQL

SQL="UPDATE login SET login='"&varlogin&"',senha='"&varsenha&"',email='"&varemail&"' WHERE codigo="&varcodigo&""

rs.open SQL,conexao,1,3

if session("login") = "admin" then

response.redirect("administracao_treina.asp?msg=2")

else

response.redirect("administracao1.asp?msg=2")

end if

'fecho o rs

set rs=nothing

'fecho a conexao

call fechaconexao%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

option explicit
	'declaro as var
	dim conexao, conDBQ, constring, rs, SQL, varcodigo, varlogin, varsenha, varemail
	'recupero as var
	varcodigo=trim(request.form("codigo"))
	varlogin=trim(request.form("login"))
	varsenha=trim(request.form("senha"))
	varemail=trim(request.form("email"))
	' retiro qqer erro de digitaçao do user ,no caso ( aspas simples ')
	varlogin=replace (varlogin,"'","")
	varsenha=replace  (varsenha,"'","")
	varemail=replace(varemail,"'","")
	'crio a conexao%>
	<!--#include file="conn/conexao1.asp"-->
	<% 'abro a conexao
	call abreconexao
	'crio o rs
	set rs=Server.createobject("ADODB.Recordset")
	'crio a SQL
	SQL="UPDATE login SET login='"&varlogin&"',senha='"&varsenha&"',email='"&varemail&"' WHERE codigo="&varcodigo&""
	rs.open SQL,conexao,1,3
		if session("login") = "admin" then
			response.redirect("administracao_treina.asp?msg=2")
		else
			response.redirect("administracao1.asp?msg=2")
		end if
	'fecho o rs
	set rs=nothing
	'fecho a conexao
	call fechaconexao%>
Cara ja estou usando o codigo assim, como você mesmo postou anteriormente...

if request("action")="update" then
dim conteudo,rs, SQL
col = request("col") 
conteudo=trim(request.form("conteudo"))

conteudo=Replace(conteudo,"'","'")
conteudo=Replace(conteudo,"Á","Á")
conteudo=Replace(conteudo,"Â","Â")
conteudo=Replace(conteudo,"Ã","Ã")
conteudo=Replace(conteudo,"Ä","Ä")
conteudo=Replace(conteudo,"Å","Å")
conteudo=Replace(conteudo,"Æ","Æ")
conteudo=Replace(conteudo,"Ç","Ç")
conteudo=Replace(conteudo,"È","È")
conteudo=Replace(conteudo,"É","É")
conteudo=Replace(conteudo,"Ê","Ê")
conteudo=Replace(conteudo,"Ë","Ë")
conteudo=Replace(conteudo,"Ì","Ì")
conteudo=Replace(conteudo,"Í","Í")
conteudo=Replace(conteudo,"Î","Î")
conteudo=Replace(conteudo,"Ï","Ï")
conteudo=Replace(conteudo,"Ð","Ð")
conteudo=Replace(conteudo,"Ñ","Ñ")
conteudo=Replace(conteudo,"Ò","Ò")
conteudo=Replace(conteudo,"Ó","Ó")
conteudo=Replace(conteudo,"Ô","Ô")
conteudo=Replace(conteudo,"Õ","Õ")
conteudo=Replace(conteudo,"Ö","Ö")
conteudo=Replace(conteudo,"Ø","Ø")
conteudo=Replace(conteudo,"Ù","Ù")
conteudo=Replace(conteudo,"Ú","Ú")
conteudo=Replace(conteudo,"Û","Û")
conteudo=Replace(conteudo,"Ü","Ü")
conteudo=Replace(conteudo,"Ý","Ý")
conteudo=Replace(conteudo,"Þ","Þ")
conteudo=Replace(conteudo,"ß","ß")
conteudo=Replace(conteudo,"à","à")
conteudo=Replace(conteudo,"á","á")
conteudo=Replace(conteudo,"â","â")
conteudo=Replace(conteudo,"ã","ã")
conteudo=Replace(conteudo,"ä","ä")
conteudo=Replace(conteudo,"å","å")
conteudo=Replace(conteudo,"æ","æ")
conteudo=Replace(conteudo,"ç","ç")
conteudo=Replace(conteudo,"è","è")
conteudo=Replace(conteudo,"é","é")
conteudo=Replace(conteudo,"ê","ê")
conteudo=Replace(conteudo,"ë","ë")
conteudo=Replace(conteudo,"ì","ì")
conteudo=Replace(conteudo,"í","í")
conteudo=Replace(conteudo,"î","î")
conteudo=Replace(conteudo,"ï","ï")
conteudo=Replace(conteudo,"ð","ð")
conteudo=Replace(conteudo,"ñ","ñ")
conteudo=Replace(conteudo,"ò","ò")
conteudo=Replace(conteudo,"ó","ó")
conteudo=Replace(conteudo,"ô","ô")
conteudo=Replace(conteudo,"õ","õ")
conteudo=Replace(conteudo,"ö","ö")
conteudo=Replace(conteudo,"ø","ø")
conteudo=Replace(conteudo,"ù","ù")
conteudo=Replace(conteudo,"ú","ú")
conteudo=Replace(conteudo,"û","û")
conteudo=Replace(conteudo,"ü","ü")
conteudo=Replace(conteudo,"ý","ý")
conteudo=Replace(conteudo,"þ","þ")
conteudo=Replace(conteudo,"ÿ","ÿ")
conteudo=Replace(conteudo,"Œ","Œ")
conteudo=Replace(conteudo,"œ","œ")
conteudo=Replace(conteudo,"Š","Š")
conteudo=Replace(conteudo,"š","š")
conteudo=Replace(conteudo,"Ÿ","Ÿ")
conteudo=Replace(conteudo,"€","€")
conteudo=Replace(conteudo,"£","£")
conteudo=Replace(conteudo,"”","”")
conteudo=Replace(conteudo,"“","“")
conteudo=Replace(conteudo,"®","®")
conteudo=Replace(conteudo,"©","©")
conteudo=Replace(conteudo,"´","´")
conteudo=Replace(conteudo,"¸","¸")
conteudo=Replace(conteudo,"™","™")
conteudo=Replace(conteudo,"–","–")
        call abre_conexao
        set rs=Server.createobject("ADODB.Recordset")
        SQL="UPDATE conteudo SET " & col & "='" & conteudo & "' WHERE id=1"
        rs.open SQL,conexao,1,3
                response.redirect "done.asp"
        set rs=nothing
        call fecha_conexao

end if
%>
e nao funciona... =/

Compartilhar este post


Link para o post
Compartilhar em outros sites

ele gera o mesmo erro ?!?!

dá um response.write na string SQL para ver o k esta sendo passado...

Compartilhar este post


Link para o post
Compartilhar em outros sites

ele gera o mesmo erro ?!?!

dá um response.write na string SQL para ver o k esta sendo passado...

 

Respose.Write da String:

UPDATE conteudo SET sobrenos='Bellitá deriva do termo italiano Belle` etá que significa Bela etapa ou Bela idade, que para nossa equipe tem um significado muito especial: descobrir que a beleza da vida não se limita a uma determinada idade, mas sim descobrir que cada idade possue a sua própria beleza.

E ajudar a realçar esta beleza natural é o nosso principal objetivo para que a expressão de beleza e saúde possa refletir na qualidade de vida de cada um.

Já não possuímos o passado e não temos como mudá-lo e o futuro depende de nossas ações no presente.

A melhor idade, então, para se viver feliz é no agora, e viver bem o presente é ganhar um presente maravilhoso.

Pensando nisso é que o nosso espaço foi especialmente preparado para atender a todos que queiram se presentear hoje com muita beleza e saúde.

 

Missão

Prestar serviço de excelência nas áreas de saúde, beleza e cursos vivenciais através de atendimento personalizado, ambiente agradável e profissionais especializados promovendo cada vez mais bem estar e qualidade de vida aos nossos clientes, parceiros e funcionários.

 

Visão

Ser reconhecido como referência em Wellness Center no Brasil através da busca em excelência na prestação de serviços associado à novas tecnologias e ao crescimento humano e profissional de todos da equipe Bellitá e clientes.

 

Valores

- Ética

- Alegria e cordialidade no atendimento

- Comprometimento com o cliente

- Transparência e honestidade

- Integridade e Competência

- Trabalho em equipe

- Crescimento humano

'

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

tente atualizar com menos texto, para ver o resultado...

Compartilhar este post


Link para o post
Compartilhar em outros sites

tente atualizar com menos texto, para ver o resultado...

 

Justamente ae q esta o problema...

Quando é textos pequenos, ele funciona sem problemas...o problema está com os textos grandes...

Compartilhar este post


Link para o post
Compartilhar em outros sites

eu suspeitava mesmo k era a quantidade de caracteres, isso aconteceu em um pesquisa, k um empresa precisava fazer e deu este mesmo problema, o k fiz foi dividor em mais de um campo, ou usar um campo blob

Compartilhar este post


Link para o post
Compartilhar em outros sites

eu suspeitava mesmo k era a quantidade de caracteres, isso aconteceu em um pesquisa, k um empresa precisava fazer e deu este mesmo problema, o k fiz foi dividor em mais de um campo, ou usar um campo blob

 

Xanburzum, como eu poderia fazer uma dessas 2 opcoes? Qual seria a melhor delas? O que ser um campo blob?

 

Obrigado desde ja

Compartilhar este post


Link para o post
Compartilhar em outros sites

veja este link para um inicio de entendimento:

http://www.macoratti.net/08/11/asp_blobs.htm

 

o blob serve para gravar dados binários(acho que não seja seu caso), teria que ser clob, text, longtext(entre outros nomes criados pelos bancos de dados)

 

como está usando access, o campo seria do tipo memorando que tem limitação, só não lembro qual o máximo de caracteres

Compartilhar este post


Link para o post
Compartilhar em outros sites

é confundi com blob, o k eu keria dizer e´o clob, o Access tem um limite máximo 256 caracteres alfanuméricos.

você pode tentar mudar o campo de texto para memorando ,campo memorando podem armazenar até 1 gigabyte de caracteres, ou 2 gigabytes de armazenamento (2 bytes por caractere), dos quais você pode exibir 65.535 caracteres em um controle em um formulário ou relatório

Compartilhar este post


Link para o post
Compartilhar em outros sites

veja este link para um inicio de entendimento:

http://www.macoratti.net/08/11/asp_blobs.htm

 

o blob serve para gravar dados binários(acho que não seja seu caso), teria que ser clob, text, longtext(entre outros nomes criados pelos bancos de dados)

 

como está usando access, o campo seria do tipo memorando que tem limitação, só não lembro qual o máximo de caracteres

 

é confundi com blob, o k eu keria dizer e´o clob, o Access tem um limite máximo 256 caracteres alfanuméricos.

você pode tentar mudar o campo de texto para memorando ,campo memorando podem armazenar até 1 gigabyte de caracteres, ou 2 gigabytes de armazenamento (2 bytes por caractere), dos quais você pode exibir 65.535 caracteres em um controle em um formulário ou relatório

 

Gente, o pior de tudo é que o campo ja está como memorando... =/

oq eu faco? ja nao sei mais...hehehe

Compartilhar este post


Link para o post
Compartilhar em outros sites

faz uma banbiarra de dividir o campo em dois, e para exibir ao user você apenas, cancatena...

Compartilhar este post


Link para o post
Compartilhar em outros sites

faz uma banbiarra de dividir o campo em dois, e para exibir ao user você apenas, cancatena...

 

Cara foi isso q eu tinha pensado mesmo...

mas como q eu posso fazer isso? tipo ele ler ate X caracteres, armazena na linha 1, aew o restante na linha 2 e assim por diante.

pra imprimir pro user eu mandaria ele ir lendo todas as linhas daquela coluna certo?

 

E na hora q eu fosso editar eu mandar ele ler todas as linhas, jogar no campo de texto, e aew dps separava td de novo?

Abracao, obrigado desde ja pela ajuda...

Compartilhar este post


Link para o post
Compartilhar em outros sites

beleza, kker coisa posta ae...

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.