I thought I already posted this, must not have.
Win98 users
Users run LMSCRIPT - renamed kix32.exe to LMSCRIPT.EXE - suggested by forum
KIX 4.1 Have Dlls on users's local windows\system
Win2K servers
The values are put in the run registry because we have multiple users on the pcs and some delete icons just for the fun of it. We are a 24hr 7 day a week manufacturer.
Script runs just really slow. Is there a way to speed it up or is it just a performance issue between Win98 and Win2k?
[CODE]
if ingroup("TX-Everyone")
$OS = @producttype
;use h: /delete
use g: /delete
;use h: "\\TX-Server\Marshall\home"
use g: "\\TX-Server\Marshall\depts"
endif
if $OS = "Windows 98"if $OS = "Windows 98"
; Test for virus upgrade
;Macola
; MACOLA Section
if ingroup("TX-Macola Access")
Use M: /delete
USE M: "\\Tx-Server\Apps"
endif
if ingroup("TX-Mapcon")
Use O: /delete
USE O: "\\Tx-Server\Apps"
$regkey='HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run'
$regentry='MapconIcon'
$regvalue='\\tx-control\netlogon\short2.bat'
$rc=writevalue($regkey,$regentry,$regvalue,'REG_SZ')
if @ERROR
? 'Error writing to registry: '+@ERROR+' - '+@SERROR
endif
; "Creating Mapcon icon" sleep 1 ?
endif
; LIMS
if ingroup("TX-LIMS")
$regkey='HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run'
$regentry='LIMSIcon'
$regvalue='\\tx-control\netlogon\Lims.bat'
$rc=writevalue($regkey,$regentry,$regvalue,'REG_SZ')
if @ERROR
? 'Error writing to registry: '+@ERROR+' - '+@SERROR
endif
; "Creating Lims icon" sleep 1 ?
endif
if ingroup("TX-Orders")
$regkey='HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run'
$regentry='OrdersIcon'
$regvalue='\\tx-control\netlogon\orders.bat'
$rc=writevalue($regkey,$regentry,$regvalue,'REG_SZ')
if @ERROR
? 'Error writing to registry: '+@ERROR+' - '+@SERROR
endif
; "Creating Orders Icon" sleep 1 ?
endif
if ingroup("TX-Quality")
regkey='HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run'
$regentry='QualityIcon'
$regvalue='\\tx-control\netlogon\Quality.bat'
$rc=writevalue($regkey,$regentry,$regvalue,'REG_SZ')
if @ERROR
? 'Error writing to registry: '+@ERROR+' - '+@SERROR
endif
; "Creating Quality icon" sleep 1 ?
endif
endif
;OK SECTION
; Code for OK user on laptop to map depts and home
if ingroup("OK-Laptops")
use h: /delete
use g: /delete
use h: "\\tx-Data\pryor\home"
use g: "\\tx-Data\pryor\depts"
endif
COOKIE1
exit
[CODE]
_________________________
Stupid is forever - Ignorance can be fixed.
