COMO INSTALAR IMPRESSORA
Ola Pessoal Gostaria de saber como istalar uma impressora via visual basic é possivel, vou tentar falar o que quero
No inno setup queria instalar uma impressora com nome GPP consegi fazer isto via visualscrip mais o inno nao executa entao, pensei em criar um executavel para fazer isto
No inno setup queria instalar uma impressora com nome GPP consegi fazer isto via visualscrip mais o inno nao executa entao, pensei em criar um executavel para fazer isto
acho que está querendo reinventar a roda...
se o teu software requer uma impressora com o nome GPP, defina isso como requisito para rodar o software e o
usuário fará a instalação através do instalador do fabricante da impressora.
se o teu software requer uma impressora com o nome GPP, defina isso como requisito para rodar o software e o
usuário fará a instalação através do instalador do fabricante da impressora.
Caro JOAOBENEVIDES
Acredito que até possa fazer a copia das bibliotecas mas correr esse risco pra que ................
O que você pode fazer é executar o SETUP.exe dos fabricantes de impressoras mais como fazer a verificação decada driver onde cada um tem sua particularidade
Já pensou notrabalhão de colocar como usuário administrador
Versão de sistema operacional
quais acesso no arquivo *.SYS é registrado
Faço dispositivos integrados para controle USB, Wi-fi, portas PARALELAS e SERIAL e pacotes de instalação para estes dispositivos manipulo por C++
A interfacer de copia das bibliotecas pode até ser feita pelo Vb.Net ou C# mas registrar e copiar informações de arquivos de manipulação do sistema operacional exige controle total do seu hardware......................
como no caso de alguns fabricantes de impressora........
Utilização de versões especÃficas de framework
Utilização de determinados hotfix isso para cada tipo ou versão de sistema operacional.......(Windows XP, Windows 7 Windows 2000, Windows 2008) e se é X86 ou X64..
Manipular os Drivers de dispositivos é muito complexo............
Quando faço um setup de um dispositivo que desenvolvi muita coisa não fica na visualização da barra de progresso do INSTALADOR para usuário ou algum curioso saber sobr o conceito ou a forma de funcionamento do DISPOSITIVO..........
Nas impressoras com toda a certeza é assim.......................
Mais olhe basicamente é assim
terá quer fazer um sistema que verifica Dependency File (muito precido com o instalador que é criado no VB 6.0)
NO SEU EXECUTÃVEL TERIA QUE RODAR ESTE TIPOS DE INSTRUÇÕES PASSANDO POR UMA PROGRESSBAR OU QUALQUER OUTYRO CONTROLE DE ANALISE
EXEMPLOS BÃSICOS DE VERIFICAR EXISTENCIA, COPIAR CASO NÃO HOUVER E REGISTRA SE NECESSÃRIO..................
if exist comdlg32.ocx then goto AJSO_COMDLG32
COPY COMDLG32.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32\COMDLG32.OCX
:AJSO_COMDLG32
if exist msmask32.ocx then goto AJSO_TABCTL32
COPY TABCTL32.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32 abctl32.OCX
:AJSO_TABCTL32
if exist msmask32.ocx then goto AJSO_MSMASK32
COPY MSMASK32.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32\MSMASK32.OCX
:AJSO_MSMASK32
if exist MSCOMCTL.ocx then goto AJSO_MSCOMCTL
COPY MSCOMCTL.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32\MSCOMCTL.OCX
:AJSO_MSCOMCTL
BOA SORTE
Acredito que até possa fazer a copia das bibliotecas mas correr esse risco pra que ................
O que você pode fazer é executar o SETUP.exe dos fabricantes de impressoras mais como fazer a verificação decada driver onde cada um tem sua particularidade
Já pensou notrabalhão de colocar como usuário administrador
Versão de sistema operacional
quais acesso no arquivo *.SYS é registrado
Faço dispositivos integrados para controle USB, Wi-fi, portas PARALELAS e SERIAL e pacotes de instalação para estes dispositivos manipulo por C++
A interfacer de copia das bibliotecas pode até ser feita pelo Vb.Net ou C# mas registrar e copiar informações de arquivos de manipulação do sistema operacional exige controle total do seu hardware......................
como no caso de alguns fabricantes de impressora........
Utilização de versões especÃficas de framework
Utilização de determinados hotfix isso para cada tipo ou versão de sistema operacional.......(Windows XP, Windows 7 Windows 2000, Windows 2008) e se é X86 ou X64..
Manipular os Drivers de dispositivos é muito complexo............
Quando faço um setup de um dispositivo que desenvolvi muita coisa não fica na visualização da barra de progresso do INSTALADOR para usuário ou algum curioso saber sobr o conceito ou a forma de funcionamento do DISPOSITIVO..........
Nas impressoras com toda a certeza é assim.......................
Mais olhe basicamente é assim
terá quer fazer um sistema que verifica Dependency File (muito precido com o instalador que é criado no VB 6.0)
NO SEU EXECUTÃVEL TERIA QUE RODAR ESTE TIPOS DE INSTRUÇÕES PASSANDO POR UMA PROGRESSBAR OU QUALQUER OUTYRO CONTROLE DE ANALISE
EXEMPLOS BÃSICOS DE VERIFICAR EXISTENCIA, COPIAR CASO NÃO HOUVER E REGISTRA SE NECESSÃRIO..................
if exist comdlg32.ocx then goto AJSO_COMDLG32
COPY COMDLG32.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32\COMDLG32.OCX
:AJSO_COMDLG32
if exist msmask32.ocx then goto AJSO_TABCTL32
COPY TABCTL32.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32 abctl32.OCX
:AJSO_TABCTL32
if exist msmask32.ocx then goto AJSO_MSMASK32
COPY MSMASK32.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32\MSMASK32.OCX
:AJSO_MSMASK32
if exist MSCOMCTL.ocx then goto AJSO_MSCOMCTL
COPY MSCOMCTL.OCX %WINDIR%\SYSTEM32
REGSVR32 %windir%\SYSTEM32\MSCOMCTL.OCX
:AJSO_MSCOMCTL
BOA SORTE
EU ACHEI UM VBS QUE FAZ ISTO
ESTA AI
dim oPort
dim oMaster
set oPort = CreateObject([Ô]Port.Port.1[Ô])
set oMaster = CreateObject([Ô]PrintMaster.PrintMaster.1[Ô])
oPort.PortName = [Ô]c:\boleto.ps[Ô]
oPort.PortType = 3
oMaster.PortAdd oPort
if Err <> 0 then
msgbox [Ô]There was an error creating the port.[Ô]
end if
[ô]********************************************************************
[ô]************** Create the printer second ***************************
[ô]Change MyPrinter to the name of the printer that you are adding.
[ô]Change PrinterDriver to the name of the printer driver that you are adding.
strComputer = [Ô].[Ô]
[ô] Objeto WMI
Set objWMIService = GetObject([Ô]winmgmts:\\[Ô] _
& strComputer & [Ô]oot\cimv2[Ô])
[ô] Classe Win32_OperatingSystem
Set colItems = objWMIService.ExecQuery _
([Ô]Select * from Win32_OperatingSystem[Ô])
[ô] Loop
For Each objItem in colItems
Versao = objItem.Version
Next
[ô] Finalizando o objeto
Set objWMIService = Nothing
dim oPrinter
set oPrinter = CreateObject([Ô]Printer.Printer.1[Ô])
oPrinter.PrinterName = [Ô]GPP[Ô] [ô] name of the printer as it appears in the Printers folder
if left(versao,1)=[Ô]6[Ô] then
oPrinter.DriverName = [Ô]HP LaserJet 2300 Series PS[Ô] [ô] name that is referenced in ntprint.inf
else
oPrinter.DriverName = [Ô]HP LaserJet 2100 Series PS[Ô] [ô] name that is referenced in ntprint.inf
end if
oPrinter.PortName = [Ô]c:\boleto.ps[Ô] [ô] Specify a port name. Can also point to LPT or COM port.
oMaster.PrinterAdd oPrinter
If Err <> 0 then
msgbox [Ô]There was an error creating the printer.[Ô]
end if
[ô]********************************************************************
msgbox [Ô]The script is finished.[Ô]
ESTA AI
dim oPort
dim oMaster
set oPort = CreateObject([Ô]Port.Port.1[Ô])
set oMaster = CreateObject([Ô]PrintMaster.PrintMaster.1[Ô])
oPort.PortName = [Ô]c:\boleto.ps[Ô]
oPort.PortType = 3
oMaster.PortAdd oPort
if Err <> 0 then
msgbox [Ô]There was an error creating the port.[Ô]
end if
[ô]********************************************************************
[ô]************** Create the printer second ***************************
[ô]Change MyPrinter to the name of the printer that you are adding.
[ô]Change PrinterDriver to the name of the printer driver that you are adding.
strComputer = [Ô].[Ô]
[ô] Objeto WMI
Set objWMIService = GetObject([Ô]winmgmts:\\[Ô] _
& strComputer & [Ô]oot\cimv2[Ô])
[ô] Classe Win32_OperatingSystem
Set colItems = objWMIService.ExecQuery _
([Ô]Select * from Win32_OperatingSystem[Ô])
[ô] Loop
For Each objItem in colItems
Versao = objItem.Version
Next
[ô] Finalizando o objeto
Set objWMIService = Nothing
dim oPrinter
set oPrinter = CreateObject([Ô]Printer.Printer.1[Ô])
oPrinter.PrinterName = [Ô]GPP[Ô] [ô] name of the printer as it appears in the Printers folder
if left(versao,1)=[Ô]6[Ô] then
oPrinter.DriverName = [Ô]HP LaserJet 2300 Series PS[Ô] [ô] name that is referenced in ntprint.inf
else
oPrinter.DriverName = [Ô]HP LaserJet 2100 Series PS[Ô] [ô] name that is referenced in ntprint.inf
end if
oPrinter.PortName = [Ô]c:\boleto.ps[Ô] [ô] Specify a port name. Can also point to LPT or COM port.
oMaster.PrinterAdd oPrinter
If Err <> 0 then
msgbox [Ô]There was an error creating the printer.[Ô]
end if
[ô]********************************************************************
msgbox [Ô]The script is finished.[Ô]
Caro JOAOBENEVIDES
AGORA FIQUE CONFUSO.................
OQUE VOCÊ PRECISA.............. é COPIAR UMA IMPRESSORA INSTALADA OU INSTALAR UMA IMPRESSORA.............
Isso gera um cópia de uma impressora já instalada só isso não verifica inclusive se ha recursos para a mesma.........
Talves o tópico esteja errado [ô]Como copiar uma imressora já instalada pois é isso que este script faz
BOA SORTE
AGORA FIQUE CONFUSO.................
OQUE VOCÊ PRECISA.............. é COPIAR UMA IMPRESSORA INSTALADA OU INSTALAR UMA IMPRESSORA.............
Isso gera um cópia de uma impressora já instalada só isso não verifica inclusive se ha recursos para a mesma.........
Talves o tópico esteja errado [ô]Como copiar uma imressora já instalada pois é isso que este script faz
BOA SORTE
descupa eu abri porque na ideia era instalar ne
mais vamos la
tenho este script em vbs preciso executar ele no inno setup apos o reneciar a maquina existe esta possibilidade ?
mais vamos la
tenho este script em vbs preciso executar ele no inno setup apos o reneciar a maquina existe esta possibilidade ?
Caro
Jeito tem mas teria que refazer sua lógica do script para ser sexecutado como um javascript
cscript.exe [Ô]$(ProjectDir)VerificarInstalador.js[Ô] [Ô]$(BuiltOuputPath)[Ô]
crie seu código no arquivo VerificarInstalador.js para ser lido pelo cscript.exe
de preferência com a estrutura do Java ou javascrip muito parecido com C#........................
Boa Sorte
Jeito tem mas teria que refazer sua lógica do script para ser sexecutado como um javascript
cscript.exe [Ô]$(ProjectDir)VerificarInstalador.js[Ô] [Ô]$(BuiltOuputPath)[Ô]
crie seu código no arquivo VerificarInstalador.js para ser lido pelo cscript.exe
de preferência com a estrutura do Java ou javascrip muito parecido com C#........................
Boa Sorte
vc poderia me ajudar entao a fazer ajso
ajso o problema que quando executo assim sem ele registrar uma dll que ele precisa ele da erro
?
como executar so esta dll antes de reneciar a maquina
?
?
como executar so esta dll antes de reneciar a maquina
?
Caro JOAOBENEVIDES
Posso sim............... o que você já fez....................
Então são duas form a de executar isso
Antes e depois de reiniciar
Coloca no innosetup a opção regserver ou cria um arquivo .bat e depois de instalar a aplicação mande executar automaticamente.
A linha de comando para colocar no arquivo .bat.......
Executar um .bat pode ser uma opção mas REGSERVER é o mais correto...............
este erro é possivel debugar se for javascript......................................................
Boa sorte....
Posso sim............... o que você já fez....................
Então são duas form a de executar isso
Antes e depois de reiniciar
Coloca no innosetup a opção regserver ou cria um arquivo .bat e depois de instalar a aplicação mande executar automaticamente.
A linha de comando para colocar no arquivo .bat.......
Executar um .bat pode ser uma opção mas REGSERVER é o mais correto...............
este erro é possivel debugar se for javascript......................................................
Boa sorte....
preciso fazer o arquivo em javascritp mais nao sei como
o resto tenho pronto
o resto tenho pronto
Tópico encerrado , respostas não são mais permitidas