[Resolvido] Alteração da erro no firefox e funciona no explorer

rbaccaro · Julho 4, 2008

Tenho formulários de alteração de dados e alteração de fotos, quando faço a atualização de dados

pelo Explorer 6 ou 7, tudo ocorre normalmente, só que quando faço a alteração pelo Firefox a atualização

informa que os dados foram atualizados, só que quando vou verificar o firefox apagou os dados que

estavam na tabela, independente se foram alterados ou não.

O que pode estar acontecendo, Há diferença entre o explorer e o firefox?

Alguem pode me iluminar sobre isso

Jow Xavier · Julho 4, 2008

Boa tarde então cara nos meus formularios tbm ñ funcionam normalmente com os navegadores até hj ñ sei o pq huahuhahuauhauhua ... mas com um upload de fotos eu nunca testei não ...

rbaccaro · Julho 4, 2008

Já tentei de tudo, dei as permissões corretas, alterei os dados, mas nada funciona.

Os dados e as fotos pelo firefox simplesmente são apagados do banco de dados, independente

se foram alterados ou não.

rbaccaro · Julho 4, 2008

Estava fazendo uns testes aqui e alterei um dos campos do banco de dados de texto para memorando

e o firefox atualizou normalmente.

Não entendi o porque disso, os campos com tipo de dados 'texto' não atualizaram.

?????????????

Mas eae no explorer tbm funciona ??

rbaccaro · Julho 4, 2008

Eu alterei e testei tanto no explorer quando no firefox e funcionou

Não entendi porque o campo 'texto' não altera e o campo memorando sim.

Será que vou ter de alterar todos os campos?

Impossivel, ser isso.

Jow Xavier · Julho 4, 2008

Tbm axo vou pesquisar tbm o pq disso hauauhahuhuahuauhahuhua valeuuu abraçãooo

Salgado · Julho 5, 2008

Seu form possui alguma validação via JavaScript? Não vejo outra relação entre o problema e o browser.

rbaccaro · Julho 5, 2008

Não, validação via javascript, não tem, em um dos formularios, alguns campos como cep, telefone, coloquei

a mascara em js, mas isso no firefox, não funciona.

Uma coisa que noto sempre, é que quando abro o site como localhost, para teste interno, as fotos e banners

no firefox não aparecem, tal como acontece com as fotos quando se tenta atualizar online.

Se você quizer posto o codigo da alteração das fotos.

Salgado · Julho 5, 2008

Retire essa mascara e teste novamente.

rbaccaro · Julho 6, 2008

Retirei a mascara, e não funcionou, continua apagando os dados

hargon · Julho 6, 2008

O problema provavelmente é Javascript e/ou HTML.

Se puder disponibilizar o código funcionando, facilitaria mais.

rbaccaro · Julho 6, 2008

<!-- #include virtual="/Includes/BarraSuperior.asp" -->

<%

Dim VarAct

Dim VarAnuncio

Dim objEstados

Dim objEstados_numRows

Dim objPlanos

Dim objAnuncio

Dim PlanoSel

Dim SecaoSel

Dim Foto

Dim VarFoto

Dim VarFoto1

Dim VarFoto2

Dim VarFoto3

Dim VarFoto4

Dim VarFoto5

Dim VarConfFoto1

Dim VarConfFoto2

Dim VarConfFoto3

Dim VarConfFoto4

Dim VarConfFoto5

Dim AltBd

VarAct = Request.QueryString("Act")

VarAct2 = Request.Querystring("Act2")

VarAnuncio = Request.QueryString("Anuncio")

' faz o select pra puxar as fotos do anúncio p/ usar na exclusão da foto ao editar

Set DelAnuncio = Conn.Execute("Select * From Anuncios Where CodAnuncio="& VarAnuncio)

vDelFoto1 = DelAnuncio("Foto1")

vDelFoto2 = DelAnuncio("Foto2")

vDelFoto3 = DelAnuncio("Foto3")

vDelFoto4 = DelAnuncio("Foto4")

vDelFoto5 = DelAnuncio("Foto5")

Set objAnuncio = Conn.Execute("SELECT * FROM Anuncios WHERE CodAnuncio = "& VarAnuncio &" AND CodAnunciante = "& Session("Usuario") &"")

%>

<tr>

<tr>

<tr>

</tr>

<tr>

<td align="center" class="TituloCinzaMedio">ALTERAÇÃO </td>

</tr>

<tr>

</tr>

<tr>

<% If VarAct <> "Alterar" AND VarAct <> "Confirma" Then %>

<form action="AltFotos.asp?Act=Alterar&Act2=<%=VarAct%>&Anuncio=<%=objAnuncio("CodAnuncio")%>" method="Post" name="Alterar" enctype="multipart/form-data">

<%=LinhaHorizontal%>

<tr>

<td height="20" colspan="2" align="center" class="Titulo" bgcolor="#DDDDDD">Fotos</td>

</tr>

<%

With Response

.Write LinhaHorizontal

If VarAct = "AltFoto1" Then

.Write "<tr><td class='Titulo'>Foto 1: </td><td><input name=Foto1 type=file class='Form28019'></td></tr>"

Else

.Write "<tr><td class='Titulo'>Foto 1: </td><td class='Titulo'><img src='"&LocalFoto & vDelFoto1&"' width='150'> ( <a href='AltFotos.asp?Act=AltFoto1&Anuncio="&objAnuncio("CodAnuncio")&"' class='Titulo'>alterar imagem</a> )</td></tr>"

End If

.Write LinhaHorizontal

If VarAct = "AltFoto2" Then

.Write "<tr><td class='Titulo'>Foto 2: </td><td><input name=Foto2 type=file class='Form28019'></td></tr>"

Else

.Write "<tr><td class='Titulo'>Foto 2: </span></td><td class='Titulo'><img src='"&LocalFoto & vDelFoto2&"' width='150'> ( <a href='AltFotos.asp?Act=AltFoto2&Anuncio="&objAnuncio("CodAnuncio")&"' class='Titulo'>alterar imagem</a> )</td></tr>"

End If

.Write LinhaHorizontal

If VarAct = "AltFoto3" Then

.Write "<tr><td class='Titulo'>Foto 3: </td><td><input name=Foto3 type=file class='Form28019'></td></tr>"

Else

.Write "<tr><td class='Titulo'>Foto 3: </span></td><td class='Titulo><img src='"&LocalFoto & vDelFoto3&"' width='150'> ( <a href='AltFotos.asp?Act=AltFoto3&Anuncio="&objAnuncio("CodAnuncio")&"' class='Titulo'>alterar imagem</a> )</td></tr>"

End If

.Write LinhaHorizontal

If VarAct = "AltFoto4" Then

.Write "<tr><td class='Titulo'>Foto 4: </td><td><input name=Foto4 type=file class='Form28019'></td></tr>"

Else

.Write "<tr><td class='Titulo'>Foto 4: </span></td><td class='Titulo'><img src='"&LocalFoto & vDelFoto4&"' width='150'> ( <a href='AltFotos.asp?Act=AltFoto4&Anuncio="&objAnuncio("CodAnuncio")&"' class='Titulo'>alterar imagem</a> )</td></tr>"

End If

.Write LinhaHorizontal

If VarAct = "AltFoto5" Then

.Write "<tr><td class='Titulo'>Foto 5: </td><td><input name=Foto5 type=file class='Form28019'></td></tr>"

Else

.Write "<tr><td class='Titulo'>Foto 5: </td><td class='Titulo'><img src='"&LocalFoto & vDelFoto5&"' width='150'> ( <a href='AltFotos.asp?Act=AltFoto5&Anuncio="&objAnuncio("CodAnuncio")&"' class='Titulo'>alterar imagem</a> )</td></tr>"

End If

End With

%>

<%=LinhaHorizontal%>

<tr>

</tr>

<tr>

</tr>

<%

With Response

.Write "<tr><td colspan=2 align='center'><input type=submit value=Atualizar class='BotaoSubmit' /></td></tr>"

End With

%>

<tr>

</tr>

</form>

</table>

<%

ElseIf VarAct = "Alterar" Then

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

Dim Uploader, File

Set Uploader = New FileUploader

Uploader.Upload()

If Uploader.Files.Count > 0 Then

For Each File In Uploader.Files.Items

File.SaveToDisk CaminhoFoto

VarFoto = VarFoto &"|"& File.FileName

VarFoto = Split(VarFoto, "|")

End If

If Session("FotoTemp") <> "" Then

Set rsFSO = Server.CreateObject("Scripting.FileSystemObject") ' cria o objeto FSO

If rsFSO.FileExists(CaminhoFoto & Session("FotoTemp")) = True AND Session("FotoTemp") <> "SemFoto.gif" Then ' Se o arquivo especificado existir e for diferente da foto (s/ foto) então:

rsFSO.DeleteFile (CaminhoFoto & Session("FotoTemp")) ' Apaga o arquivo especificado com o caminho e nome

End If

Session("FotoTemp") = VarFoto(0) ' Cria a session da foto temporária

Else

If Uploader.Files.Count > 0 Then

Session("FotoTemp") = VarFoto(0) ' Cria a session da foto temporária

End If

If VarAct2 = "AltFoto1" AND (Uploader.Files.Count = 0 OR vDelFoto1 = "SemFoto.gif") Then : vDelFoto1 = "SemFoto.gif" : Else : vDelFoto1 = vDelFoto1 : End If

If VarAct2 = "AltFoto2" AND (Uploader.Files.Count = 0 OR vDelFoto2 = "SemFoto.gif") Then : vDelFoto2 = "SemFoto.gif" : Else : vDelFoto2 = vDelFoto2 : End If

If VarAct2 = "AltFoto3" AND (Uploader.Files.Count = 0 OR vDelFoto3 = "SemFoto.gif") Then : vDelFoto3 = "SemFoto.gif" : Else : vDelFoto3 = vDelFoto3 : End If

If VarAct2 = "AltFoto4" AND (Uploader.Files.Count = 0 OR vDelFoto4 = "SemFoto.gif") Then : vDelFoto4 = "SemFoto.gif" : Else : vDelFoto4 = vDelFoto4 : End If

If VarAct2 = "AltFoto5" AND (Uploader.Files.Count = 0 OR vDelFoto5 = "SemFoto.gif") Then : vDelFoto5 = "SemFoto.gif" : Else : vDelFoto5 = vDelFoto5 : End If

With Response

.Write "<table align='center' width='90%'>"

.Write "<form action='AltFotos.asp?Act=Confirma&Act2="&VarAct2&"&Anuncio="&VarAnuncio&"' method='post' name='Inserir'>"

If Uploader.Files.Count <= 0 Then

VarFoto1 = vDelFoto1

VarFoto2 = vDelFoto2

VarFoto3 = vDelFoto3

VarFoto4 = vDelFoto4

VarFoto5 = vDelFoto5

Else

If VarAct2 = "AltFoto1" Then

VarFoto1 = VarFoto(0)

VarFoto2 = vDelFoto2

VarFoto3 = vDelFoto3

VarFoto4 = vDelFoto4

VarFoto5 = vDelFoto5

ElseIf VarAct2 = "AltFoto2" Then

VarFoto1 = vDelFoto1

VarFoto2 = VarFoto(0)

VarFoto3 = vDelFoto3

VarFoto4 = vDelFoto4

VarFoto5 = vDelFoto5

ElseIf VarAct2 = "AltFoto3" Then

VarFoto1 = vDelFoto1

VarFoto2 = vDelFoto2

VarFoto3 = VarFoto(0)

VarFoto4 = vDelFoto4

VarFoto5 = vDelFoto5

ElseIf VarAct2 = "AltFoto4" Then

VarFoto1 = vDelFoto1

VarFoto2 = vDelFoto2

VarFoto3 = vDelFoto3

VarFoto4 = VarFoto(0)

VarFoto5 = vDelFoto5

ElseIf VarAct2 = "AltFoto5" Then

VarFoto1 = vDelFoto1

VarFoto2 = vDelFoto2

VarFoto3 = vDelFoto3

VarFoto4 = vDelFoto4

VarFoto5 = VarFoto(0)

End If

.Write "<input type=hidden value='"&VarFoto1&"' name='Foto1'>"

.Write "<input type=hidden value='"&VarFoto2&"' name='Foto2'>"

.Write "<input type=hidden value='"&VarFoto3&"' name='Foto3'>"

.Write "<input type=hidden value='"&VarFoto4&"' name='Foto4'>"

.Write "<input type=hidden value='"&VarFoto5&"' name='Foto5'>"

.Write "<tr><td colspan='2' class='Titulo' align='center'>Confira seus dados abaixo: </td></tr>"

.Write LinhaHorizontal

If VarFoto1 = "SemFoto.gif" OR Varfoto1 = "" Then

.Write "<tr><td class='Titulo'>Foto 1: </td><td class='Titulo'>Nenhuma</td></tr>"

Else

.Write "<tr><td class='Titulo' colspan='2'>Foto 1: </td></tr>"

.Write "<tr><td colspan='2' align='center'><img src='"&LocalFoto&VarFoto1&"' width='250'></td></tr>"

End If

.Write LinhaHorizontal

If VarFoto2 = "SemFoto.gif" OR Varfoto2 = "" Then

.Write "<tr><td class='Titulo'>Foto 2: </td><td class='Titulo'>Nenhuma</td></tr>"

Else

.Write "<tr><td class='Titulo' colspan='2'>Foto 2: </td></tr>"

.Write "<tr><td colspan='2' align='center'><img src='"&LocalFoto&VarFoto2&"' width='250'></td></tr>"

End If

.Write LinhaHorizontal

If VarFoto3 = "SemFoto.gif" OR Varfoto3 = "" Then

.Write "<tr><td class='Titulo'>Foto 3: </td><td class='Titulo'>Nenhuma</td></tr>"

Else

.Write "<tr><td class='Titulo' colspan='2'>Foto 3: </td></tr>"

.Write "<tr><td colspan='2' align='center'><img src='"&LocalFoto&VarFoto3&"' width='250'></td></tr>"

End If

.Write LinhaHorizontal

If VarFoto4 = "SemFoto.gif" OR Varfoto4 = "" Then

.Write "<tr><td class='Titulo'>Foto 4: </td><td class='Titulo'>Nenhuma</td></tr>"

Else

.Write "<tr><td class='Titulo' colspan='2'>Foto 4: </td></tr>"

.Write "<tr><td colspan='2' align='center'><img src='"&LocalFoto&VarFoto4&"' width='250'></td></tr>"

End If

.Write LinhaHorizontal

If VarFoto5 = "SemFoto.gif" OR Varfoto5 = "" Then

.Write "<tr><td class='Titulo'>Foto 5: </td><td class='Titulo'>Nenhuma</td></tr>"

Else

.Write "<tr><td class='Titulo' colspan='2'>Foto 5: </td></tr>"

.Write "<tr><td colspan='2' align='center'><img src='"&LocalFoto&VarFoto5&"' width='250'></td></tr>"

End If

.Write LinhaHorizontal

.Write "<tr><td colspan='2' align='center'><input type='Submit' name='confirma' class='BotaoSubmit' value='Confirmar'> <input type='button' value='Corrigir' onClick='java script:history.go(-1)' class='BotaoSubmit'></td></tr>"

.Write "</form></table>"

End With

End If

If VarAct = "Confirma" Then

VarConfFoto1 = Request.Form("Foto1")

VarConfFoto2 = Request.Form("Foto2")

VarConfFoto3 = Request.Form("Foto3")

VarConfFoto4 = Request.Form("Foto4")

VarConfFoto5 = Request.Form("Foto5")

Set AltBd = Server.CreateObject("ADODB.Recordset")

AltBd.CursorLocation = adUseServer

AltBd.CursorType = adOpenKeyset

AltBd.LockType = adLockOptimistic

AltBd.Open "SELECT * FROM Anuncios WHERE CodAnuncio="&VarAnuncio, Conn, , , adCmdText

AltBd("Foto1") = VarConfFoto1

AltBd("Foto2") = VarConfFoto2

AltBd("Foto3") = VarConfFoto3

AltBd("Foto4") = VarConfFoto4

AltBd("Foto5") = VarConfFoto5

AltBd.Update

AltBd.Close

Set AltBd = Nothing

'-------------------' Apaga as imagens referentes ao dado excluído via FSO ------------------------------------------------------------

If VarAct2 = "AltFoto1" Then

Set rsFSO = Server.CreateObject("Scripting.FileSystemObject") ' cria o objeto FSO

If rsFSO.FileExists(CaminhoFoto & vDelFoto1) = True AND vDelFoto1 <> "SemFoto.gif" Then ' Se o arquivo especificado existir e for diferente da foto (s/ foto) então:

rsFSO.DeleteFile (CaminhoFoto & vDelFoto1) ' Apaga o arquivo especificado com o caminho e nome

End If

If VarAct2 = "AltFoto2" Then

Set rsFSO = Server.CreateObject("Scripting.FileSystemObject")

If rsFSO.FileExists(CaminhoFoto & vDelFoto2) = True AND vDelFoto2 <> "SemFoto.gif" Then

rsFSO.DeleteFile (CaminhoFoto & vDelFoto2)

End If

If VarAct2 = "AltFoto3" Then

Set rsFSO = Server.CreateObject("Scripting.FileSystemObject")

If rsFSO.FileExists(CaminhoFoto & vDelFoto3) = True AND vDelFoto3 <> "SemFoto.gif" Then

rsFSO.DeleteFile (CaminhoFoto & vDelFoto3)

End If

If VarAct2 = "AltFoto4" Then

Set rsFSO = Server.CreateObject("Scripting.FileSystemObject")

If rsFSO.FileExists(CaminhoFoto & vDelFoto4) = True AND vDelFoto4 <> "SemFoto.gif" Then

rsFSO.DeleteFile (CaminhoFoto & vDelFoto4)

End If

If VarAct2 = "AltFoto5" Then

Set rsFSO = Server.CreateObject("Scripting.FileSystemObject")

If rsFSO.FileExists(CaminhoFoto & vDelFoto5) = True AND vDelFoto5 <> "SemFoto.gif" Then

rsFSO.DeleteFile (CaminhoFoto & vDelFoto5)

End If

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

Session("FotoTemp") = ""

Response.Write "<tr><td align='center' class='TituloCinzaEscuro'><br>Seu anúncio foi atualizado com sucesso.<br><br><a href='MeuAnuncio2.asp' class='TituloCinzaEscuro'>Voltar</a></td></tr>"

End if

%>

</td>

</tr>

</table>

</td>

</tr>

</table>

</td>

</tr>

hargon · Julho 6, 2008

Posta o exemplo funcionando em algum servidor e disponibiliza a URL para analisarmos.

Só o código não está ajudando, parece está tudo certo...

rbaccaro · Julho 6, 2008

Caros amigos, achei o erro

Por um descuido meu, deixei um código escrito errado, em um dos Includes, que causou todo o erro em todas as

atualizações,

erro:

foi só retirar <FONT size=1> </FONT> e deixar a chamada a imagem livre

que todos os códigos voltaram a funcionar no Firefox.

Agora tanto em Explorer ou em Firefox os codigos funcionam corretamente

Agradeço a ajuda de todos

Obrigado

rbaccaro · Julho 6, 2008

HARGON, só consegui achar o erro, porque estava colocando o código limpo para que fosse testado

como você solicitou

Agradeço a ajuda

Valeu

hargon · Julho 6, 2008

Muito bom. Parabéns. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

Arquivado

[Resolvido] Alteração da erro no firefox e funciona no explorer

Recommended Posts

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Jow Xavier 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Jow Xavier 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Salgado 4

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Salgado 4

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

rbaccaro 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

PHP+Codeigniter - Dúvida em Relação a Teclas

Conexão mysql com outro domínio

[Resolvido] JavaScript - Exibir logo dentro da Tabela html

Fóruns

Tempo Real

Informação importante