FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Mapear impresora de Red con WNetAddConnection2W
Hola!
Hace mucho que no escribía en el foro, pero ya no sé por donde tirar así que he decidido pedir ayuda. Estoy intentando mapear una impresora de red usando WNetAddConnection2W. Recibe como parámetros un NetResource, passw, usuario, y un dwFlag (DWORD). Le paso el net resource con esta estructura:
Le paso el Password y Usuario en blanco. Y como dwFlag le paso CONNECT_INTERACTIVE; El problema que tengo es que me agrega el recurso y lo veo haciendo un net use desde la consola(cmd), pero el recurso no me aparece como impresora. En otro proceso, busco las impresoras con:
Y el recurso no me aparece. Que me falta para que el recurso se me cree como impresora? He tirado de la ayuda me la msdn de la funcion WNetAddConnection2W y aparentemente todo es correcto. Muchas gracias por todo. Raúl.
__________________
ash nazg durbatulûk ash nazg gimbatul ash nazg thrakatulûk agh burzum-ishi krimpatul |
#3
|
||||
|
||||
He realizado las prueba de captura de impresora en red y funciona correctamente cuando se le pasa el usuario y la contraseña:
Y para desconectar la impresora capturada: Un saludo.
__________________
Al hacer una consulta SQL, haz que los demás te entiendan y disfruten de ella, será tú reflejo de tú saber. |
#4
|
|||
|
|||
Pues tío, despues de no ser capaz de crear la impresora me fui por otro camino y al final lo he conseguido, pero tu solución me la apunto por si acaso....
El problema que tenía era que WNetAddConnection2W lanza "por debajo" un comando "net use \\Servidor\Impresora" que lo que hace es mapearla como recurso pero no la creaba como impresora de red. Al final lo he hecho lanzando un vbscript: Código:
Option Explicit Dim objNetwork, strUNCPrinter, bForce, bUpdateProfile strUNCPrinter = "\\Servidor\Impresora" bForce = "True" bUpdateProfile = "False" Set objNetwork = CreateObject("WScript.Network") objNetwork.AddWindowsPrinterConnection strUNCPrinter, bForce, bUpdateProfile Wscript.Quit
Para eliminarla, el script es prácticamente igual, solo cambiando la linea en la que se añade la impresora (AddWindowsPrinterConnection) por: Código:
objNetwork.RemovePrinterConnection strUNCPrinter, bForce, bUpdateProfile De todas formas, muchas gracias por todo. Saludos. PD: Tenemos que hacer un grupo en Linked In del ClubDelphi...
__________________
ash nazg durbatulûk ash nazg gimbatul ash nazg thrakatulûk agh burzum-ishi krimpatul |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
seleccion de impresora y letra de la impresora | emeceuy | Impresión | 6 | 13-08-2017 14:11:05 |
Bug en mi impresora | soler | Varios | 14 | 09-05-2008 22:48:05 |
Impresora TM-L60-II | xio | Impresión | 4 | 13-11-2007 11:07:24 |
Impresora | tiel | API de Windows | 4 | 10-04-2006 20:39:47 |
Impresora LX-300 | AndyLupa | Impresión | 3 | 25-01-2006 19:30:36 |
|