IMPRMIR RELATORIO NUMA IMPRESSORA NA REDE
Tenho uma tabela no meu banco de dados para indicar qual é a MAQUINA e o COMPARTILHAMENTO da impressora que quero usar.
no caso:
Tabela = CONFIGURACOES
CAMPOS:
IMP1_MAQ_AP onde fica o nome da maquina na rede que a impressora tá instalada (nesse caso: BALCAO01)
IMP1_COMPART_AP onde fica o nome do compartilhamento da impressora (nesse caso: IMPRESSORA1)
Uso o Visual ReportX para gerar meus relatorios, nele possui a propriedade NOMEDAIMPRESSORA, que é onde defino o nome da impressora que quero usar toda vez que for imprimir aquele relatorio.
entao se:
NOMEDAIMPRESSORA = IMPRESSORA1 ele só vai imprimir na impressora1, pode ter mil impressora instalada
então fiz o seguinte código:
só que ele não imprime na impressora! ou seja, ele nao encontra a impressora!
quando coloco o mouse em cima tah o caminho certinho do compartilhamento [txt-color=#e80000][Ô]\\BALCAO01\IMPRESSORA1[Ô][/txt-color]
ai se eu mudar para (imprimindo localmente):
Funciona perfeitamente!
entao o problema é só em encontrar a impressora em outro pc na rede, localmente funciona bem!
no caso:
Tabela = CONFIGURACOES
CAMPOS:
IMP1_MAQ_AP onde fica o nome da maquina na rede que a impressora tá instalada (nesse caso: BALCAO01)
IMP1_COMPART_AP onde fica o nome do compartilhamento da impressora (nesse caso: IMPRESSORA1)
Uso o Visual ReportX para gerar meus relatorios, nele possui a propriedade NOMEDAIMPRESSORA, que é onde defino o nome da impressora que quero usar toda vez que for imprimir aquele relatorio.
entao se:
NOMEDAIMPRESSORA = IMPRESSORA1 ele só vai imprimir na impressora1, pode ter mil impressora instalada
então fiz o seguinte código:
[ô]Configurar a impressora para impressão do pedido
Call ABRIR_BD2
SQL_Conf = [Ô]SELECT * FROM CONFIGURACAO WHERE (CODIGO = 1)[Ô]
Set RS_Conf = BD.OpenRecordset(SQL_Conf)
Dim var_Maq As String
Dim var_Comp As String
If Not IsNull(RS_Conf!IMP1_MAQ_AP) Then var_Maq = RS_Conf!IMP1_MAQ_AP
If Not IsNull(RS_Conf!IMP1_COMPART_AP) Then var_Comp = RS_Conf!IMP1_COMPART_AP
Relatorio.NomeImpressora = [Ô]\\[Ô] & var_Maq & [Ô]\[Ô] & var_Comp
Relatorio.Ativar
End Subsó que ele não imprime na impressora! ou seja, ele nao encontra a impressora!
quando coloco o mouse em cima tah o caminho certinho do compartilhamento [txt-color=#e80000][Ô]\\BALCAO01\IMPRESSORA1[Ô][/txt-color]
ai se eu mudar para (imprimindo localmente):
Relatorio.NomeImpressora = var_CompFunciona perfeitamente!
entao o problema é só em encontrar a impressora em outro pc na rede, localmente funciona bem!
Isso pode ser uma restrição da rede ou da máquina onde a impressora está instalada.
Firewall desativado
Anti-Virus desativado
consigo imprimir do Word via rede normalmente
consigo imprimir do proprio sistema via rede se eu definir fixamente NOMEDAIMPRESSORA=\\BALCAO01\IMPRESSORA1
só não consigo se for dessa forma q fiz ai em cima, mas tem q ser por ela, pois a impressora muda de um cliente para outro e tenho cliente que para cada aplicação (cupom, nota, recibo, pedido, etc) envia para um impressora diferente!
Anti-Virus desativado
consigo imprimir do Word via rede normalmente
consigo imprimir do proprio sistema via rede se eu definir fixamente NOMEDAIMPRESSORA=\\BALCAO01\IMPRESSORA1
só não consigo se for dessa forma q fiz ai em cima, mas tem q ser por ela, pois a impressora muda de um cliente para outro e tenho cliente que para cada aplicação (cupom, nota, recibo, pedido, etc) envia para um impressora diferente!
Bom, por eliminação:
Tenta fazer:
Open [Ô]\\BALCAO01\IMPRESSORA1[Ô] for output as #1
print #1, [Ô]teste[Ô]
close #1
Se sair algo na impressora, significa que o Visual ReportX não suporta direcionamento direto ou falta nele(Visual ReportX) alguma configuração pra que aceite isso
Tenta fazer:
Open [Ô]\\BALCAO01\IMPRESSORA1[Ô] for output as #1
print #1, [Ô]teste[Ô]
close #1
Se sair algo na impressora, significa que o Visual ReportX não suporta direcionamento direto ou falta nele(Visual ReportX) alguma configuração pra que aceite isso
a impressora nao tah presente aqui... mas tah instalada...
Fazendo o que vc pediu vai algo para o spool da impressora!
Definindo ela via codigo para impressão local ela funciona
Definindo ela via propriedades para impressão na rede ela funciona.
faltava só ela aceitar imprimir na rede via codigo!
Fazendo o que vc pediu vai algo para o spool da impressora!
Definindo ela via codigo para impressão local ela funciona
Definindo ela via propriedades para impressão na rede ela funciona.
faltava só ela aceitar imprimir na rede via codigo!
Tópico encerrado , respostas não são mais permitidas