Dear,Is your problem solved? NO
We add some debugging to your script. Please put the contents of file
c:\kix-info.log on the board.
code:
CLS
COLOR C+/N
AT (1,1) " "
IF RedirectOutput("c:\kix-info.log")
ENDIF
? "-"+@date+" "+@time+"- Script "+@kix+" starting."
?"- 1-"+@time+"- @error @serror "? ;?????????????????? NetDriveIcon aktivieren ????????????????????
?"- 2-"+@time+"- @error @serror "? $autodrive=ReadValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveTypeAutoRun")
?"- 3-"+@time+"- @error @serror "? SELECT
?"- 4-"+@time+"- @error @serror "? CASE
$autodrive = "85000000"
?"- 5-"+@time+"- @error @serror "? ;OK
?"- 6-"+@time+"- @error @serror "? CASE
$autodrive = "95000000"
?"- 7-"+@time+"- @error @serror "? WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveTypeAutoRun", "85000000", "REG_BINARY")
?"- 8-"+@time+"- @error @serror "? CASE
$autodrive = "B5000000"
?"- 9-"+@time+"- @error @serror "? WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveTypeAutoRun", "A5000000", "REG_BINARY")
?"- 10-"+@time+"- @error @serror "? ENDSELECT
?"- 11-"+@time+"- @error @serror "?
?"- 12-"+@time+"- @error @serror "? ;?????????????????? Zeitanpassung an Server ?????????????????????
?"- 13-"+@time+"- @error @serror "? SETTIME "\\BH-File-01"
?"- 14-"+@time+"- @error @serror "? ;?????????????????? Mapping fr H: USERHome ?????????????????????
?"- 15-"+@time+"- @error @serror "? USE H: /delete
?"- 16-"+@time+"- @error @serror "? USE H: "\\BH-File-01\H-%USERNAME%$"
?"- 17-"+@time+"- @error @serror "?
?"- 18-"+@time+"- @error @serror "? ;?????????????????? Mapping fr K: Kundenservice ????????????????
?"- 19-"+@time+"- @error @serror "? USE K: /delete
?"- 20-"+@time+"- @error @serror "? SELECT
?"- 21-"+@time+"- @error @serror "? CASE
INGROUP("BH.KNDSV")
?"- 22-"+@time+"- @error @serror "? USE K: "\\BH-File-01\Kundenservice$"
?"- 23-"+@time+"- @error @serror "? ENDSELECT
?"- 24-"+@time+"- @error @serror "?
?"- 25-"+@time+"- @error @serror "? ;?????????????????? Mapping fr M: Allgemein ????????????????????
?"- 26-"+@time+"- @error @serror "? USE M: /delete
?"- 27-"+@time+"- @error @serror "? SELECT
?"- 28-"+@time+"- @error @serror "? CASE
INGROUP("Dom„nen-Benutzer")
?"- 29-"+@time+"- @error @serror "? USE M: "\\BH-File-01\Allgemein$"
?"- 30-"+@time+"- @error @serror "? ENDSELECT
?"- 31-"+@time+"- @error @serror "?
?"- 32-"+@time+"- @error @serror "? ;?????????????????? Mapping fr P: Programme ????????????????????
?"- 33-"+@time+"- @error @serror "? USE P: /delete
?"- 34-"+@time+"- @error @serror "? SELECT
?"- 35-"+@time+"- @error @serror "? CASE
INGROUP("Dom„nen-Benutzer")
?"- 36-"+@time+"- @error @serror "? USE P: "\\BH-File-01\Programme$"
?"- 37-"+@time+"- @error @serror "? ENDSELECT
?"- 38-"+@time+"- @error @serror "?
?"- 39-"+@time+"- @error @serror "? ;?????????????????? Mapping fr S: Statistik ????????????????????
?"- 40-"+@time+"- @error @serror "? USE S: /delete
?"- 41-"+@time+"- @error @serror "? SELECT
?"- 42-"+@time+"- @error @serror "? CASE
INGROUP("BH.STK")
?"- 43-"+@time+"- @error @serror "? USE S: "\\BH-File-01\Statistik$"
?"- 44-"+@time+"- @error @serror "? ENDSELECT
?"- 45-"+@time+"- @error @serror "?
?"- 46-"+@time+"- @error @serror "? ;?????????????????? Mapping fr V: Verwaltung ???????????????????
?"- 47-"+@time+"- @error @serror "? USE V: /delete
?"- 48-"+@time+"- @error @serror "? SELECT
?"- 49-"+@time+"- @error @serror "? CASE
INGROUP("BH.VERW")
?"- 50-"+@time+"- @error @serror "? USE V: "\\BH-File-01\Verwaltung$"
?"- 51-"+@time+"- @error @serror "? ENDSELECT
?"- 52-"+@time+"- @error @serror "?
?"- 53-"+@time+"- @error @serror "? ;?????????????????? Mapping fr W: Vertrieb ?????????????????????
?"- 54-"+@time+"- @error @serror "? USE W: /delete
?"- 55-"+@time+"- @error @serror "? SELECT
?"- 56-"+@time+"- @error @serror "? CASE
INGROUP("BH.VTB")
?"- 57-"+@time+"- @error @serror "? USE W: "\\BH-File-01\Vertrieb$"
?"- 58-"+@time+"- @error @serror "? ENDSELECT
?"- 59-"+@time+"- @error @serror "? ;?????????????????? Mapping fr X: EZArchiv-Administratoren ?????
?"- 60-"+@time+"- @error @serror "? USE X: /delete
?"- 61-"+@time+"- @error @serror "? SELECT
?"- 62-"+@time+"- @error @serror "? CASE
INGROUP("BH.EASY.ADM")
?"- 63-"+@time+"- @error @serror "? USE X: "\\BH-EZArchiv-01\EASY$"
?"- 64-"+@time+"- @error @serror "? ENDSELECT
?"- 65-"+@time+"- @error @serror "? ;?????????????????? Mapping fr X: EZArchiv-User ????????????????
?"- 66-"+@time+"- @error @serror "? USE Q: /delete
?"- 67-"+@time+"- @error @serror "? SELECT
?"- 68-"+@time+"- @error @serror "? CASE
INGROUP("BH.EZV")
?"- 69-"+@time+"- @error @serror "? USE Q: "\\BH-EZArchiv-01\EASY$"
?"- 70-"+@time+"- @error @serror "? ENDSELECT
?"- 71-"+@time+"- @error @serror "? ;?????????????????? Mapping fr Admin ???????????????????????????
?"- 72-"+@time+"- @error @serror "? USE Y: /delete
?"- 73-"+@time+"- @error @serror "? USE Z: /delete
?"- 74-"+@time+"- @error @serror "? IF INGROUP("BH.ADM")
?"- 75-"+@time+"- @error @serror "? USE Y: "\\BH-File-01\C$"
?"- 76-"+@time+"- @error @serror "? USE Z: "\\BH-File-01\D$"
?"- 77-"+@time+"- @error @serror "? ENDIF
One remark: your are using the SELECT/ENDSELECT structures during mapping
of your drives for only one group. We advise to use IF/ENDIF structures.
Result can be
code:
;?????????????????? NetDriveIcon aktivieren ????????????????????
$autodrive=ReadValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveTypeAutoRun")
SELECT
CASE
$autodrive = "85000000"
;OK
CASE
$autodrive = "95000000"
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveTypeAutoRun", "85000000", "REG_BINARY")
CASE
$autodrive = "B5000000"
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveTypeAutoRun", "A5000000", "REG_BINARY")
ENDSELECT
;?????????????????? Zeitanpassung an Server ?????????????????????
SETTIME "\\BH-File-01"
;?????????????????? Mapping fr H: USERHome ?????????????????????
USE H: /delete
USE H: "\\BH-File-01\H-%USERNAME%$" ;?????????????????? Mapping fr K: Kundenservice ????????????????
USE K: /delete
IF INGROUP("BH.KNDSV") <> 0
USE K: "\\BH-File-01\Kundenservice$"
ENDIF
;?????????????????? Mapping fr M: Allgemein ????????????????????
USE M: /delete
IF INGROUP("Dom„nen-Benutzer") <> 0
USE M: "\\BH-File-01\Allgemein$"
ENDIF
;?????????????????? Mapping fr P: Programme ????????????????????
USE P: /delete
IF INGROUP("Dom„nen-Benutzer") <> 0
USE P: "\\BH-File-01\Programme$"
ENDIF
;?????????????????? Mapping fr S: Statistik ????????????????????
USE S: /delete
IF INGROUP("BH.STK") <> 0
USE S: "\\BH-File-01\Statistik$"
ENDIF
;?????????????????? Mapping fr V: Verwaltung ???????????????????
USE V: /delete
IF INGROUP("BH.VERW") <> 0
USE V: "\\BH-File-01\Verwaltung$"
ENDIF
;?????????????????? Mapping fr W: Vertrieb ?????????????????????
USE W: /delete
IF INGROUP("BH.VTB") <> 0
USE W: "\\BH-File-01\Vertrieb$"
ENDIF
;?????????????????? Mapping fr X: EZArchiv-Administratoren ?????
USE X: /delete
IF INGROUP("BH.EASY.ADM") <> 0
USE X: "\\BH-EZArchiv-01\EASY$"
ENDIF
;?????????????????? Mapping fr X: EZArchiv-User ????????????????
USE Q: /delete
IF INGROUP("BH.EZV") <> 0
USE Q: "\\BH-EZArchiv-01\EASY$"
ENDIF
;?????????????????? Mapping fr Admin ???????????????????????????
USE Y: /delete
USE Z: /delete
IF INGROUP("BH.ADM") <> 0
USE Y: "\\BH-File-01\C$"
USE Z: "\\BH-File-01\D$"
ENDIF
greetings.
