Preguntas frecuentes para registrar marcas Registro de Marcas en Bolivia

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% If Len(Request.Cookies("MiPais")) = 0 Then response.Redirect("bienvenidos.asp") End If %> <% Dim MiPais Dim MiPais_cmd Dim MiPais_numRows Set MiPais_cmd = Server.CreateObject ("ADODB.Command") MiPais_cmd.ActiveConnection = MM_Latintrademark_STRING MiPais_cmd.CommandText = "SELECT * FROM paises WHERE ((ID_pais) = '"&Request.Cookies("MiPais")&"')" MiPais_cmd.Prepared = true Set MiPais = MiPais_cmd.Execute MiPais_numRows = 0 %> <% If MiPais.EOF Then response.Redirect("bienvenidos.asp") End If %> <% Dim Datos Dim Datos_cmd Dim Datos_numRows Set Datos_cmd = Server.CreateObject ("ADODB.Command") Datos_cmd.ActiveConnection = MM_Latintrademark_STRING Datos_cmd.CommandText = "SELECT * FROM faq WHERE ((Idioma) = '1') ORDER BY Pregunta ASC" Datos_cmd.Prepared = true Set Datos = Datos_cmd.Execute Datos_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Datos_numRows = Datos_numRows + Repeat1__numRows %> Preguntas frecuentes para registrar marcas Registro de Marcas en Bolivia

Preguntas Frecuentes

<% i = 1 While ((Repeat1__numRows <> 0) AND (NOT Datos.EOF)) %>

<%=(Datos.Fields.Item("Pregunta").Value)%>

<%=Replace((Datos.Fields.Item("Respuesta").Value),VbCrLf,"
")%>

<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Datos.MoveNext() i = i + 1 Wend %>

<% Datos.Close() Set Datos = Nothing %> <% MiPais.Close() Set MiPais = Nothing %>