Pular para o conteúdo
Visualizando 3 posts - 1 até 3 (de 3 do total)
  • Autor
    Posts
  • #82715
    Anônimo

      Tenho uma função que me retorna uma variavel tipo vetor.
      Só que no codigo(ASP) não estou conseguindo recuperar o seu conteudo.
      Segue parte do codigo, se alguem puder me ajudar neste codigo desde obrigada.

      Dim vetor(4)
      connDB.Open

      Set cmdBusca = Server.CreateObject(“ADODB.Command”)
      with cmdBusca
      .ActiveConnection = connDB .Parameters.Append .CreateParameter
      (“Codigo”,adInteger,adParamInput,,var_busca)
      .Parameters.Append .CreateParameter (“codigo”,adInteger,adParamOutput,5)
      .Parameters.Append .CreateParameter(“nome”,adVarChar,adParamOutput,40)
      .Parameters.Append .CreateParameter (“endereco”,adVarChar,adParamOutput,40)
      .Parameters.Append cmdBusca.CreateParameter(“dtcadastro”,adDate,adParamOutput,10)
      .CommandText = “FUNCTION_BUSCA”
      .CommandType = adCmdStoredProc
      .Execute
      end with

      vetor(0) = cmdBusca.Parameters(“var_Cliente.Codigo”)
      vetor(1) = cmdBusca.Parameters(“var_Cliente.Nome”)
      vetor(2) = cmdBusca.Parameters(“var_Cliente.Endereco”)
      vetor(3) = cmdBusca.Parameters(“var_Cliente.DtCadastro”)
      for i=0 to 4
      Response.Write vetor(i)
      next

      #82716
      LoadingXp
      Participante

        Nao entendi sua pergunta…

        Verifique se a FUNCTION retorna resultados, se sim vc elimina o problema do Oracle.

        Depois faça pequenos response.writes para exibir o conteudo.

        Abraços.

        #82719
        Anônimo

          LoadingXp, dentro do DB a função funciona perfeitamente.
          O problema e o seguinte:
          Se a função me devolve uma variavel com 1 registro e diversos campos, ou seja ela vai me devolver é um array.
          Daí codifiquei assim:
          LoadingXp, dentro do DB a função funciona perfeitamente.
          O problema é o seguinte:
          Se a função me devolve uma variavel com 1 registro e diversos campos, ou seja ela vai me devolver é um array.
          Daí codifiquei assim:

          Dim Array(4)
          ……..
          ……..Bloco de codigos
          ……..

          vetor(0) = cmdBusca.Parameters("var_Cliente.Codigo") 
          vetor(1) = cmdBusca.Parameters("var_Cliente.Nome") 
          vetor(2) = cmdBusca.Parameters("var_Cliente.Endereco") 
          vetor(3) = cmdBusca.Parameters("var_Cliente.DtCadastro") 
          for i=0 to 4 
          Response.Write vetor(i) 
          next
          

          Só que não esta me devolvendo nada queria saber se esta logica
          esta correta

        Visualizando 3 posts - 1 até 3 (de 3 do total)
        • Você deve fazer login para responder a este tópico.