<% OPENDB()
lang="SP"
idcat = Request.QueryString("idcat")
idfam = Request.QueryString("idfam")
if idfam="" then
idfam="6"
texto="Seleccione Tipo"
end if
'medida=len(idfam)
'if medida="9" then
'idfam=right(idfam,2)
'else
'idfam=right(idfam,1)
'end if
'idfam= cstr(idfam)
SQL="SELECT * FROM FamiliasSP WHERE ID = '" & idfam & "'"
Set result = conn.Execute(sql)
SQL="SELECT * FROM ProductosSP WHERE ID = '" & id & "'"
Set product = conn.Execute(sql)
SQL="SELECT * FROM FamiliasSP"
Set result2 = conn.Execute(sql)
SQL="SELECT * FROM ProductosSP WHERE IDfamilia=" & idfam & " or IDfamilia2=" & idfam & " or IDfamilia3=" & idfam & " order by orden"
Set masproduct = conn.Execute(sql)
%>
RIMAX
