EXEMPLO: Funções de conversão de variante ARRAYCONVERT.EXE

Traduções de Artigos Traduções de Artigos
Artigo: 250344 - Ver produtos para os quais este artigo se aplica.
Expandir tudo | Reduzir tudo

Sumário

ArrayConvert.exe é um exemplo é utilizado para converter variantes de um tipo para variantes de outro tipo. Por exemplo, se estiver a utilizar o script do Visual Basic (VBScript), estas funções de conversão ajude a converter uma variante que contém uma cadeia de octeto para uma variante que contém uma cadeia hexadecimal.

Mais Informação

O ficheiro seguinte está disponível para transferência a partir do Centro de transferências da Microsoft:
ArrayConvert.exe
O ficheiro ArrayConvert.exe contém os seguintes ficheiros:

Reduzir esta tabelaExpandir esta tabela
ADS.vbpbytes 747
ADS.vbwbytes 35
ArrayConvert.clsbytes 3017
ArrayConvertTest.basbytes 1205
ArrayConvertTest.vbgbytes 67
ArrayConvertTest.vbpbytes 884
ArrayConvertTest.vbwbytes 31
ADS.dllbytes 24,576
ADs.expbytes 996
ADs.libbytes 2536
AdsConvert.vbgbytes 73


Data de edição: 13-Abr de 2000

Para obter informações adicionais sobre como transferir ficheiros de suporte da Microsoft, clique no número de artigo que se segue para visualizar o artigo na Microsoft Knowledge Base:
119591Como obter ficheiros de suporte da Microsoft a partir de serviços on-line
Microsoft procedeu de vírus neste ficheiro. Microsoft utilizou o mais recente software de detecção de vírus que estava disponível na data em que o ficheiro foi publicado. O ficheiro é alojado em servidores com segurança avançada que o ajudam a impedir alterações não autorizadas ao ficheiro. As cinco funções neste exemplo são:
  1. CStrArray - Utilize esta função para converter uma matriz de cadeias de variante para uma variante matriz de variantes que contêm cadeias. Isto permite VBScript para atributos de cadeia com valores múltiplos de acesso devolvidos em conjuntos de registos ADO.

    CvOctetStr2vHexStr - Utilize esta função para converter uma matriz variante de bytes para uma variante contendo uma cadeia hexadecimal codificados em ASCII. Isto permite VBScript converter uma variante ADSTYPE_OCTETSTRING numa cadeia de caracteres ASCII 0-9 a-f.

    CvHexStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia ASCII codificado hexadecimal para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de ASCII caracteres 0-9 a-f.

    CvOctetStr2vStr - Utilize esta função para converter uma matriz variante de bytes para uma variante contendo uma cadeia ASCII. Isto permite VBScript converter uma variante ADSTYPE_OCTETSTRING numa cadeia de caracteres ASCII.

    CvStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de caracteres ASCII.
  2. CvOctetStr2vHexStr - Utilize esta função para converter uma matriz variante de bytes para uma variante contendo uma cadeia hexadecimal codificados em ASCII. Isto permite VBScript converter uma variante ADSTYPE_OCTETSTRING numa cadeia de caracteres ASCII 0-9 a-f.

    CvHexStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia ASCII codificado hexadecimal para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de ASCII caracteres 0-9 a-f.

    CvOctetStr2vStr - Utilize esta função para converter uma matriz variante de bytes para uma variante contendo uma cadeia ASCII. Isto permite VBScript converter uma variante ADSTYPE_OCTETSTRING numa cadeia de caracteres ASCII.

    CvStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de caracteres ASCII.
  3. CvHexStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia ASCII codificado hexadecimal para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de ASCII caracteres 0-9 a-f.

    CvOctetStr2vStr - Utilize esta função para converter uma matriz variante de bytes para uma variante contendo uma cadeia ASCII. Isto permite VBScript converter uma variante ADSTYPE_OCTETSTRING numa cadeia de caracteres ASCII.

    CvStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de caracteres ASCII.
  4. CvOctetStr2vStr - Utilize esta função para converter uma matriz variante de bytes para uma variante contendo uma cadeia ASCII. Isto permite VBScript converter uma variante ADSTYPE_OCTETSTRING numa cadeia de caracteres ASCII.

    CvStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de caracteres ASCII.
  5. CvStr2vOctetStr - Utilize esta função para converter uma variante contendo uma cadeia para uma matriz variante de bytes. Isto permite VBScript criar variantes para ADSTYPE_OCTETSTRING de cadeias de caracteres ASCII.
Para utilizar o exemplo, faça duplo clique sobre o ficheiro executável ArrayConvert.exe extracção automática. Utilizar o Visual Basic, abra o ficheiro ArrayConvertTest.vbg. Depois de abrir o projecto pode executar o programa de teste demonstra como utilizar as funções de conversão.

Para utilizar as funções do VBScript, pode registar o o ficheiro Ads.Dll Regsvr32 Ads.dll a fazer e, em seguida, chamar as funções do VBScript.

Segue-se um exemplo de utilizar a função CStrArray num VBScript para converter e visualizar os membros de listas de distribuição de uma organização do Exchange:
 
Set cnvt = CreateObject("ADs.ArrayConvert")
Set conn = CreateObject("ADODB.connection")
conn.provider = "ADSDSOObject"
conn.open ""
Set rs = conn.execute( _
    "<LDAP://Server/o=organization/ou=site/cn=recipients>;(objectClass=groupOfNames);ADsPath,member;onelevel")
       
While Not rs.EOF
    v1 = cnvt.CStrArray(rs.fields("member").Value)
    For Each v2 In v1
	msgbox v2
    Next

    rs.movenext
Wend
				

Propriedades

Artigo: 250344 - Última revisão: 5 de agosto de 2004 - Revisão: 4.2
A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 4.0 Enterprise Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
Palavras-chave: 
kbmt kbdownload kbfile kbhowto kbprogramming kbsample KB250344 KbMtpt
Traduçã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: 250344

Submeter comentários

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com