break on

dim $objUsr
$objUsr = getobject("WinNT://" + @domain + "/" + @userid + ",user")
if not @error
    if not vartype($objUsr.LastLogin)
        "User " + @userid + " has never logged in before" ?
    else
        "Last login of " + @userid + " was at " + $objUsr.LastLogin ?
    endif
else
    "Error retrieving User object..." ? 
endif

"Hit any key to quit ..."
get $
exit 0

Quote:

---

I have no idea if it would work or not, but just to throw it out there...could you add a value to the default users run key?

---

dim $LogonList, $aMachines, $_


$LogonList = @scriptdir + "\logonlist.ini"
$aMachines = split(readprofilestring($LogonList,@userid,"UserLoggedOnTo"),",")


if ascan($aMachines,@wksta) = -1
    "Run your executable here!" ?
    if not @error ; or whatever it takes to proof successful run
        if $aMachines[0]
            redim preserve $aMachines[ubound($aMachines) + 1]
        endif
        $aMachines[ubound($aMachines)] = @wksta
        $_ = writeprofilestring($LogonList,@userid,"UserLoggedOnTo",join($aMachines,","))
    endif
endif

Quote:

---

Yeah, but that'd would run any time and not just for the first one, no?

---

 IF READVALUE('HKCU\Software\Microsoft\Office\11.0\Outlook','FirsRunDialog')<>'False'
    ; -- Do whatever
 ENDIF

If ReadValue('HKCU\Software\KiX','ExeIsRun') <> '1'
	; Execute Your exe here
	$RC = WriteValue('HKCU\Software\KiX','ExeIsRun','1','REG_SZ')
EndIf

$loggedon=readvalue('HKCU\Software\KiX\LoggedOnWorkstations',@wksta)
if @error <> 0 ;not logged on before
  $cmd='%comspec% /c '+'yoursetup.exe'
  shell $cmd
endif
$rc=writevalue('HKCU\Software\KiX\LoggedOnWorkstations',@wksta,@date+' - '+@time,'REG_SZ')