Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Troca Drive Impressora
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Problèmes
Divers
Thread ID:
00857251
Message ID:
00857273
Vues:
27
Claudio eu estava pensando aqui...
O meu maior problema seria que:
Como todas as impressoras estão na rede as vezes um usuario quer imprimir na impressora dele e ele tem todas as impressoras instaladas ae ele vai trocar o drive sem a necessidade...
Melhor solução seria eu arrumar uma nova fonte que aceite codigo de barras que os caixas de banco leiam...
Você sabe de algum?
Porque com o drive do visual jet ela não dava problema de espaçamento muito grande com drive normal... apartir do momento que passei pro rel do foxpro e mudei a fonte (pois não tem como pegar a fonte que o visual jet utiliza) ele começou dar problema...


>>Claudio valeu!!!
>>Seguinte:
>>Teria como você meio que comentar as linhas abaixo para mim me situar no que está ocorrendo... Por exemplo se a impressora do usuario não for a N17 eu não quero que ele imprima no drive da PostScript... E sim no que está default... Pois temos mais de 10 impressoras diferentes aqui :/
>>
>>Obrigado!
>>
>
>nwtot_imp = APRINTERS(awimpress) && retornará um array com todas a impressoras
>nwimp     = 0                    && acumulador que terá valor maior que zero caso a nossa impressora esteja definida no Windows
>for ipp = 1 to nwtot_imp         && loop de 1 ao total de impressoras existentes
>    if  "Xerox N17 PostScript"$upper(awimpress[ipp,1])  && se o nome existir no array
>        nwimp = ipp              && nosso identificador rotorna qual é a posições dela no array de impressoras
>        exit
>    endif
>endfor
>if  nwimp > 0
>    SET PRINTER TO NAME awimpress[ipp,1]  && as próximas impressões serão efetuadas nesta impressora até um próximo SET PRINTER TO
>endif
>
Atenciosamente,

Thiago Oliveira Ferraz

Analista de Sistemas
Universidade de Uberaba (UNIUBE) - Campus Aeroporto
Tel: 0xx(34)3319-8906
Cel: 0xx(34)9136-1260
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform