<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsLineas Dim rsLineas_numRows Set rsLineas = Server.CreateObject("ADODB.Recordset") rsLineas.ActiveConnection = MM_webVempo_STRING rsLineas.Source = "SELECT * FROM tbLineas" rsLineas.CursorType = 0 rsLineas.CursorLocation = 2 rsLineas.LockType = 1 rsLineas.Open() rsLineas_numRows = 0 %> <% Dim rsArticulos Dim rsArticulos_numRows Set rsArticulos = Server.CreateObject("ADODB.Recordset") rsArticulos.ActiveConnection = MM_webVempo_STRING rsArticulos.Source = "SELECT * FROM tbTipos" rsArticulos.CursorType = 0 rsArticulos.CursorLocation = 2 rsArticulos.LockType = 1 rsArticulos.Open() rsArticulos_numRows = 0 %> Venezolana de Mubles para Oficina
 
 
 
 
 
 

VEMPO S.A. Venezolana de Muebles para Oficina. Calle 17 Nº 6-39 Ureña Edo. Táchira Venezuela
Tels +58 - 276 7872769, 7873889, 7870845 - Fax: +58 - 276 7872870 -
e-mail: gerencia@vempo.ne.vet - ventas@vempo.net.ve
<% rsLineas.Close() Set rsLineas = Nothing %> <% rsArticulos.Close() Set rsArticulos = Nothing %>