Discussion :

[cuhbe]

Bonjour,

Lorsqu'un utilisateur ouvre une session sur le terminal serveur et qu'il veut imprimer un document,
le serveur me détecte uniquement mon ancien serveur d'impression (alors qu'il n'est plus en fonctionnement).
Le profiltype à été recréer correctement.
N'y a il pas une option de réplication ou une option quelconque permettant de retrouver mon nouveau serveur d'impression ?


Merci d'avance.

[Flamby38]

je ne connais pas de solution simple.

En recvanche j'ai un script d'ouverture de session qui te permet de faire ca :

dans un fichier .kix :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
;******************************************************** 
RedirectOutput ("c:\@HOSTNAME.txt", 1) 
?"Imprimantes sur @HOSTNAME le @DATE a @TIME" 

$OldServer=serveur
$NewServer=nouveauserveur

$DefaultPrinter = "" 
$DefaultPrinter = ReadValue("HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows", "Device") 
?"Imprimante par défaut : $DefaultPrinter"

$Index=0 

:Loop1 

$KeyName = EnumKey("HKEY_CURRENT_USER\PRINTERS\CONNECTIONS", $Index) 
If @ERROR = 0 
	?$KeyName 
	GoTo ServerCheck 
Else 
	GoTo End 
EndIf 

;********************************************************** 
:ServerCheck 
$Servername = ReadValue("HKEY_CURRENT_USER\PRINTERS\CONNECTIONS\$Keyname", "Server") 
; If ServerName exists 
If @ERROR = 0 
	If $ServerName="\\$OldServer" 
		$PrinterName=SubStr("$KeyName",LEN("$OldServer")+4,50) 
		$OldPrinterQueue="\\$OldServer\$Printername" 
		$NewPrinterQueue="\\$NewServer\$Printername" 
		DelPrinterConnection("$OldPrinterQueue") 
		?"Imprimante "$OldPrinterQueue" supprimee" 
		AddPrinterConnection("$NewPrinterQueue") 
		?"Imprimante "$NewPrinterQueue" cree" 
		If InStr("$DefaultPrinter","$OldPrinterQueue")=1 
			SetDefaultPrinter("$NewPrinterQueue") 
			?"Imprimante "$NewPrinterQueue" est maintenant l'imprimante par défaut" 
		EndIf 
		$Index = $Index + 1 
		GoTo Loop1 
		; ServerName does not exist 
	Else 
		$Index = $Index + 1
		GoTo Loop1 
	EndIf 
	
:End 
COPY "c:\@HOSTNAME.txt" "@LSERVER\NETLOGON\IMPRIMANTES\@HOSTNAME.txt" /c
Exit

puis dans un fichier bat:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"%LOGONSERVER%\NETLOGON\IMPRIMANTES\KIX\KIX32.exe" "%LOGONSERVER%\NETLOGON\IMPRIMANTES\monfichier.kix"

[cuhbe]

merci bien,
Devant l'urgence de la situation je n'ai pas testé ton script.
je me suis contenté de recoller une image altiris de mon serv.
Par contre je le met de coté dans le cas ou il y aurait un nouveau problème.

A bientot.