Variável não recebe valor

rst.open "select codrel, os, cast(status as varchar(50)) as status, convert(varchar, plinicial, 103) as plinicial, convert(varchar, plfinal, 103) as plfinal, razaosocial, nome from tblgavrelatorio inner join tblfuncionario on tblfuncionario.codfuncionario = tblgavrelatorio.codfuncionario inner join tblcliente on tblcliente.codcli = tblgavrelatorio.codcli " & where, con

 Dim Cor

 do while not rst.eof

 if(rst("status")) = "Iniciado" Then
 Cor = "#FFFACD"
 elseif(rst("status")) = "Aguardando Aprovação" Then
 Cor = "#FF6A6A"
 elseif(rst("status")) = "Reprovado" Then
 Cor = "#FFBBFF"
 elseif(rst("status")) = "Aprovado" Then
 Cor = "#9AFF9A"
 elseif(rst("status")) = "Impresso" Then
 Cor = "#FFFFFF"
 elseif(rst("status")) = "Finalizado" Then
 Cor = "#FFFFFF"
 elseif(rst("status")) = "Aguardando Impressão" Then
 Cor = "#B0E2FF"
 elseif(rst("status")) = "Enviado para o Cliente" Then
 Cor = "#FFFFF0"
 End If

 response.write(Cor)

 %>

 <tr bgcolor="<%response.write Cor%>">
 <td>......
 <%
 rst.movenext
 loop

Galera... tem esse if dentro do while... nao entra em nenhuma condição.Já verifiquei tudo... mas nao entra..

o que tem de errado ? o select ta certo pois trás os resultados.

ele nao entra nos ifs e nao carrega a variável COR. mas os status está tudo certo.

resolvido

bgd a todos que ajudaram