%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Public DSN Public aMarcas7 'Public aVSaMarcas Public aRubros7 'Public aVSaRubros Public nIndice 'Public aVSIndice Public query Public cC 'Texto de la búsqueda Public xR 'Rubro seleccionado Public xM 'Marca Seleccionada Public nCanMar 'Cuenta la cantidad de marcas cC = request.Form("txtBuscado") xR = request.Form("RubroX" ) xM = request.Form("MarcaX" ) nuId = request("Cual") conectar() cargar_rubros_marcas() llenar_recordset() set dbDolar = Server.CreateObject("ADODB.Recordset") queryDolar = "SELECT * FROM Varios" dbDolar.open queryDolar,DSN,1 dbDolar.movefirst xDolar = dbDolar("dolar") dbdolar.close query = "SELECT WebMuestraPrecio, Id, IDC, Num_articu, Moneda, Marca, Modelo, Descripcion, PrecioPublico, FichaTecnica, WebTieneFoto, Video FROM Articulos WHERE Id=" & nuId 'query = "SELECT * FROM Articulos WHERE Id=958" set db = Server.CreateObject("ADODB.Recordset") db.open query,dsn,1 %>
|
||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||
RockCenter®.
Talcahuano 180, Buenos Aires, Argentina. Tel: (54-11) 4381-8518 | Copyright
2006 - RockCenter.com.ar Todos los derechos reservados | info@rockcenter.com.ar | Desarrollado por •• ivang & Heaven•• |