|
Nº de visitas
|
|
<%
'Conectamos a la BD.
Set ConexionBD = Server.CreateObject("ADOdb.Connection")
ConexionBD.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & Server.Mappath("tecnocom.mdb")
sql="Select * from contador"
Set RS = ConexionBD.Execute(sql)
sql="Select Max(id) as maximo from contador"
Set RS = ConexionBD.Execute(sql)
if modulo=1 then
max_id=rs("maximo")+1
else
max_id=rs("maximo")
end if
if modulo=1 then
sql="Update contador set id="&max_id
Set RS = ConexionBD.Execute(sql)
end if
contador=max_id
%>
<%=contador%>
|
|
|
|
Servicios Tecnológicos para Pequeñas y Medianas Empresas: Una solución Integral para Su Empresa
|
PRESENTACIÓN
Tecnokey, nace como una empresa que pretende cubrir las necesidades de Usuarios y Empresas en el Sector de la Informática, desde el servicio individualizado y personal de un usuario doméstico, hasta Soluciones Integrales para la Pequeña y Mediana Empresa. Siempre con el Objetivo Constante y Definido de prestar el mejor Servicio con la mayor Garantía.
En nuestros servicios podrá encontrar una alta profesionalidad técnica, gracias a la sólida y continua formación en las Nuevas Tecnologías de la Información. A esta ambiciosa actitud de continua superación, tenemos que sumar la singular atención y colaboración que ofrecemos a todos nuestros clientes, respondiendo con soluciones a las necesidades de Gestión que pueda tener en su labor empresarial.
Nuestros servicios abarcan áreas como redes, comunicaciones y seguridad informática. Además estamos presentes en el área de venta de equipos e insumos computacionales
Volver
|
|
|