Ir para conteúdo
Fórum Script Brasil

Thiago Albuquerque

Membros
  • Total de itens

    9
  • Registro em

  • Última visita

Sobre Thiago Albuquerque

Contatos

  • MSN
    thiago.l.albuquerque@hotmail.com

Perfil

  • Gender
    Male

Thiago Albuquerque's Achievements

0

Reputação

  1. Bom dia, Estou tentando ordenar o retorno de uma consulta mas não estou conseguindo. Estou usando Sort, mas quando mando imprimir os dados ordenados do ADO Recordset só consigo visualizar o primeiro elemento. Uns dos problemas que estou tendo é que o retorno dessa consulta vem de um DLL que não tenho acesso ao seu fonte, essa DLL executa a query e me retorna os dados. Abaixo segue o código que estou utilizando para tentar ordenar: Dim rs As ADODB.Recordset . . . 'Aqui é realizada uma chamada de um metodo que se encontra em uma DDL e o mesmo me retorna os dados da consulta. rs.Sort = "COLUNA" Se alguém poder me ajudar, ficaria muito grato. Atenciosamente,
  2. Danleonhart, eu acabei de resolver o o problema. Obrigado!
  3. Crispim, Esse Call é uma chamada de uma Sub e por sua vez esta faz uma simples operação: buscar dados numa tabela e atribuir as variáveis que eu citei anteriormente (Destination, Client , UserID e Password). Caro, pode ser que até essa forma citada por você seja uma melhor forma de instanciar o objeto, mas esse não é meu caso. Estou com um código que não foi desenvolvido por mim e estou com alguns problemas, pois esse sistema é bastante complexo. Assim, não posso realizar alterações no código. Desde já agradeço pela usa ajuda.
  4. Boa Noite, Estou com um erro ao tentar criar um objeto. Abaixo segue o trecho do código: Public Function Conecta() As Object On Error GoTo Erro Call ConfiguraParametros Set obj = CreateObject(DLL) With Simulador .Destination = Destination .Client = Client .UserID = UserID .Password = Password End With Set Conecta = obj If Not (CompSapDcom Is Nothing) Then GravaLog "nothing: ", False Set CompSapDcom = Nothing End If Erro: App.LogEvent "Erro: " & Err.Number & " - " & Err.Description & " (" & Err.Source & ")" & vbCrLf, 1 End Function A Call ConfiguraParametros traz alguns parametros e um desses é o nome da DDL que estou tentando criar o objeto. E os campos: Destination, Client , UserID e Password também vem dessa Call. alguém tem ideia de o que pode está acontecendo? Desde já agradeço!
  5. Valeu Crispim. Eu tava dando uma olhada e esse "_" não afeta a chamada da DLL. Desde já agradeço a ajuda de todos.
  6. beleza, abaixo segue um link de um exemplo que criei: http://www.4shared.com/file/tg7Qbv8f/Teste.html Fiz o mesmo procedimento para instalar no servidor e o nome da classe mudou, adicionado o "_" no inicio do nome da classe Desde já agradeço.
  7. Eu não sei porque o meu fica desta forma. Fica assim em todas as classes e o SO que eu to usando é o XP 32 Bits e tb já testei no 2000.
  8. Eu olhei nesse caminho que você falou mais não tá com o underline. Lá tem o nome do Projeto. Em relação a ter outra dll registrada com o mesmo nome da classe eu já fiz essa teste e mas só com uma dll ele aparece com o underline. O problema não tá no nome do Projeto e sim no nome da classe. O meu projeto tá assim: --Teste (Teste.vbp) -- -- Class Modules -- -- -- ClasseTeste.cls Quando eu compilo e registro a classe fica aparecendo assim: _ClasseTeste no servidor. Não sei mesmo porque essa classe fica desta forma.
  9. Boa tarde, Faz uma pouco tempo que estou programando em Visual Basic 6 e tenho uma dúvida. Após a compilação do código, pego a DLL e instalo no Servidor de Componentes. Após isso, identifiquei que o nome da classe com se encontra dentro da DDL mudou o nome, ou seja, apareceu um "_" antes do nome dela. Um exemplo: Nome da classe: MinhaClasse.cls Após compilada e gerada a DLL, instalo a mesma no servido de componentes e ela fica da seguinte forma: _MinhaClasse Alguém sabe me responder porque fica desta forma? Desde já agradeço.
×
×
  • Criar Novo...