Eres la visita número:
<%
Dim variable
Set oConn = Server.CreateObject ("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("/Escritura/ofiserma.mdb")
sql = "SELECT * FROM Contadores WHERE tipo = 'inicial'"
Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.LockType = 3
RS.Open sql, oConn
if Session("visitado")="" then
variable=(RS.Fields.Item("visitas").Value)
variable=variable+1
Response.Write variable
RS.Fields.Item("visitas").Value=variable
RS.Update
Session("visitado")=TRUE
else
Response.Write RS.Fields.Item("visitas").Value
end if
Rs.Close
oConn.Close
%>
Memoria Usb
USB PenDrive 2.0 4GB (incluye Canon L.P.I.)
9,80
USB PenDrive 2.0 8GB (incluye Canon L.P.I.)
15,50
USB PenDrive 2.0 16GB (incluye Canon L.P.I.)
21,50
USB PenDrive 2.0 32GB (incluye Canon L.P.I.)
39,50
USB PenDrive 2.0 64GB (incluye Canon L.P.I.)
125,00
Key Hi-Speed Store N Go USB 4GB
9,95
Key Hi-Speed Store N Go USB 8GB
19,50
Consultar otras marcas
PRECIOS EN EUROS - IVA 18% No Incluido
Precios sujetos a variación válidos salvo error u misión
