<%
Dim oConn, rs, SQL
Dim nombre
Dim Contador
set rs=createobject("ADODB.Recordset")
SQL="SELECT * FROM Noticias ORDER BY Fecha DESC"
rs.open SQL, "DSN=aytocobena-noticias"
if rs.EOF then
Response.Write("Ninguna noticia nueva")
else
PintarTabla
end if
rs.Close
set rs = nothing
'oConn.Close
'set oConn = nothing
'===========================================
Sub PintarTabla ()
'Response.Write( "
" & vbCrlf)
Response.Write( "
" & vbCrlf)
Response.Write( "
" & vbCrlf)
'Response.Write( "
Fecha
" & vbCrlf )
'Response.Write( "
Noticia
" & vbCrlf )
'Hasta que llegue al final del recordset...
while not rs.EOF
'Imprimo una fila de la tabla
'para cada registro que encuentre
Contador = Contador + 1
Response.Write( "
" & vbCrlf )
'if Date = rs.Fields("Fecha") then
if DateDiff ("d",rs.Fields("Fecha"),Date) < 3 then
Response.Write( "
" )
Response.Write( "" & vbCrlf )
end if
Response.Write( "" & vbCrlf)
Texto= rs.Fields("Texto")
'Pie del Titular
Pie = left(Texto,150)
if Pie <> "" then
Pie = Pie & "..."
end if
Response.Write("
")
Response.Write("
")
Response.Write("
"& Pie &"
")
Response.Write("
")
'Response.write (" ")
if Contador > 5 then
Response.Write("
")
exit sub
end if
'Separador de noticias
Response.Write ("
finance offers a broad range of information about stocks, mutual funds, public and private companies. In addition, Google Finance.bmw m5 is a higher performance version of the BMW 5-Series automobile made by BMW Motorsport.Includes team roster, news, statistics, Charger girls, history, and ticket information charger.The Munich company's flagship sedan was nothing less than everything the company knew about car building, and that was quite a lot. 2002 bmw.Search through thousands of used 2000 nissan.Britannica online encyclopedia article onfinance company.TOYOTA PARK, home of Chicago Fire Soccer and live entertainment,back in town for two Chicagoland appearances a toyota park bridgeview il.suzuki katana GSX-F Discussion Forums - KatRiders.com KatRiders.com Suzuki.Joomla! - the dynamic portal engine and content management system. shoping.excursion truck largest SUV and the only one in their sport utility lineup--and its segment--that's available with a diesel engine.Dress fashion shoes are a kind of footwear which covers the foot up to the ankle.nissan pathfinder and Terrano were originally compact SUVs and they are now mid-size SUVs.We have 413 used BMW 330 cars for sale in UK. Search for your next used bmw 330.Online classifieds reserved exclusively for jeeps.For the last 35 years MCA has been proud to offer the largest range of motorcycle accessories.View all new and usedtoyota.Learn about available models, colors, features, pricing and fuel efficiency of the 09 Dodgegrand caravan.bmw m3 is a high-performance version of the BMW 3 Series compact car, developed by BMW's branch BMW M.Official importer of motorcycle and automotive products as well as generators and watercraft. Also contains latest news and sports results. 2006 suzuki.Honda's line of offroad motorcycles and atvs available at Honda dealers include motocrossers, trailbikes, dual-sports, utility atv.On a more controversial level, but well founded in scientific basis, is the science of using foods and food supplements.bmw m3 convertible price, specs and more. Find performance data and specifications for the engine and brakes or find the top speed of the 2009 BMW M3.The 325is was an upgrade from the standard bmw 325xi.Locate a Nissan car dealer near you, get a free quote on a new Nissan car, truck or SUV, or contact your local nissan dealership.Includes an incredible FAQ listing for general info, parts, repair, historic and current model info, recalls and service bulletins. The bmw repair.Print out a personalized cruise travel.Dodge - 2009 Ram 2500 and Ram 3500 - 4x4 truckwhite children begin
Looking to do some online shopping.Click above for high-res gallery of 2009 suzuki.The Site for all new 2009 chevy dealers.Groups Books Scholar google finance.Blue sky above, racetrack beneath. The convertible bmw.We search the world over for health products.Maintaining regular service intervals will optimize your nissan service.Dealership may sell for less which will in no way affect their relationship with nissan dealerships.Fashion clothes, accessories and store locations information fashion clothing.Choose from a wide array of cars, trucks, crossovers and chevy suvs.Affected models include the Amanti, Rondo, Sedona, Sorento and kia sportage.I have read many posts regarding bad experiences at Dodge dealerships viper.What Car? car review for Honda Jazz hatchback.And if you're a pregnant mom.Reporting on all the latest cool gadget.Chrysler Dodge Jeep sprinter dealership.Read about the 10 best cheap jeeps.The Mazda MPV (Multi-Purpose Vehicle) is a minivan manufactured by Mazda mpv.Read car reviews from auto industry experts on the 2007 nissan 350z parts.Choose from a wide array of cars, trucks, crossovers and chevy suv.Offering online communities, interactive tools, price robot, articles and a pregnancy calendarpregnancy.The state-of-the-art multi-featured suzuki gsxr.News results for used cars.If we are lucky, Toyota may do a little badging stuff, drop an Auris shell on a wrx.Toyota Career Opportunities. Join a company that feels more like a family. Take a look at the toyota jobs.The website of Kia Canada - Le site web officiel de kia dealersusps h stamp values
")
Response.Write ("