 |
|
The Mythical Tartessos -
1.100
B.C. --> FIRST COLONIES OF TRADERS The Phoenicians founded
Gadir-Cádiz, opposite Tartessos. The mythical kingdom of Tartessos would become
the legendary "El Dorado" of ancient Mediterranean times, the origin of the wealth
obtained from King Solomon's ships which, according to the Phoenicians and Greeks,
was an illusion, a mixture of reality and fantasy. - 550
B.C. -->
The Guadalquivir
is quoted by Greek sailors on their charts in the year 550 B.C. as the River of
Tartessos.
Having settled in the valley of the River Guadalquivir, the
artery of Tartessos, in the triangle formed today by Huelva, Seville and Cadiz,
and even a little further to the north and south east, the Tartesios came to a
spectacular peak between the VII and VI centuries BC. They obtained metals
like gold, silver and copper from their lands which were ruled by the mythical
King Argantonio. These metals were traded with places in the Mediterranean as
far away as Cyprus or Phoenicia in exchange for luxury items. Their people lived
in small villages formed by circular huts, kept safe within an extremely hierarchical
society ruled by the monarch, an almost sacred figure, and his aristocrats who
supervised production.
A profound crisis began in the VI century B.C.
and continued until the wealthy Tartessos disappeared completely. The lands were
taken over by the Turdetano people who were already a part of Punic or Roman domains.
Their major metal deposits were the Lora del Rio, Camas (Seville), Riotinto (Huelva)
and the Cancho Roano sanctuary in Zalamea de la Serena (Badajoz).
- 206 B.C. -->
Publio Cornelio Escipion uses the Guadalquivir, called Baetis by the Romans, in
his campaigns to move the Carthaginians towards the south. Around the same time,
Italica is founded on a high plain on the right bank of the river, a Roman city
which would enjoy great splendour while it existed -
IV-VII Centuries -->
The final years of the Roman Empire
and the Visigoth rule saw the decline of trading activity in the whole Andalusian
area. A distinguished intellectual of the time, Saint Isidore of Seville, lived
in the city in the V century leaving us his work "Etimologías" (etymologies) among
several others. | |



|
<%
categoria = request.form("categoria")
if categoria = "ac" then
response.write " | "
response.write "Resultados de la Búsqueda.
| "
titular = trim(request.form("titular"))
if titular <> "" then
aTitular = Split(titular, " ")
end if
entradilla = trim(request.form("entradilla"))
if entradilla <> "" then
aEntradilla = Split(entradilla, " ")
end if
texto = trim(request.form("texto"))
if texto <> "" then
aTexto = Split(texto, " ")
end if
dia1 = request.form("dia1")
dia2 = request.form("dia2")
mes1 = request.form("mes1")
mes2 = request.form("mes2")
ano1 = request.form("ano1")
ano2 = request.form("ano2")
if dia1 <> "" then
fechaini = dia1 & "/" & mes1 & "/" & ano1
fechafin = dia2 & "/" & mes2 & "/" & ano2
else
fechaini = ""
fechafin = ""
end if
'se abre conexion con la BD
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=ActividadesAPSevilla;"
'se abre recorset de la tabla de consulta
Set rc = Server.CreateObject("ADODB.Recordset")
Set rc.ActiveConnection = conn
rc.Source = "SELECT * FROM ACTIVIDADES WHERE ELIMINADO = False"
rc.CursorLocation = 2 'adUseServer
rc.CursorType = 0 'adOpenForwardOnly
rc.LockType = 1 'adLockReadOnly
rc.Open
lista="("
do while not rc.EOF
incluir = 1
if isarray(aTitular) then
for i=0 to ubound(aTitular)
if instr(ucase(rc.fields.item("TITULAR")), ucase(aTitular(i))) = 0 then
incluir = 0
exit for
end if
next
end if
if incluir = 1 then
if isarray(aEntradilla) then
for i=0 to ubound(aEntradilla)
if instr(ucase(rc.fields.item("ENTRADILLA")), ucase(aEntradilla(i))) = 0 then
incluir = 0
exit for
end if
next
end if
end if
if incluir = 1 then
if isarray(aTexto) then
for i=0 to ubound(aTexto)
if instr(ucase(rc.fields.item("TEXTO")), ucase(aTexto(i))) = 0 then
incluir = 0
exit for
end if
next
end if
end if
if fechaini <> "" and fechafin <> "" then
if rc.fields.item("FECHA_INICIAL") < cDate(fechaini) OR rc.fields.item("FECHA_INICIAL") > cDate(fechafin) then
incluir = 0
end if
end if
if incluir = 1 then
lista=lista & rc.fields.item("NUMERO") & ","
end if
rc.movenext
loop
if lista="(" then
busqueda = " AND NUMERO = 0"
else
busqueda = " AND NUMERO IN " & left(lista,len(lista)-1) & ")"
end if
rc.Close
set rc = Nothing
conn.Close
set conn = Nothing
end if
'se abre conexion con la BD
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=ActividadesAPSevilla;"
'se abre recorset de la tabla de consulta
Set rc = Server.CreateObject("ADODB.Recordset")
Set rc.ActiveConnection = conn
rc.Source = "SELECT * FROM ACTIVIDADES WHERE ELIMINADO = False " & busqueda & " ORDER BY FECHA_INICIAL DESC, NUMERO"
rc.CursorLocation = 2 'adUseServer
rc.CursorType = 0 'adOpenForwardOnly
rc.LockType = 1 'adLockReadOnly
rc.Open
if rc.bof and rc.eof then
response.write " | "
response.write "No hay Actividades con la selección efectuada.
| "
end if
Do while not rc.EOF
response.write " | "
response.write ""
response.write "| " & rc.fields.item("TITULAR") & " | "
response.write "Desde: " & rc.fields.item("FECHA_INICIAL") & " Hasta: " & rc.fields.item("FECHA_FINAL") & " | "
response.write " "
response.write ""
response.write "" & rc.fields.item("ENTRADILLA") & " | "
if Session("UsuarioActividades") = "" then
response.write " | "
else
'para poder borrar actividades
response.write " | "
end if
response.write " "
rc.movenext
Loop
rc.Close
set rc = Nothing
conn.Close
set conn = Nothing
%> |  |