QUERO AGRADECER AO PESSOAL QUE ENVIOU COMENTARIOS PARA MINHA SUGESTÃO. ACHO QUE É POR CAUSA DE UMA PAGINA DESSA QUE A INTERNET SE TORNOU A POTENCIA QUE SE TORNOU.
OBRIGADO ESPECIALMENTE AO PESSOAL DA PÁGINA SCRIPT BRASIL. TAMBÉM A ANDREIA_SP, BARETA E ANDRE LUIZ.
INFELIZMENTE NÃO CONSEGUIRAM IDENTIFICAR O ERRO, MAS EU ACABEI ENTENDENDO O PROBLEMA DEPOIS.
É QUE EU QUERIA QUE OS DADOS FOSSEM TODOS RETIRADOS DE UM BANCO, MAS ELES NÃO PODERIAM POR QUE EU ME EQUIVOQUEI EM UMA COISINHA...
sqlstmt = "SELECT * FROM Carros WHERE Marca like '%" & vMarca & "%'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, DSNtemp, 3, 3
totalrecs = rs.recordcount
x = 0
for x = 1 to totalrecs
if rs.eof then
exit for
else
id = rs("ID")
carro = rs("Carro")
placa = rs("Placa")
marca = rs("Marca")
dono = rs("Dono")
tempo = rs("Tempo")
%>
<b><p>
O PROBLEA É QUE ISSO AQUI TINHA QUE FICAR NO FINAL DA ISTRUÇÃO. E EU COLOQUEI ANTES DO
<% rs.MoveNext %>
<% end if
next
%> :
AQUI EMBAIXO ESTAVA O RESTO DO CODIGO. APENAS UMA BURRICE MINHA.
O BOM MESMO É QUE ACABEI APRENDENDO ESTA LIÇAO.
DE TODO MODO, QUERO AGRADECER A TODOS PELAS DICAS.
ESSA INSTRUÇAO TINHA QUE FICAR LA EMBAIXO
POR ISSO FIZ QUESTAO DE COLOCAR ELA LOGO AQUIE EMBAIXO PARA QUEM TIVER UMA DUVIDA COMO A MINHA, COMPREEENDER O QUE ACONTECE QUANDO COLOCA ESSA INSTRUÇAO NO MEIO E não NO FIM
Pergunta
osmildo
QUERO AGRADECER AO PESSOAL QUE ENVIOU COMENTARIOS PARA MINHA SUGESTÃO. ACHO QUE É POR CAUSA DE UMA PAGINA DESSA QUE A INTERNET SE TORNOU A POTENCIA QUE SE TORNOU.
OBRIGADO ESPECIALMENTE AO PESSOAL DA PÁGINA SCRIPT BRASIL. TAMBÉM A ANDREIA_SP, BARETA E ANDRE LUIZ.
INFELIZMENTE NÃO CONSEGUIRAM IDENTIFICAR O ERRO, MAS EU ACABEI ENTENDENDO O PROBLEMA DEPOIS.
É QUE EU QUERIA QUE OS DADOS FOSSEM TODOS RETIRADOS DE UM BANCO, MAS ELES NÃO PODERIAM POR QUE EU ME EQUIVOQUEI EM UMA COISINHA...
EIS O ERRO...
<%
vMarca = request.form("car")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("db.mdb")
sqlstmt = "SELECT * FROM Carros WHERE Marca like '%" & vMarca & "%'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, DSNtemp, 3, 3
totalrecs = rs.recordcount
x = 0
for x = 1 to totalrecs
if rs.eof then
exit for
else
id = rs("ID")
carro = rs("Carro")
placa = rs("Placa")
marca = rs("Marca")
dono = rs("Dono")
tempo = rs("Tempo")
%>
<b><p>
O PROBLEA É QUE ISSO AQUI TINHA QUE FICAR NO FINAL DA ISTRUÇÃO. E EU COLOQUEI ANTES DO
<% rs.MoveNext %>
<% end if
next
%> :
AQUI EMBAIXO ESTAVA O RESTO DO CODIGO. APENAS UMA BURRICE MINHA.
O BOM MESMO É QUE ACABEI APRENDENDO ESTA LIÇAO.
DE TODO MODO, QUERO AGRADECER A TODOS PELAS DICAS.
ESSA INSTRUÇAO TINHA QUE FICAR LA EMBAIXO
POR ISSO FIZ QUESTAO DE COLOCAR ELA LOGO AQUIE EMBAIXO PARA QUEM TIVER UMA DUVIDA COMO A MINHA, COMPREEENDER O QUE ACONTECE QUANDO COLOCA ESSA INSTRUÇAO NO MEIO E não NO FIM
<% rs.MoveNext %>
<% end if
next
VALEU GALERA!
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
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.