• Accesorios
• Almacenamiento
• Armarios Ignifugos
• Bluetooth
• Calculadoras
• Cámaras y Marcos Digitales de Fotografia y Video
• CD-R, CD-RW, DVD-R, DVD-RW
• Cizallas
• Consumibles Brother
• Consumibles
• Consumibles y Accesorios Olympia
• Copiadoras Digitales Toshiba-Olympia
• Destructoras
• Edición de Video Pinnacle y captura.
• Electrónica Musical
• Equipos Multifunción
• Fax Brother
• Fax Canon/Sansmg
• Impresoras
• Impresoras Matriciales
• Maletines
• Máquinas de escribir
• Máquinas de estenotipia
• Memoria USB
• Memory Card
• Mobiliario
• Monitores
• OFERTAS PUNTUALES
• Pc's
• Pc's Acer
• PDA's
• PC ´S Y PORTATILES APPLE
• Plastificadoras, Plegadoras/Abrecartas
• Productos
• Proyectores y Pantallas
• Portátiles en OFERTA
• Redes y Comunicaciones OvisLink
• Redes y Comunicaciones Connection
• Registradoras
• Regrabadoras Cd y Dvd
• Reproductores MP3/MP4
• Rotuladoras
• Sistema de Dictado
• Sai's-Controladoras
• Scanners
• Software
• Tabletas Digitalizadoras
• Teléfonos Libres
• Televisores LCd - PLASMA
• Top Value HP
• Video Vigilancia
• V-Ofertas del mes
• Webcam

• Cajas
• Dvd, Disqueteras-Lectores
• Discos duros
• Memorias
• Microprocesadores
• Placas Base
• Ratones, Teclados y Altavoces
• T Gráficas/ Sonido, Comunicaciones-Acceso Inalambrico
• Capturadoras TV y Modems

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 %>