script d'imprimante

yermat

Grand Maître
Boonjour, je debute en tant qu'administrateur réseau, et bien sur j'ai un problème je voudrais créer un script pour la connection d'imprimante réseau, pour que des PC puissent accèder en session locale à des imprimantes gèrer par un contrôlleur de domaine.
Bref comment et dans quel langage créer ces scripts pour que tout les utilisateurs du poste retrouvent ces saletés d'imprimantes??
ma question doit être trop simple pour beaucoup mais pour moi c'est la galère. Merci en tout cas
 

necroloki_fr

Nouveau membre
tien!
je crois que l'on a le meme probleme mais malheureusement sans reponse...


si quelqun pouvait nous aider sa serait apreciable
 

sami33

Nouveau membre
tien!
je crois que l'on a le meme probleme mais malheureusement sans reponse...


si quelqun pouvait nous aider sa serait apreciable


Tu peux voir cette page : http://www.laboratoire-microsoft.org/scripts/6794/ , personelement j'ai fait ceci:
__ connecter_imprimantes.vbs ____


Set net = Wscript.CreateObject("WScript.Network")
local=ucase(net.ComputerName)

'###########################################
'########################################### sur le surveur
'###########################################

if ucase(local)<>"SERVEUR" then
net.AddWindowsPrinterConnection "\\serveur1\Nom_ta_premiere_imprimante"
else
net.SetDefaultPrinter "\\serveur1\Nom_ta_premiere_imprimante"
end if

'###########################################
'########################################### sur SINFO1-P02
'###########################################

if ucase(local)<>"SINFO1-P02" then
net.AddWindowsPrinterConnection "\\serveur2\Nom_ta_deuxieme_imprimante"
end if


et je l'ai enregistré dans : C:\Documents and Settings\All Users\Menu Démarrer\Programmes\Démarrage de chaque poste. sinon; tu met ce fichier dans un endroit accessible partt, et tu met dans le chemin C:\Documents and Settings\All Users\Menu Démarrer\Programmes\Démarrage un petit script qui cherche/execute ton script connecter_imprimantes.vbs dont le contenu est:

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run ("\\serveur\chemin\connecter_imprimantes.vbs")


bon courage.
 

yermat

Grand Maître
tien!
je crois que l'on a le meme probleme mais malheureusement sans reponse...


si quelqun pouvait nous aider sa serait apreciable

Salut au bout de quelque temps j'avais trouver la solution voici à quoi correspond le script suivant, si la 6ème lettre du premier mot (ici nom du pc) correspond à "p" dans le premier test alors connecte \\PC101\hp, sinon si alors connecte celle-ci...
Voili j'éspère que j'ai été clair, mais sinon j'ai une autre question comment déclaré un nom d'utilsiateur et un mot de passe pour avoir les droits de connections j'ai un PC dans un domaine différents des autres et lui il est casse bonbon.
Merci @+


Dim var
Dim nompc

Set var = CreateObject("WScript.Network" )

nompc = var.ComputerName

if mid(nompc, 6, 1) = "P" then
var.addwindowsprinterconnection "\\PC101\hp"
else
if mid(nompc, 6, 1) = "1" then
var.addwindowsprinterconnection "\\03s101p20\salle101"
else
if mid(nompc, 6, 1) = "E" then
var.addwindowsprinterconnection "\\03cafet9\cafeteria"
else
if mid(nompc, 6, 1) = "6" then
var.addwindowsprinterconnection "\\03s116p5\salle116"
else
var.addwindowsprinterconnection "\\03s109p10\salle109"
end if
end if
end if
end if
 

zeb

Modérateur
Vous allez me respecter les règles oui ou non ?
Utilisez cette fichue balise, nom d'un PC en bois !
 

yermat

Grand Maître
:merci: héhé, dsl je savais plus comment faire c'est "C/c++" oui?
 

globalscript

Nouveau membre
Pour ceux qui souhaitent générer ce genre de scripts sans connaitre le scripting... il y a

essayer c'est gratuit ;-)

________________________________
Edit modo : Eh ben non, pas de pub pour ceux qui ne connaissent pas.
Ici, c'est programmation. Pas anti-programmation.
 
Vous devez vous inscrire ou vous connecter pour répondre ici.
Derniers messages publiés
Statistiques globales
Discussions
730 079
Messages
6 716 710
Membres
1 586 247
Dernier membre
MrAzgarIII
Partager cette page
Haut