Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

edsunpaul

Select com Array

Por , em ASP Clássico

Recommended Posts

edsunpaul    0

edsunpaul
Postado

Olá pessoal,

Tenha um calendário e quero deixá-lo dinamico com o asp. Sei fazer select simples e pesquisando semanas na net descobrir que o meu caso se resolve como especificado no artigo http://imasters.com.br/noticia/675/asp/usar_arrays_para_armazenar_dados_num_bd/

 

Mas não consegui solucionar, alguem poderia me ajudar?

Abaixo seguei como deve ser exibido:

 

<?xml version="1.0" encoding="ISO-8859-1"?>
<calendar color="72A372">
  <year value="2010">
    <month value="9">
      <day value="7">
        <label>Titulo1</label>
        <description>Descricao1</description>
      </day>
      <day value="13">
        <label>Titulo2</label>
        <description>Descricao2</description>
      </day>
    </month>
    <month value="10">
      <day value="6">
        <label>Titulo3</label>
        <description>Descricao3</description>
      </day>
      <day value="7">
        <label>Titulo4</label>
        <description>Descricao4</description>
      </day>  
    </month>
  </year>
</calendar>

Então, fiz este script, mas se vocês observarem o dia 2/5/2010 tem que estar dentro do mês 5, se repetir o calendário não lê este dia.

 

<?xml version="1.0" encoding="ISO-8859-1"?>
<calendar color="72A372">

  <year value="2010">
<%
datai = ("01/01/2010") 
dataf = ("30/12/2010") 

call abre_conexao
SQL = "SELECT * FROM agenda WHERE dataI Between #"& Datai &"# AND #"& Dataf &"# order by dataI, id"

call executarsql(SQL)
do while Registros.eof=false


data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)

%>
    <month value="<%=dataCADmes%>">
    
		<day value="<%=dataCADdia%>">
        	<label><%=registros("titulo")%></label>
        	<description><%=registros("informacao")%></description>
		</day>
        
	</month>

<%
Registros.movenext
loop
call fecha_conexao  
%>

Obrigado

 

Edson

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

ele esta gerando algum erro ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

edsunpaul    0

edsunpaul
Postado

Xan,

 

É o seguinte: o select funciona legal, mas ele monta o xml errado para ser exibido no calendário.

Ele monstra o mês duplicado (veja o caso abaixo).

 

Forma que hoje mostra:

<month value="4">
      <day value="16">
        <label>Evento do dia 16 de abril</label>
        <description>Descricao</description>
      </day>
</month>
<month value="4">
      <day value="17">
        <label>Evento do dia 17 de abril</label>
        <description>Descricao</description>
      </day>
</month>
<month value="5">
      <day value="2">
        <label>Evento do dia 2 de maio</label>
        <description>Descricao</description>
      </day>
</month>

Mas preciso que exiba todos eventos dentro do mesmo mês (<month>)

 

Forma correta:

 

<month value="4">
      <day value="16">
        <label>Evento do dia 16 de abril</label>
        <description>Descricao</description>
      </day>
      <day value="17">
        <label>Evento do dia 17 de abril</label>
        <description>Descricao</description>
      </day>
</month>
<month value="5">
      <day value="2">
        <label>Evento do dia 2 de maio</label>
        <description>Descricao</description>
      </day>
</month>

 

Xan o que você acha?

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

dá um response.write na string SQL, para ver o k esta sendo passado

response.write(SQL)
response.end()

Compartilhar este post

Link para o post
Compartilhar em outros sites

edsunpaul    0

edsunpaul
Postado

Xan,

 

Veja se pode me ajudar:

Bando de dados > tabela AGENDA campo id-datai-titulo-informacao

 

Não consegui fazer o xml conforme no outro post, mas meu consegui fazer um select para cada mês que volta e monta o xml conforme preciso, mas tive que escrever muito código, acredito que se eu usar IF uma condição teria uma melhor resultado?

 

Fico no aguardo. Obrigado!

 

<?xml version="1.0" encoding="ISO-8859-1"?>
<calendar color="72A372">

<year value="2010">
  
<month value="4">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 4 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>
    
<month value="5">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 5 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>    

<month value="6">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 6 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>    

<month value="7">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 7 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>   

<month value="8">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 8 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>   

<month value="9">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 9 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>   

<month value="10">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 10 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>  

<month value="11">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 11 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month> 

<month value="12">
<%
call abre_conexao 
SQL = "SELECT * FROM agenda Where Month(dataI) = 12 Order By Day(dataI)"

call executarsql(SQL)
do while Registros.eof=false

data_CAD=Registros("dataI")
dataCADmes=month(data_cad)
dataCADdia=day(data_cad)
%>
<day value="<%=dataCADdia%>">
<label><%=registros("titulo")%></label>
<description><%=registros("informacao")%></description>
</day>
<%
Registros.movenext
loop
call fecha_conexao  
%>
</month>            
      
  </year>
</calendar>

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

existe um exemplo que coloquei no fórum, de um calendário que funciona como agenda, poed te ajudar, também, faça uma pesquisa.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

xan quando for assim post sempre o link do tópico

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito