% ' Pick a tip between 1 and 70 to display in the page Randomize TipNumber = Int(Rnd*70) ' Open the file with the 70 tips in it Set FileObject = Server.CreateObject("Scripting.FileSystemObject") Set Instream = FileObject.OpenTextFile (Server.MapPath ("/") & "\anecdotas.txt", 1, FALSE, FALSE) ' Skip the tips before the tip you want to display in the page For i = 1 to TipNumber -1 InStream.SkipLine() Next ' Assign the variable TipOfTheDay to the tip randomly selected above Anecdotas = Instream.ReadLine %>
María José Alcalá y Azul Almazán de México ejecutan una pica abierta en tándem
femenino sincronizó 10m plataforma final de la competición buceando el 28 de septiembre
de 2000 en el Centro Acuático Internacional durante Sydney 2000 - Juegos Olímpicos. China ganó la medalla del oro, Canadá tomó la plata y el bronce fue a Australia. México terminó 8.
|
Material compilado y supervisado
por
|
|