code:

---

Function MapDrive($Drive, $Server, $Share)
   Dim $Drive, $Server, $Share
   Color c+/n
   If $Drive<>"" and $Server<>"" and $Share<>""
      $LogText="Connecting $Drive to \\$Server\$Share"
      ? $LogText
      USE $Drive /Delete /Persistent
      USE $Drive "\\$Server\$Share"
      If @error=0
         color g+/n
         $x=" - Success"
         "$x"
      Else
         color r+/n
         $x=" - Failed: Error @error"
         "$x"
         $ErrorState=1
      Endif
      WriteLog ($LogText + $x)
      Color w+/n
   Else
      WriteLog ("Function 'MapDrive' called with invalid parameters: '$Drive', '$Server', '$Share'")
   Endif
Endfunction
  

---

quote:

---

C:\>net use /?
The syntax of this command is:

NET USE
[devicename | *] [\\computername\sharename[\volume] [password | *]]
[/USER:[domainname\]username]
[/USER:[dotted domain name\]username]
[/USER:[username@dotted domain name]
[/SMARTCARD]
[/SAVECRED]
[[/DELETE] | [/PERSISTENT:{YES | NO}]]

NET USE {devicename | *} [password | *] /HOME

NET USE [/PERSISTENT:{YES | NO}]

---

quote:

---

USE LIST
USE <* | "device" | "resource"> /DELETE [/PERSISTENT]
USE ["device"] <"resource"> [/USER:user] [/PASSWORD:password] [/PERSISTENT]

---

• Is this a new domain?
• Do any of your users attach via W2k on the initial login?
• Are the permissions applied properly to the "Administrative" or $ share?
• Do your user's Logins generate entries into the Event Log?

code:

---

 ? @kix
 ? @dos
 ? @ldrive
 ;;USE "*" /delete ;-- commented this out as the MapDrive function takes this into account
 ;;? "delete persistent mappings: "
 MapDrive("h:", "\\bstl_svr3", "@userid$")
 ? "mapping h: to homeshare: "

 IF Ingroup ("EDPADMIN") = 1
       MapDrive("i:", "\\bstl_svr3", "DocEDP$")
       ? "mapping i: to groupshare: "
       MapDrive("j:", "\\bstl_svr3", "dept$")
       ? "mapping j: to groupshare: "
       MapDrive("k:", "\\bstl_svr3", "users$")
       ? "mapping i: to groupshare: "
       MapDrive("l:", "\\bstl_svr3", "Software$")
       ? "mapping i: to groupshare: "
       SHELL "\\bstl_svr1\ofcscan\autopcc.exe"
 ENDIF

 ? "logonscript ran"
 ? "press any key to close window"
 GET $
 
 FUNCTION MapDrive($drive, $server, $share)
       DIM $drive, $server, $share
       COLOR c+/n
       IF $drive<>"" AND $server<>"" AND $share<>""
             $logtext="Connecting $Drive to \\$Server\$Share"
             ? $logtext
             USE $drive /delete /persistent
             USE $drive "\\$Server\$Share"
             IF @error=0
                   COLOR g+/n
                   $x=" - Success"
                   "$x"
             ELSE
                   COLOR r+/n
                   $x=" - Failed: Error @error"
                   "$x"
                   $errorstate=1
             ENDIF
             WriteLog ($logtext + $x)
             COLOR w+/n
       ELSE
             WriteLog ("Function 'MapDrive' called with invalid parameters: '$Drive', '$Server', '$Share'")
       ENDIF
 ENDFUNCTION


 FUNCTION WriteLog($text)
       DIM $rc, $text, $logfile, $filehandle
       $filehandle = 1
       $logfile = "%temp%\logon.log"
       $rc=Writeline ($filehandle, "@Date @Time - $Text" + Chr(13) + Chr(10))
       IF $rc<0
             $rc=Close ($filehandle)
             $rc=Open ($filehandle, "$LogFile", 5)
             SELECT
             CASE
                   $rc=-1
                   $rc=MessageBox ("Invalid file name ($LogFile) specified for log file.","Logon Script Error",48)
             CASE
                   $rc=0
                   WriteLog ($text)
             CASE
                   $rc=>0
                   $rc=MessageBox ("Error($RC) while attempting to open log file ($LogFile).","Logon Script Error",48)
             ENDSELECT
       ENDIF
 ENDFUNCTION

---

• Have you ever not had this problem on NT/W2K/XP?
• Have you inspected the EventLogs of a computer experiencing this issue?
• Do you see any "RED STOP Sign" critical alerts that might be of interest?
• Do you see any interesting events in the server's eventlog?

quote:

---

I don't know why If I wait a few a minute and run script by manual It works. But At first time failed!

---

You have to start displaying that you understand the basics of troubleshooting a problem for us to assist you. Restating the symptom of your problem is of no value at this time.

I, along with others, have spent a great deal of time attempting to assist you, but you appear to be very uncooperative in that you do not answer our questions or provide any detailed information about your environment. Trying to get anything of value from you is like pulling teeth.

You have a problem with the interaction of your clients and server(s). You need to learn more about the operating systems and network configuration. We can not begin to understand the problem without your help.

The KiXtart code you executed to good there is no problem there.

Again, I have asked specific questions above for which you have not provided answers. If you do not want to help yourself, please don't waste our time.

You can research the configuration of time on the Microsoft web site by starting with a search for 'w32time', 'time', or just reading the KB article I posted above and then following the links.

[ 22. November 2002, 12:57: Message edited by: Howard Bullock ]

code:

---

%0\..\kix32.exe %0\..\PLogon9X.kix 
z:\kix32.exe z:\PLogon9X.kix

---

code:

---

Logon.bat
----------------------------------------------
echo off 
rem ::SETLOCAL 
VER | find "NT" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "2000" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "XP" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "98" > nul 
IF not errorlevel 1 GOTO Win_9X 

VER | find "95" > nul 
IF not errorlevel 1 GOTO Win_9X 

GOTO unknown_os 

echo on

:win_NT
@TITLE BRIDGESTONE SALES (THAILAND) CO.,LTD. Logon Script
ECHO 				HELLO %USERNAME%!
Echo 		Welcome to %USERDOMAIN%, Inc. NT Domain Environment

%LOGONSERVER%\NETLOGON\kix32.exe %LOGONSERVER%\NETLOGON\RunScript.kix 

goto end 

:win_9X

echo ON

REM %WINDIR%\PUTINENV.EXE L
\\BSTL_SVR1\NETLOGON\winset.exe computername=%COMPUTERNAME%
\\BSTL_SVR1\NETLOGON\winset.exe username=@USERID
\\BSTL_SVR1\NETLOGON\winset.exe LANGROUP=%LANGROUP%
\\BSTL_SVR1\NETLOGON\winset.exe LOGONSERVER=%LOGONSERVER%

ECHO OFF
REM %WINDIR%\winset computername=%COMPUTERNAME%
REM %WINDIR%\winset username=%USERNAME%
REM %WINDIR%\winset LANGROUP=%LANGROUP%
REM %WINDIR%\winset LOGONSERVER=%LOGONSERVER%

echo on
:: --- DISPLAY THE USER NAME/DOMAIN
ECHO 				    HELLO %USERNAME%!
ECHO 		Welcome to %LANGROUP%,  Windows 9x Domain Environment

\\BSTL_SVR1\NETLOGON\kix32.exe \\BSTL_SVR1\NETLOGON\RunScript.kix 

goto end 

:unknown_os 
:end
exit

---

code:

---

? @kix
 ? @dos
 ? @ldrive
 ;;USE "*" /delete ;-- commented this out as the MapDrive function takes this into account
 ;;? "delete persistent mappings: "

IF "%OS%" == "Windows_NT"
        MapDrive("h:", "bstl_svr3", "%username%$")
        ? "mapping h: to homeshare: "
else
        MapDrive("h:", "bstl_svr3", "@USERID$")
        ? "mapping h: to homeshare: "
endif

IF Ingroup ("EDPADMIN") = 1
       MapDrive("i:", "bstl_svr3", "DocEDP$")
       ? "mapping i: to groupshare: "
       MapDrive("j:", "bstl_svr3", "dept$")
       ? "mapping j: to groupshare: "
       MapDrive("k:", "bstl_svr3", "users$")
       ? "mapping k: to groupshare: "
       MapDrive("l:", "bstl_svr3", "Software$")
       ? "mapping l: to groupshare: "
       SHELL "\\bstl_svr1\ofcscan\autopcc.exe"
 ENDIF

rem GET $

EXIT

---

code:

---

IF "%OS%" == "Windows_NT"
        MapDrive("h:", "bstl_svr3", "%username%$")
        ? "mapping h: to homeshare: "
else
        MapDrive("h:", "bstl_svr3", "@USERID$")
        ? "mapping h: to homeshare: "
endif  

---

code:

---

MapDrive("h:", "bstl_svr3", @USERID + "$$")  

---

code:

---

IF "%OS%" == "Windows_NT"
        MapDrive("h:", "bstl_svr3", "%username%$")
        ? "mapping h: to homeshare: "
else
        MapDrive("h:", "bstl_svr3", "@USERID$")
        ? "mapping h: to homeshare: "

---

code:

---

:: Determine OS
IF '%OS%'=='Windows_NT' GOTO WinNT

SET windir=
SET windir=
IF '%windir%'=='' SET OS=DOS
IF '%OS%'=='' IF '%windir%'=='' SET OS=Windows_3.x
IF '%OS%'=='' SET OS=Win9x
IF '%OS%'=='Win9x' GOTO Cont

echo DOS and Windows 3.x are not supported!
pause
goto End  

---

code:

---

echo off 

:: Determine OS
IF '%OS%'=='Windows_NT' GOTO WinNT

SET windir=
IF '%windir%'=='' SET OS=DOS
IF '%OS%'=='' IF '%windir%'=='' SET OS=Windows_3.x
IF '%OS%'=='' SET OS=Win9x
IF '%OS%'=='Win9x' GOTO Cont

echo DOS and Windows 3.x are not supported!
pause
goto End


:WinNT
Xcopy /D %LOGONSERVER%\NETLOGON\kix32.exe %TEMP%\Kix32.exe
%TEMP%\kix32.exe %LOGONSERVER%\NETLOGON\RunScript.kix 

goto end 

:Win9X
Xcopy /D %0\..\kix32.exe %windir%\Kix32.exe
Xcopy /D %0\..\kx32.dll %windir%\kx32.dll
Xcopy /D %0\..\kx16.dll %windir%\kx16.dll
Xcopy /D %0\..\kx95.dll %windir%\kx95.dll

%windir%\kix32.exe %0\..\RunScript.kix 

:end
exit
  

---

code:

---

VER | find "NT" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "2000" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "XP" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "98" > nul 
IF not errorlevel 1 GOTO Win_9X 

VER | find "95" > nul 
IF not errorlevel 1 GOTO Win_9X 

---

code:

---

VER | find "NT" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "2000" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "XP" > nul 
IF not errorlevel 1 GOTO Win_NT 

VER | find "Me" > nul 
IF not errorlevel 1 GOTO Win_9X 

VER | find "98" > nul 
IF not errorlevel 1 GOTO Win_9X 

VER | find "95" > nul 
IF not errorlevel 1 GOTO Win_9X
  

---

code:

---

@ECHO OFF
IF NOT "%OS%" == "Windows_NT"  GOTO WIN9X
VER|FIND /I "XP" >NUL && IF %ERRORLEVEL% EQU 0 GOTO XP
IF not "%ALLUSERSPROFILE%" == "" GOTO WIN2K
IF "%OS%" == "Windows_NT"      GOTO NT4
GOTO END
:XP
ECHO Found Windows XP
REM Or what ever command you want to run.
GOTO END
:WIN2K
ECHO Found Windows 2000
REM Or what ever command you want to run.
GOTO END
:NT4
ECHO Found Windows NT 4
REM Or what ever command you want to run.
GOTO END
:WIN9X
ECHO Found Windows 9x
ECHO You should see this on Windows ME
pause
REM Or what ever command you want to run.
GOTO END
:END

---