DetailPage-MSS-KB

Base de Dados de Conhecimento

Artigo: 191716 - Última revisão: sexta-feira, 7 de Novembro de 2003 - Revisão: 2.0

 

Nesta página

Sintomas

Abrir um conjunto de resultados no código e, em seguida, atribuindo-à propriedade de conjunto de resultados de MSRDC (que está ligado a uma caixa de texto), não irão povoar a caixa de texto.

Resolução

Uma solução é simplesmente adicionar outra linha de código imediatamente a seguir "Definir MSRDC1.ResultSet = rs" que referencia especificamente o campo pretendido para a caixa de texto. Por exemplo, Text1.DataField = "at_nome" deve preencher o primeiro registo na caixa de texto, bem como ligar fisicamente o conjunto de registos a MSRDC. Neste momento, o MSRDC terão a capacidade total de percorrer registos.

Ponto Da Situação

Microsoft confirmou que este seja um erro no Microsoft produtos listados no início deste artigo.

Mais Informação

Passos para reproduzir o comportamento

  1. Crie um projecto EXE padrão no Visual Basic. É criado o Form1 por predefinição.
  2. Vá para/componentes do Project e seleccione o "Microsoft dados controlo remoto 2.0."
  3. Ir para projecto/referências e seleccionar o Microsoft Remote dados "objecto" 2.0.
  4. Largue MSRDC no formulário, bem como uma caixa de texto e CommandButton.
  5. Defina as seguintes propriedades na caixa de texto:

    Origem de dados: MSRDC1
    DataField: at_nome
  6. Cole o código seguinte dentro de eventos Command_Click().

    Nota tem <username> alterar UID <utilizador> e PWD < palavra-passe segura > para os valores correctos antes de executar este código.Make-se de que UID tem as permissões adequadas para efectuar esta operação na base de dados.
          Dim cn As New rdoConnection
          Dim rs As rdoResultset
          cn.CursorDriver = rdUseOdbc
          cn.Connect = "dsn=pubs2;database=pubs;uid=<username>;pwd=<strong password>"
          cn.EstablishConnection rdDriverNoPrompt, False
          Set rs = cn.OpenResultset("Select * from authors", rdOpenDynamic,
          rdConcurValues, rdExecDirect)
          Set MSRDC1.Resultset = rs
          'Text1.DataField = "au_lname"  'need this line of code to actually
                                         'populate the text box.
    
    						
  7. Execute a aplicação.

A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
Palavras-chave: 
kbmt kbbug kbpending KB191716 KbMtpt
Tradução automáticaTradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática… erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 191716  (http://support.microsoft.com/kb/191716/en-us/ )
Partilhar
Opções de suporte adicionais
Fóruns de Suporte da Comunidade Microsoft
Contacte-nos directamente
Encontre um parceiro certificado Microsoft
Loja Microsoft