this makes a static mapping, I'll make a quickie popup to get the parameters later...

code:
Function MapDrive
	$index=0
	:sidloop
	$sid=enumkey("\\$name\hkey_users\",$index)
	if not @error and not instr($sids,"_")
		$HKUsidSMWCVE = "HKEY_USERS\$sid\Software\Microsoft\Windows\CurrentVersion\Explorer"
		$LogonName=readvalue("\\$name\$HKUsidSMWCVE","Logon User Name")
		if not $remoteuser="@domain\$LogonName"
			$index=$index+1
			$sid=''
			goto sidloop
			endif
		endif
	if $sid
		$letter="q"
		$newpath="\\wheelerc\shared"
		$=writevalue("\\$name\HKEY_USERS\$sid\Network\$letter","RemotePath","$newpath",REG_SZ)
		$=writevalue("\\$name\HKEY_USERS\$sid\Network\$letter","UserName","",REG_SZ)
		$=writevalue("\\$name\HKEY_USERS\$sid\Network\$letter","ProviderName","Microsoft Windows Network",REG_SZ)
		$=writevalue("\\$name\HKEY_USERS\$sid\Network\$letter","ProviderType","131072",REG_Dword)
		$=writevalue("\\$name\HKEY_USERS\$sid\Network\$letter","ConnectionType","00000001",REG_Dword)
		endif
	GetDrives()
	endfunction
now, I'll write the inverse of this to delete a mapping...

[ 06. December 2002, 17:50: Message edited by: Radimus ]
_________________________
How to ask questions the smart way <-----------> Before you ask