cruel

[pfr 0]

Galera tenho uma bd q é oseguinteTenho nele hora inicial e hora finalDigamos q um dos campos esteja hora_inicial = 08:00 e hora_final = 12:00 e assim sucessivamente em intervalosComo monto o select pra mostrar q se a hora é maior q 08 e menor q 12 entao me mostre o registro?

[Mário Monteiro 179]

SELECT CAMPO FROM TABELA WHERE hora_inicial < HORA AND hora_final > HORAonde hora é a que você quer ver se estar no intervalo

[pfr 0]

Cara dá esse erro olha

 

to até imprimindo o select mas naum tá tendo jeito...

 

ASP

[*]

 

[*]SELECT * FROM horarios WHERE hora_inicial < '10:39:29' AND hora_final > '10:39:29' 

 

[*]Microsoft JET Database Engine error '80040e07' 

 

[*]

 

[*]Data type mismatch in criteria expression. 

 

[*]

 

[*]/no_ar_bd.asp, line 14 

 

[*]

[Mário Monteiro 179]

que tipo de dados estão estes campos??

[pfr 0]

Tipo hora..

[Mário Monteiro 179]

e o db qual é??

[DackAle 0]

ASP

[*]SELECT * FROM horarios WHERE hora_inicial < #10:39:29# AND hora_final > #10:39:29# 

 

use o #, para campo tipo data e afins, testa ae ;)

[pfr 0]

ei dack ale dá esse erro aqui olhaResponse object error 'ASP 0251 : 80004005' Response Buffer Limit Exceeded /no_ar_bd.asp, line 0 Execution of the ASP page caused the Response Buffer to exceed its configured limit.

[Salgado 4]

ei dack ale dá esse erro aqui olha

 

Response object error 'ASP 0251 : 80004005'

 

Response Buffer Limit Exceeded

 

/no_ar_bd.asp, line 0

 

Execution of the ASP page caused the Response Buffer to exceed its configured limit.

<{POST_SNAPBACK}>

Verifique se não é a falta de um MoveNext durante a listagem do BD.

[pfr 0]

Galera deu e nao deu certo heheTem algumas horas q da certo e outras nao, fica em branco mas não da erro tbemPq será?

[Salgado 4]

Pode mandar o Link dele OnLine? Ou está só em teste local?

[pfr 0]

http://www.93fmapucarana.com.br/no_ar_bd.asp

[Salgado 4]

Em branco, parece que não tem absolutamente nada de ASP.

[pfr 0]

Esse é meu codigo olha

 

ASP

[*]

 

[*]<%

 

[*]Set objCol = Server.CreateObject("ADODB.Connection")

 

[*]objCol.Open fm_noar

 

[*]

 

[*]horaatual = time()

 

[*]diaatual = weekday(now())

 

[*]ComandoSQL = "SELECT * FROM horarios h, locutores l WHERE h.id_loc = l.id AND h.hora_inicial >= #"& horaatual &"# AND h.hora_final < (select hora_final from horarios where h.id_loc = l.id) AND diasemana = "&diaatual&"" 

 

[*]Set objRS = Server.CreateObject("ADODB.Recordset")

 

[*]objRS.CursorLocation = 2

 

[*]objRS.CursorType = 1

 

[*]objRS.LockType = 1

 

[*]objRS.Open ComandoSQL, objCol,,, &H0001

 

[*]

 

[*]

 

[*]

 

[*]Do While not objRS.eof

 

[*]%>

 

[*]<table width="147" border="0" align="center" cellpadding="0" cellspacing="2">

 

[*] <tr> 

 

[*] <td width="969" valign="top">

 

[*]<div align="center"><img src="<%=objRS("foto")%>" width="130" height="130"></div></td>

 

[*] </tr>

 

[*] <tr> 

 

[*] <td valign="top"><table width="100%" border="0" cellspacing="1" cellpadding="0">

 

[*] <tr> 

 

[*] <td width="11%"><img src="img/seta_am.gif" width="15" height="15"></td>

 

[*] <td width="80%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong><%=objRS("locutor")%></strong></font></td>

 

[*] </tr>

 

[*] </table></td>

 

[*] </tr>

 

[*] <tr> 

 

[*] <td valign="middle"><table width="100%" border="0" cellspacing="1" cellpadding="0">

 

[*] <tr> 

 

[*] <td width="11%"><img src="img/seta_am.gif" width="15" height="15"></td>

 

[*] <td width="80%"><font color="#FFFFFF" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=objRS("nome")%></font></td>

 

[*] </tr>

 

[*] </table></td>

 

[*] </tr>

 

[*]</table>

 

[*]  <% objRS.movenext

 

[*]  loop

 

[*] objRS.close

 

[*] Set objRS = nothing %>

[pfr 0]

Entao A.alves to usando o q você me passou, o lance é o seguinte, pode entrar agora no end q funciona, só que das 20h a 00h ele simplesmente aparece em branco, como se eu nao tivesse nada no banco de dados, muito estranho né, alguém tem alguma sugestão?