Seguinte: tenho uma consulta que tá dando pau... Não mostra mensagem de erro nenhum, mas quando chega a um determinado ponto ela trava... para de mostrar resultados... Eu não quero usar paginação nessa consulta... alguém tem alguma pista do que poderia estar acontecendo?
Pergunta
Notax
Pessoal, bom dia.
Seguinte: tenho uma consulta que tá dando pau... Não mostra mensagem de erro nenhum, mas quando chega a um determinado ponto ela trava... para de mostrar resultados... Eu não quero usar paginação nessa consulta... alguém tem alguma pista do que poderia estar acontecendo?
segue script:
<% Option Explicit Response.Expires = 0 Dim objConn, objRs, strQuery, ComandoSQL, Conexao, ddi, mmi, aai, datai, ddf, mmf, aaf, dataf, txtNome, chcNome Dim strConnection chcNome = request.form ("chcNome") if chcNome = "ON" then call comnome else call semnome end if Sub semnome() ddi = request.form ("txtddi") mmi = request.form ("txtmmi") aai = request.form ("txtaai") datai = (ddi &"/"& mmi &"/"& aai) datai = Cdate(day (datai) &"/"& month (datai) &"/"& year (datai)) ddf = request.form ("txtddf") mmf = request.form ("txtmmf") aaf = request.form ("txtaaf") dataf = (ddf &"/"& mmf &"/"& aaf) dataf = Cdate(day (dataf) &"/"& month (dataf) &"/"& year (dataf)) Session.LCID=1033 ComandoSQL = "select * from clientes where DATA BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY DATA ASC" Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DBQ=" & Server.MapPath("bd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" strQuery = "SELECT * FROM clientes WHERE DATA" Session.LCID=1046 Set ObjRs = objConn.Execute(ComandoSQL) end sub Sub comnome() ddi = request.form ("txtddi") mmi = request.form ("txtmmi") aai = request.form ("txtaai") datai = (ddi &"/"& mmi &"/"& aai) datai = Cdate(day (datai) &"/"& month (datai) &"/"& year (datai)) ddf = request.form ("txtddf") mmf = request.form ("txtmmf") aaf = request.form ("txtaaf") dataf = (ddf &"/"& mmf &"/"& aaf) dataf = Cdate(day (dataf) &"/"& month (dataf) &"/"& year (dataf)) txtNome = request.form ("txtNome") Session.LCID=1033 ComandoSQL = "select * from clientes where nome = '" & txtNome & "' and DATA BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY DATA ASC" Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DBQ=" & Server.MapPath("bd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" strQuery = "SELECT * FROM clientes WHERE NOME" Session.LCID=1046 Set ObjRs = objConn.Execute(ComandoSQL) end sub %> <html> <head> <title></title> </head> <body bgcolor="#FFFFFF"> <div align="center" style="width: 756; height: 119"> <p align="left"><font face="Verdana, Arial, Helvetica, sans-serif"><em><strong>Cadastro Clientes (consulta)</strong></em></font><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000"> </font></b></font></p> <div align="left"> <table width="650" border="0" cellspacing="0" cellpadding="0" height="1"> <tr> <td width="650" valign="top" height="136"> <table border="0" cellpadding="0" cellspacing="0" width="650"> <tr bgcolor="ffffff"> <td width="650" colspan="3"> <table width="100%" border="0" cellspacing="2" cellpadding="2"> </table> </td> </tr> <tr> <td colspan="3"> <form method="GET" action="action_excluir_clientes.asp"> <%While Not objRS.EOF %> <p> </p><table width="650" border="0" cellspacing="0" cellpadding="0" height="1"> <tr> <td height="1" align="center" width="650"> <table border="0" width="650" height="107" cellpadding="2"> <tr bgcolor="#0099FF"> <td width="266" height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">NOME / RAZÃO SOCIAL</font></b></font></td> <td width="211" height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana"> RG / IE</font></b> </font></td> <td width="222" height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">CPF / CNPJ</font></b></font></td> <td width="158" height="1" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">DATA COMEÇO</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td width="266" height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("nome")%> </font> </b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"> <font size="-7" face="Arial, Helvetica, sans-serif"><b> <%Response.write objRS("rg")%> </b></font></div></td> <td width="222" height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b> <%Response.write objRS("cpf")%></a> </b></font></div></td> <td width="158" height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("data")%> </font></b></font></div></td> </tr> <tr bgcolor="#0099FF"> <td height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">ENDEREÇO</font></b></font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana">BAIRRO</font></b> </font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">CIDADE</font></b></font></td> <td height="1" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">CEP</font></b> </font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("endereco")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("bairro")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("cidade")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("cep")%> </font></b></font></div></td> </tr> <tr bgcolor="#0099FF"> <td height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">TELEFONE</font></b></font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana">CELULAR</font></b> </font></td> <td height="1" align="center"> <font color="FFFFFF" size="1" face="Verdana"><b>TIPO</b></font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana">Nº Associados</font></b> </font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><b><font color="#000000"> <%Response.write objRS("telefone")%> </font></b></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("celular")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><b><font color="#000000"> <%Response.write objRS("tipo")%> </font></b></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("n_assoc")%> </font></b></font></div></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font color="FFFFFF" size="1" face="Verdana"><b>Representante 1 </b></font><font size="1" color="FFFFFF"><b></b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"><b>Fone Representante 1</b></font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">E-mail Representante 1</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><div align="center"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font></b></font></div> <div align="left"></div> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("repres1")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("fonecontato1")%> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("email1")%> </font></b></font></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font color="FFFFFF" size="1" face="Verdana"><b>Representante 2 </b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"><b>Fone Representante 2</b></font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">E-mail Representante 2</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><div align="center"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font></b></font></div> <div align="left"></div> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("repres2")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("fonecontato2")%> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("email2")%> </font></b></font></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font color="FFFFFF" size="1" face="Verdana"><b>Representante 1 </b></font><font size="1" color="FFFFFF"><b></b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"><b>Fone Representante 1</b></font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">E-mail Representante 3</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><div align="center"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font></b></font></div> <div align="left"></div> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("repres3")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("fonecontato3")%> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("email3")%> </font></b></font></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font color="FFFFFF" size="1" face="Verdana"><b>Valor da Mensalidade</b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"> </font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font><font size="1"><b><font color="#000000" size="-7" face="Arial, Helvetica, sans-serif"> <%Response.write formatnumber(objRS("valor"),2)%> </font></b></font><font color="#000000"> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"> </td> <td height="1" align="center" style="border-style: solid; border-width: 2"> </td> </tr> <tr bgcolor="#FF9900"> <td height="1" colspan="4" align="center" style="border-style: solid; border-width: 2"> </td> </tr> <% 'Movendo para o proximo registro objRS.MoveNext Wend %> </table> </td> </tr> </table> </form> </td> </tr> </table> </td> </tr> </table> </div> <% objRs.close objConn.close Set objRs = Nothing Set objConn = Nothing %> </div> </body> </html>[]'s Notax
Link para o comentário
Compartilhar em outros sites
10 respostass 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.