USANDO XPCOM32.DLL

AMELORP 24/11/2014 23:14:04
#442744
Estou tentando utilizar na minha aplicação as funções desse módulo porém não consigo alguém poderia me ajudar?
o erro é user-defined type not defined

segue abaixo o módulo (de cara não consigo registrar a dll no projeto xpcom32.dll)

alguém me ajude

[ô]---------------------------------------------------------------------------
[ô] TRIX Tecnologia Ltda.
[ô]---------------------------------------------------------------------------
[ô] Projeto.........: Biblioteca de Comunicacao XPCOMLIB (XPCOM32.DLL)
[ô] Modulo..........: XPCOM32.BAS (arquivo de inclusao)
[ô] Versao..........: 2.30
[ô] Compilacao......: Visual Basic 4
[ô] Ultima alteracao: 10/10/2003
[ô] Responsavel.....: VM
[ô] Numero de canais de comunicacao suportados
[ô]----------------------------------------------------------------------------

Global Const COM1 = 0
Global Const COM2 = 1
Global Const COM3 = 2
Global Const COM4 = 3
Global Const COM5 = 4
Global Const COM6 = 5
Global Const COM7 = 6
Global Const COM8 = 7
Global Const COM9 = 8
Global Const COM10 = 9
Global Const COM11 = 10
Global Const COM12 = 11
Global Const COM13 = 12
Global Const COM14 = 13
Global Const COM15 = 14
Global Const COM16 = 15
Global Const COMCHANNELS = 128
Global Const COMLAST = 127
Global Const IPCHANNELS = 256

[ô]----------------------------------------------------------------------------
[ô] Mascaras de Erros de Comunicacao
[ô]----------------------------------------------------------------------------

Global Const COM_RXOVER = 1 [ô] Receive Queue overflow
Global Const COM_OVERUN = 2 [ô] Erro de overrun na recepcao
Global Const COM_PARITY = 4 [ô] Erro de paridade na recepcao
Global Const COM_FRAME = 8 [ô] Erro de framing na recepcao
Global Const COM_BREAK = 16 [ô] Deteccao de break
Global Const COM_RXBFUL = 128 [ô] Erro de buffer de recepcao cheio
Global Const COM_TXFULL = 256 [ô] TX Queue is full
Global Const COM_MODE = 32768 [ô] Requested mode unsupported

[ô]----------------------------------------------------------------------------
[ô] Codigos para obtencao de configuracao do canal
[ô]----------------------------------------------------------------------------

Global Const COMCFG_OPEN = 1 [ô] canal aberto
Global Const COMCFG_RATE = 2 [ô] taxa de comunicacao
Global Const COMCFG_NBITS = 3 [ô] numero de bits
Global Const COMCFG_NSTOP = 4 [ô] numero de stop-bits
Global Const COMCFG_PAR = 5 [ô] paridade
Global Const COMCFG_TXFLOW = 6 [ô] controle de fluxo na transmissao
Global Const COMCFG_RXFLOW = 7 [ô] controle de fluxo na recepcao
Global Const COMCFG_BUFRX = 8 [ô] tamanho do buffer de recepcao
Global Const COMCFG_BUFTX = 9 [ô] tamanho do buffer de transmissao
Global Const COMCFG_IPADDR = 10 [ô] endereco para acessar uma porta via IP

[ô]----------------------------------------------------------------------------
[ô] Constantes diversas
[ô]----------------------------------------------------------------------------

Global Const COM_NONEP = 0 [ô] Sem paridade
Global Const COM_ODDP = 1 [ô] Paridade impar
Global Const COM_EVENP = 2 [ô] Paridade par
Global Const COM_NOFLOW = 0 [ô] Sem controle de fluxo
Global Const COM_RTSCTS = 1 [ô] Controle de fluxo RTS/CTS
Global Const COM_XONXOFF = 2 [ô] Controle de fluxo XON/XOFF
Global Const COM_OFF = 0 [ô] Sinal desativo
Global Const COM_ON = 1 [ô] Sinal ativo
Global Const COM_MINRXB = 16 [ô] Tamanho minimo do buffer de recepcao
Global Const COM_MAXRXB = 65500 [ô] Tamanho maximo do buffer de recepcao
Global Const COM_MINTXB = 16 [ô] Tamanho minimo do buffer de transmissao
Global Const COM_MAXTXB = 65500 [ô] Tamanho maximo do buffer de transmissao
Global Const COM_MAXIPLEN = 100 [ô] tamanho maximo de um endereco IP
Global Const COM_MINIPPORT = 0 [ô] endereco minimo de uma porta IP
Global Const COM_MAXIPPORT = 65535 [ô] endereco maximo de uma porta IP

[ô]----------------------------------------------------------------------------
[ô] Tipos de Comunicacao atraves da rede XPnet
[ô]----------------------------------------------------------------------------

Global Const XPN_COMHALF = 0 [ô] operacao half-duplex
Global Const XPN_COMFULL = 1 [ô] operacao full-duplex
Global Const XPN_COMAUTO = 2 [ô] operacao half e full duplex automática
Global Const XPN_COMIP = 3 [ô] operacao com socket

[ô]----------------------------------------------------------------------------
[ô] Status de Comunicacao da XPnet
[ô]----------------------------------------------------------------------------

Global Const XPN_STATIDLE = 0 [ô] comunicacao inativa
Global Const XPN_STATACTIVE = 1 [ô] comunicacao ativa
Global Const XPN_STATOK = 2 [ô] comunicacao inativa OK
Global Const XPN_STATERROR = 3 [ô] comunicacao inativa com erro

[ô]----------------------------------------------------------------------------
[ô] Codigos para obtencao de configuracao da rede
[ô]----------------------------------------------------------------------------

Global Const XPNCFG_OPEN = 1 [ô] verificar se rede esta aberta no canal
Global Const XPNCFG_RATE = 2 [ô] taxa de comunicacao
Global Const XPNCFG_BUFRXMSG = 3 [ô] tamanho do buffer de recepcao de mensagens
Global Const XPNCFG_BUFTXMSG = 4 [ô] tamanho do buffer de transmissao de mensagens
Global Const XPNCFG_POLLSTART = 5 [ô] verificacao se polling esta ativo
Global Const XPNCFG_POLLINT = 6 [ô] verificacao de intervalo entre pollings
Global Const XPNCFG_POLLTERM = 7 [ô] verificacao de polling de terminal

[ô]----------------------------------------------------------------------------
[ô] Codigos para alteracao do valor do timeout da rede
[ô]----------------------------------------------------------------------------

Global Const XPNWAIT_ACK = 1 [ô] tempo maximo de espera de ACK ou SOH
Global Const XPNWAIT_CHAR = 2 [ô] tempo maximo de espera de caractere
Global Const XPNWAIT_POLL = 3 [ô] tempo maximo de espera de pooling

[ô]----------------------------------------------------------------------------
[ô] Codigos para retorno de estatisticas na funcao XPnetmTermStat
[ô]----------------------------------------------------------------------------

Global Const XPNSTAT_ERROR = 0 [ô] ultimo erro de comunicacao
Global Const XPNSTAT_STATUS = 1 [ô] ultimo status do terminal
Global Const XPNSTAT_POLLS = 2 [ô] numero de mensagens de requisicao de dados transmitidas
Global Const XPNSTAT_TXMSGS = 3 [ô] numero de mensagens de comando transmitidas
Global Const XPNSTAT_TXDATA = 4 [ô] numero de bytes de dados transmitidos
Global Const XPNSTAT_RXMSGS = 5 [ô] numero de mensagens de dados recebidas do terminal
Global Const XPNSTAT_RXDATA = 6 [ô] numero de bytes de dados recebidos do terminal
Global Const XPNSTAT_ERRORS = 7 [ô] numero de erros
Global Const XPNSTAT_RETRIES = 8 [ô] numero de tentativas
[ô]Global Const XPNSTAT_ERRORS = 9 [ô] numero de erros
[ô]Global Const XPNSTAT_RETRIES = 10 [ô] numero de tentativas

[ô]----------------------------------------------------------------------------
[ô] Codigos de Tipos de Transferencia de Programa/Arquivo
[ô]----------------------------------------------------------------------------

Global Const XPNXFER_TXPROG = 0 [ô] Transmissao de programa
Global Const XPNXFER_RXPROG = 1 [ô] Recepcao de programa
Global Const XPNXFER_TXFILE = 2 [ô] Transmissao de arquivo
Global Const XPNXFER_RXFILE = 3 [ô] Recepcao de arquivo

[ô]----------------------------------------------------------------------------
[ô] Codigos de erro retornados pelas funcoes do Driver de Comunicacao
[ô]----------------------------------------------------------------------------

Global Const COM_OK = 0 [ô] Resultado OK
Global Const COM_INVPRM = -1 [ô] Parametros invalidos (Clipper)
Global Const COM_INVCOM = -2 [ô] Canal de comunicacao invalido
Global Const COM_INVINT = -3 [ô] Numero de interrupcao invalido
Global Const COM_INVNBT = -4 [ô] Numero de bits invalido
Global Const COM_INVRAT = -5 [ô] Taxa de comunicacao invalida
Global Const COM_INVNSB = -6 [ô] Numero de stop-bits invalido
Global Const COM_INVPAR = -7 [ô] Paridade invalida
Global Const COM_INVBUF = -8 [ô] Tamanho de buffer invalido
Global Const COM_INVFLW = -9 [ô] Tipo de
TUNUSAT 25/11/2014 07:41:47
#442751
Resposta escolhida
AMELORP,

Veja se te ajuda (os usuários aqui são: RODRIGOMARCHESE, TECLA, LCSD):

COMUNICACAO COM CATRACAS
http://www.vbmania.com.br/index.php?modulo=forum&metodo=abrir&id=338411

Instanciar DLL
http://forum.imasters.com.br/topic/136178-instanciar-dll/

[][ô]s,
Tunusat.
Tópico encerrado , respostas não são mais permitidas