Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : imprimante [ Archives Visual Basic / J'AI BESOIN D'AIDE !!!! :) ] (CerberusAbaka)

lundi 27 mars 2006 à 14:11:33 | imprimante

CerberusAbaka

Salut !
Es que quelqu’un sait installer une imprimante avec visual basic sur win XP 64 ?

J’utilise :

Set wshnetwork = CreateObject("wscript.network")

    wshnetwork.addwindowsPrinterConnection impr

Sa a valeur de défi j'ait rien trouvé nul part...

Merci d'avance..

 

 

 

 

 


lundi 27 mars 2006 à 14:43:26 | Re : imprimante

JMO

Membre Club



 Bonjour,

Set WshNetwork = WScript.CreateObject("WScript.Network")
PrinterPath = "\\printserv\DefaultPrinter"
WshNetwork.AddWindowsPrinterConnection PrinterPath
'''''''''
         Set WshNetwork = WScript.CreateObject("WScript.Network")
         Set oDrives = WshNetwork.EnumNetworkDrives
         Set oPrinters = WshNetwork.EnumPrinterConnections
         '"Mappages de lecteurs réseau :"
         For i = 0 to oDrives.Count - 1 Step 2
            drive = vbCrLf& "Lecteur " & oDrives.Item(i) & " = " & oDrives.Item(i+1) & drive &vbCrLf
         Next

         '"Mappages d'imprimantes réseau :"
         For i = 0 to oPrinters.Count - 1 Step 2
            imprim = vbCrLf & "Port " & oPrinters.Item(i) & " = " & oPrinters.Item(i+1) & imprim &vbCrLf
         Next
         MsgBox drive &vbCrLf&vbCrLf& imprim

'''''''''''''
Set WshNetwork = WScript.CreateObject("WScript.Network")
PrinterPath = "\\research\library1"
WshNetwork.AddWindowsPrinterConnection PrinterPath
WshNetwork.SetDefaultPrinter PrinterPath
'''''''''''''''''
Set WshNetwork = WScript.CreateObject("WScript.Network")
PrinterPath = "\\printserv\DefaultPrinter"
WshNetwork.RemovePrinterConnection PrinterPath, true, true
'''''''''''''''

WshNetwork, objet | AddWindowsPrinterConnection, méthode | EnumPrinterConnections, méthode | RemovePrinterConnection, méthode | SetDefaultPrinter, méthode


lundi 27 mars 2006 à 15:43:00 | Re : imprimante

CerberusAbaka

Ok j'essaye dés que je peut, Tu as win xp64? Pas trop de probleme de compabilité?



Cette discussion est classé dans : imprimante, wshnetwork


Répondre à ce message

Sujets en rapport avec ce message

Tester si l imprimante est prête [ par Mitch ] J aimerais, avant de lancer une impression, tester que la printeuse est bien online. J ai fouiné dans les APIs mais pas moyen de trouver; à part qq fo Code spécifique d'imprimante en Visual Basic [ par Pierre ] Est-il possible en Visual Basic d'envoyer directement des codes de contrôles spécifiques à une imprimante? Je pense particulièrementà la modification config imprimante [ par bertrand ] je cherche à modifier par programme (VB6.0)les paramètres par défaut d'une imprimante. Qualité d'impression [ par Raynald ] Bonjour, j'utilise VB6 avec une imprimante matricielle Epson LQ2550.Depuis que j'ai installé Windows 98, l'imprimante passe 2 fois sur la même ligne Urgent : ajout d'une imprimante avec l'API AddPrinter [ par Cedric_Malache ] Je voudrais ajouter une nouvelle imprimante garce a l'api AddPrinter: Voici la déclaration de l'api en C: Liste imprimante!!! [ par Le J ] Salut,Comment optenir la liste des imprimantes installés sur mon ordinateurs????MerciALPLe J Vb, Access et imprimante!! [ par Le J ] Salut,Je veux changer d'imprimante avant de faire imprimer un état sous access (a partir de vb) et cela ne fonctionne pas!!! Ca fonctionne avec print Imprimante.... [ par RVTT ] Bonjour,Est-il possible d'imprimer en mode text sous VB (Comme sous dos...)Si oui comment ? Changer imprimante!!! URGENT [ par Le J ] Salut,Je veux changer d'imprimante lorsue je vais imprimer un état dans access a partir de VB!!! La fonction Set Printer = Printer(no de l'imprimante IMPRESSION ET DATAREPORT [ par chandrasonic ] SalutJ'ai un probleme :Je voudrais choisir une imprimante autre que celle definie par defaut.Avec set printer=printer(i) par de probleme j'arrive a se


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,234 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.