3 replies to this topic

[essex]

Olá Pessoal

Quero pintar com uma cor o campo ou os campos que forem alterados... como faço...

Tentei o código abaixo mas nao deu certo, sempre mostra linha pintada em vermelho...

-------------------------------------------------------------------------------------------------------------------

SQL = "UPDATE tabela SET nome_resp_vendas = '" & var_nome_resp_vendas & "', nome_resp_producao = '" ............ etc...... & "', data_hora_vendas ='" & var_data_hora_vendas & "' WHERE id = " & Request.QueryString("id")

Conexao.execute(SQL)
Call Fecha_Tabelas

Response.Redirect("pesquisa_vendas1.asp")

end select
SQL = "SELECT * FROM tabela WHERE id = " & Request.QueryString("id")
set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open SQL, conexao, 3

var_id = rs("id")
var_nome_resp_vendas = rs("nome_resp_vendas")

%>

<%
' ========== ERRO AQUI !!!!

if var_nome_resp_producao = rs("nome_resp_producao") then %>
<span style="color:black">
<% var_nome_resp_producao = rs("nome_resp_producao") %>
<% response.write("teste = mostra cor pintada")%>
</span>

<% else %>

<span style="color:red">
<% var_nome_resp_producao = rs("nome_resp_producao") %>
<% response.write("teste = mostra cor pintada")%>
</span>

<% end if %>




Alguem teria alguma dica....

[Renan L. Queiroz]

Colega ... a parte da verificação está meio estranha!

A variável var_nome_resp_producao tem alguma coisa?

Olhe a lógica dessa parte do script

<%
	If var_nome_resp_producao = rs("nome_resp_producao") Then
%>
		<span style="color:black">
<%
			var_nome_resp_producao = rs("nome_resp_producao")
			response.write("teste = mostra cor pintada")
%> 
		</span>
<%
	Else
%>
		<span style="color:red"> 
<%
			var_nome_resp_producao = rs("nome_resp_producao")
			response.write("teste = mostra cor pintada")
%> 
		</span>
<%
	End If
%>

sempre que um determinada variável (não declarada no trecho postado) for igual ao valor
do recordset fazer algo, sendo que a mesma independente do resultado vai receber tal
valor comparado anteriormente!! o.O

E como a variável "var_nome_resp_producao " provavelmente não tem nada o valor vai ser sempre diferente!


---

Outra dica, seria diminuir o código

<% 
	If [VAR_COMPARA] = rs("nome_resp_producao") Then
		cor = "black"
	Else
		cor = "red"
	End If
%>
	<span style="color:<%=cor%>"> 
<%
		var_nome_resp_producao = rs("nome_resp_producao")
		response.write("teste = mostra cor pintada")
%> 
	</span>

Assim poupa verificação para impressão de uma mesmo html sendo
que só é alterado uma parte no caso a cor da fonte no span!

Edição feita por: Renan L. Queiroz, 22/04/2009, 13:43.

[essex]

Opa.... legal gostei da otimização do código. Não me considero "o cara" na programacao em ASP... mas, estou tentando melhorar sempre e dicas como a sua e de outros colegas que contribuem para com as pessoas como eu e demais que buscam ajuda aqui são sempre bem show - e TODOS aprendem - Muito obrigado!

Mas, como poderia fazer para pintar somente o(s) campo(s) de outra cor quer forem alterados ?

Poderias me dar uma dica como seria, por favor?

Abraço

Edição feita por: essex, 22/04/2009, 19:22.

[Jow Xavier]

Uma solução seria .... Sempre q alterar algo no bd gravar em um campo se foi alterado ou não, depois só ver o q foi alterado e mudar a cor ... Suponha - se q 1 é campo alterado e zero é não alterado ....

tabela do banco de dados ...

NOME	 SOBRENOME	 ALTERADO
JACK		 SPARROW		  0
WILL		  TONNER		  1

<%
if rs("alterado") = "1" then
	campo = "<font color = 'red'>" & rs("nome") & " " & rs("sobrenome") & "</font>"
else
	campo = rs("nome") & " " & rs("sobrenome")
end if

response.write campo
%>

O resultado será WILL TONNER

Edição feita por: Jow Xavier, 24/04/2009, 15:09.