Ir para conteúdo
Fórum Script Brasil
  • 0

Q Q Conteceu?


crucifier

Pergunta

hail murders!

tipw eu peguei um negocinhu pronto aih pra aparece tipw primera linha cor cinza segunda cinza escuro..tercera cinza quarta cinza escuro..e assim por diante...mai não deu muito certo..vo posta aih o codigo:

y=1
Do while not rs.eof
  if y mod 2 = 0 then  
     cor = "#f3f3f3"
  else
     cor = "#CCCCCC"
  end if
  y = y+1

	response.write "<tr bgcolor=" & cor & ">"
	response.write "<td><div align=center><img src="&miniatura&" width=47 height=47 style=border: 3px double #000000 /></div></td>"
	response.write "<td><div align=center>"& id &"</div></td>"
    response.write "<td><div align=center>"&categoria&"</div></td>"
    response.write "<td><div align=center>"&titulo&"</div></td>"
    response.write "<td><div align=center>"&descricao&"</div></td>"
    response.write "<td><div align=center>"
    response.write "<table width=""100%"" border=0 cellspacing=0 cellpadding=0>"
    response.write "<tr>"
    response.write "<td><div align=center><img src=http://www.filht.com.br/administracao/images/icon_alterar.gif width=18 height=27 /></div></td>"
    response.write "<td><div align=center><img src=http://www.filht.com.br/administracao/images/icon_excluir.gif width=22 height=23 /></div></td>"
    response.write "<td><div align=center><img src=http://www.filht.com.br/administracao/images/icon_visualizar.gif width=20 height=19 /></div></td>"
	response.write "</tr>"
    response.write "</table>"
    response.write "</div></td>"
	response.write "</tr>"

response.write "</table>"

  Rs.MoveNext
loop

mas ele da erro na linha 94...e a linha 94 é a parte q ta escrito loop

porq q ta acontecenu isso?=(

Link para o comentário
Compartilhar em outros sites

10 respostass a esta questão

Posts Recomendados

  • 0

Eu testei aqui e funciona, se está dando erro no Loop, dae pode ser prob em outra parte do codigo, como disse o JCMPJ.

E tava em liquidação os response.write ? laugh.gif hehehe...brincadeira, mas é mais bunitinho fechar e abrir as tags <% %>, já sendo abusada, mudei tá.

Outra observação, se os valores id, categoria,titulo e descricao... vem do banco então tem que ser rs("id"), rs("titulo"),...

e outra coisinha tb, o ultimo <table> você fecha depois do loop tá.

Link para o comentário
Compartilhar em outros sites

  • 0

vo posta meu codigo intero então...não consigui achar o erro ainda...

a primera parte do codigo antes do %> é do não guardar negocio de cache...vo posta ele interinhu aih:

continua dando erro na linha do loop

        <%Response.Expiresabsolute = Now() - 2
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache" %>
<%
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
          DSNtemp=dsntemp & "DBQ=" & server.mappath("textos.mdb")
          sqlstmt = "SELECT * FROM textos ORDER BY id DESC"
          Set rs = Server.CreateObject("ADODB.Recordset")
          rs.Open sqlstmt, DSNtemp, 3, 3
  rs.Move Request.QueryString("id")
TotalRecs = rs.recordcount
x = 0
For x = 1 to 9999
	If rs.eof then
  Exit For


id = rs("id")
miniatura = rs("miniatura")
categoria = rs("categoria")
titulo = rs("titulo")
descricao = rs("descricao")

y=1
Do while not rs.eof
 if y mod 2 = 0 then  
    cor = "#f3f3f3"
 else
    cor = "#CCCCCC"
 end if
 y = y+1

response.write "<tr bgcolor=" & cor & ">"
response.write "<td><div align=center><img src="&miniatura&" width=47 height=47 style=border: 3px double #000000 /></div></td>"
response.write "<td><div align=center>"& id &"</div></td>"
   response.write "<td><div align=center>"&categoria&"</div></td>"
   response.write "<td><div align=center>"&titulo&"</div></td>"
   response.write "<td><div align=center>"&descricao&"</div></td>"
   response.write "<td><div align=center>"
   response.write "<table width=""100%"" border=0 cellspacing=0 cellpadding=0>"
   response.write "<tr>"
   response.write "<td><div align=center><img src=http://www.filht.com.br/administracao/images/icon_alterar.gif width=18 height=27 /></div></td>"
   response.write "<td><div align=center><img src=http://www.filht.com.br/administracao/images/icon_excluir.gif width=22 height=23 /></div></td>"
   response.write "<td><div align=center><img src=http://www.filht.com.br/administracao/images/icon_visualizar.gif width=20 height=19 /></div></td>"
response.write "</tr>"
   response.write "</table>"
   response.write "</div></td>"
response.write "</tr>"

response.write "</table>"

 Rs.MoveNext
loop
%>

o erro dado foi:

Error Type:

Microsoft VBScript compilation (0x800A03F6)

Expected 'End'

/administracao/textos/view.asp, line 56

Link para o comentário
Compartilhar em outros sites

  • 0

E tava em liquidação os response.write ?  hehehe...brincadeira, mas é mais bunitinho fechar e abrir as tags <% %>,

Andreia,

Daquele jeito melhora e muito a performance do código. Pode até ser mais bonitinho, e bem mais facil de escrever e entender depois, mas vale considerar a perda de performance.

Quanto a isso:

If rs.eof then
Exit For

Pode até ficar sem o END IF, mas tem que ficar em um só linha

Não custa testar. Pelo jeito esse erra o problema.

[]'s

rolleyes.gif

Ah tem também o NEXT que não ta aparecendo, como disse a Andreia.

Editado por JCMPJ
Link para o comentário
Compartilhar em outros sites

  • 0

deu certo o codigo lá..fiz não sei que gambiarra lá q deu certo

e o verdadeiro problema sabem onde era?

inclusao.asp

a pagina de inclusao não tava funfanu direito eu achu..ele acusava q tinha incluido no bd mas não tinha..o bd tava vazio...achu q é por isso que tava dando tantos erros..mas daih eu consigui reverter a situação..valeu pela força gente..

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...