En CYMSA nos interesa
mantenerte informado de los acontecimientos más
importantes en el mercado de los productos que representamos,
por esto ponemos a tu disposición esta página.
Selecciona la
categoria de tu interés:<%
'Aqui se abre la base de datos
Set DB= Server.CreateObject("ADODB.Connection")
Set RecordDB= Server.CreateObject("ADODB.Recordset")
directorio=Server.MapPath("../cgi-bin")
dbase=directorio &"\cymsadb.mdb"
DB.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & dbase
%>
<%
'aqui cierro la base de datos
DB.Close
Set DB= Nothing%>