Vocabulario Taurino - Burladerodos

<% @Language="VBSCript" %> Vocabulario Taurino - Burladerodos <% Dim strSQL Dim cnn Dim rst Dim strCnn Set cnn=Server.CreateObject("ADODB.Connection") Dim Username Dim Password Username="bulkburladero" Password="bulk" strCnn="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" & Username strCnn=strCnn & ";Password=" & Password strCnn=strCnn & ";Initial Catalog=burladerodos;Data Source=(local)" cnn.Open strCnn Set rst=Server.CreateObject("ADODB.Recordset") %>

<% Set Ad = Server.CreateObject("MSWC.Adrotator") Response.Write(Ad.GetAdvertisement("adrot.txt")) %>

Vocabulario Taurino

<% Dim Dia Dim qDia Dim Mes Dim Anio Dim Fecha Fecha=Now() qDia=weekday(Fecha) If qDia=1 then qDia="Domingo" Elseif qDia=2 then qDia="Lunes" Elseif qDia=3 then qDia="Martes" Elseif qDia=4 then qDia="Miércoles" Elseif qDia=5 then qDia="Jueves" Elseif qDia=6 then qDia="Viernes" Elseif qDia=7 then qDia="Sábado" End If Dia=Day(Fecha) Mes=Month(Fecha) If Mes=1 then Mes="Enero" Elseif Mes=2 then Mes="Febrero" Elseif Mes=3 then Mes="Marzo" Elseif Mes=4 then Mes="Abril" Elseif Mes=5 then Mes="Mayo" Elseif Mes=6 then Mes="Junio" Elseif Mes=7 then Mes="Julio" Elseif Mes=8 then Mes="Agosto" Elseif Mes=9 then Mes="Septiembre" Elseif Mes=10 then Mes="Octubre" Elseif Mes=11 then Mes="Noviembre" Elseif Mes=12 then Mes="Diciembre" End If Anio=Year(Fecha) Response.Write "" & qDia & ", " & Mes & " " & Dia & ", " & Anio &"." Response.Write " " %>

INICIO

ACTUALIDAD

En Portada

Carteles

Entrevistas

Reportajes

Especiales

OPINIÓN

El Fundón

Editorial

El Repaso

Opinión

Tribuna libre

Correo del lector

TEMÁTICOS

Rejoneadores

Novilleros

Cuadrillas

DOCUMENTACIÓN

Normativa

Diccionario

Enlaces

NOSOTROS

Quiénes Somos

Corresponsales

Normas de Estilo

Defensor del
Usuario

Políticas del
Sitio

Cont@ctanos

<% Set Ad = Server.CreateObject("MSWC.Adrotator") Response.Write(Ad.GetAdvertisement("136x136.txt")) %>

Seleccione la letra inicial de la palabra que desea consultar:

[ A ] [ B ] [ C ] [ D ] [ E ] [ F ] [ G ] [ H ] [ I ] [ J ] [ K ] [ L ]
[ M ] [ N ] [ O ] [ P ] [ Q ] [ R ] [ S ] [ T ] [ U ] [ V ] [ Z ]

Uro:	Bóvido salvaje abundantísimo en la Europa Central en la época diluvial, extinguiéndose la especie como tal en 1627.
Utrero:	Res que tiene tres años

FREE counter and Web statistics from sitetracker.com