<% Function ZeroData(dLab) aa = DatePart("yyyy",t) aL = Right(aa,2) ml = DatePart("m",t) ml = Right(("0" & ml),2) dl = DatePart("d",t) dl = Right(("0" & dl),2) hl = DatePart("h",t) hl = Right(("0" & hl),2) nl = DatePart("n",t) nl = Right(("0" & nl),2) sl = DatePart("s",t) sl = Right(("0" & sl),2) dLab = dL & "/" & mL & "/" & aa hLab = hL & ":" & nL End Function id = CLng(request.querystring("id")) dt = request.querystring("dt") set conn = server.createobject("adodb.connection") conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& _ Server.MapPath ("../Dados/arquetipo.mdb")&";Persist Security Info=False" SQL = "SELECT * FROM news WHERE chave = " & id SET rs = conn.execute(SQL) t = rs("NW_dat") Call ZeroData(dLab) vMan = rs( "NW_man" ) vSub = rs( "NW_sub" ) vLnk = rs( "NW_lnk" ) vTxt = rs( "NW_txt" ) vFt1 = rs( "NW_ft1" ) vFt2 = rs( "NW_ft2" ) rs.close conn.close %>
home a editora os autores o catálogo as livrarias as notícias o contato

<%=LCase(vMan)%>
<%=vSub%>


fio <%If vFt2 <> "editoralandmark.jpg" Then%>



fio <%End If%>

<%=vLnk%>
<%=dt%>
 <%=dLab%> - <%=vTxt%>
Rua Alfredo Pujol, 285 - 12° andar - Santana - 02017-010 - São Paulo - SP
Tel.: +55 (11) 6011-2566 / +55 (11) 6950-9095 - e-mail: editora@editoralandmark.com.br
fio
© copyright Editora Landmark 2001-2007 site desenvolvido por Arquétipo Design+Comunicação