Mostrar evento do dia, ASP, Dream e Access

[Leebano 0]

Taí mano, pediu, postei, rsrsrs... ^_^ você disse que tem como fazer o sistema para mostrar os eventos relacionados ao dia corrente pelo Dream. Eu aprendi a fazer ASP+BD no dream, mas isso eu não sei de verdade... Como seria? Qual seria a estrutura do BD? Quais os recordSets? e as Strings?Abraços, e espero ver isso aqui, rsrsrs...Lee ^_^

[mx loco 1]

Bando de dados:

 

tabela: Id= atonumeração

dia= numero

mes= mes

evento= texto

 

conexão: evento

 

record set para mostrar evento.

 

click no bt advanced... e configure a seguir.

 

Name= rs_ver

Connection= evento

sql=

SELECT * FROM curriculo WHERE dia = ver_dia AND mes = ver_mes

Variables 01= ver_dia - day(now) - Request("MM_EmptyValue")

Variables 02= ver_mes - month(now) - Request("MM_EmptyValue")

 

onde ver_dia e ver_mes é o nome das variáveis.

onde Day(now) e Month(now) é o Default value

onde Request("MM_EmptyValue") é run-time value

 

o restante e so clikar nos itens do record set e colocar no DW...

 

kara... tenta aii qualquer coisa.. e so postar novamente

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Leebano 0]

Fiz como você falou, inclusive com os mesmo nomes que colocou no exemplo, mas tá retornando erro de página na linha 26 que é essa:

 

rs_ver.Open()

 

O código ficou assim:

<%Dim rs_ver__ver_mesrs_ver__ver_mes = "month(now)"If (Request("MM_EmptyValue") <> "") Then   rs_ver__ver_mes = Request("MM_EmptyValue")End If%><%Dim rs_verDim rs_ver_numRowsSet rs_ver = Server.CreateObject("ADODB.Recordset")rs_ver.ActiveConnection = MM_conn_Eventos_STRINGrs_ver.Source = "SELECT *  FROM datas  WHERE dia = " + Replace(rs_ver__ver_dia, "'", "''") + " AND mes = " + Replace(rs_ver__ver_mes, "'", "''") + ""rs_ver.CursorType = 0rs_ver.CursorLocation = 2rs_ver.LockType = 1rs_ver.Open()rs_ver_numRows = 0%>

[mx loco 1]

ai kara to mandando o email pra ti...neste endereco que ta ai enbaixo...leebano@hotmail.com,com arquivo zip... com os exemplos... da uma olhada...

[Leebano 0]

Seguinte Loco, meu e-mail do hotmail tá uma bustha... ^_^ Manda os arquivos no outro e-mail do UOL.Abraços,Lee.

[mx loco 1]

ai kara.. ja foi pro email da uol ja...

[mx loco 1]

ai leebano gostaria de saber se a parada funcionou ai legal...?

[Leebano 0]

Está dando erro na linha 45

   <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(rs_ver.Fields.Item("evento").Value)%></font></td>

E provavelmente será o mesmo erro que ocorrerá na linha 46

<td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(rs_ver.Fields.Item("dia").Value)%> / <%=(rs_ver.Fields.Item("mes").Value)%></font></td>

Mesmo refazendo as ligações, dá o mesmo erro que é esse:

 

Tipo de erro:

ADODB.Field (0x800A0BCD)

BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual.

/bd/ver.asp, line 45

[mx loco 1]

olha so lee...e que se naum tiver nenhum registro do dia atual... acorrera este erro mermo...mas isso e bem simples... e so você colocar um Show region...se e que você me entende...