$files = Dirplus('.\','/a-d /s /f kix')

For Each $file In $files
	$ = WriteProfileString('.\test.ini',@USERID,$file.name,$file.datelastmodified + ',' + $file.path)
Next

[bsmith]
test.kix=4/15/2005 9:34:54 AM,G:\kix\sandbox\test.kix
800k.kix=3/4/2005 3:30:46 PM,G:\kix\sandbox\800k.kix
av.kix=1/25/2005 5:07:51 PM,G:\kix\sandbox\av.kix
bryce's NicSpeed.kix=3/16/2005 6:03:33 PM,G:\kix\sandbox\bryce's NicSpeed.kix
fncCheckAV.kix=1/26/2005 5:05:46 PM,G:\kix\sandbox\fncCheckAV.kix
months.kix=2/17/2005 6:58:31 PM,G:\kix\sandbox\months.kix
mx2.kix=12/16/2004 4:26:47 PM,G:\kix\sandbox\mx2.kix
NicSpeed.kix=3/16/2005 6:18:20 PM,G:\kix\sandbox\NicSpeed.kix
outlook.kix=4/12/2005 12:31:37 PM,G:\kix\sandbox\outlook.kix
pc.kix=1/3/2005 11:37:57 AM,G:\kix\sandbox\pc.kix
quota.kix=2/24/2005 11:55:42 AM,G:\kix\sandbox\quota.kix
shutdown.kix=12/21/2004 4:34:55 PM,G:\kix\sandbox\shutdown.kix
skincalc.kix=2/10/2005 1:45:37 PM,G:\kix\sandbox\skincalc.kix
temp.kix=1/6/2005 10:31:58 AM,G:\kix\sandbox\temp.kix
vendetta.kix=12/2/2004 2:43:01 PM,G:\kix\sandbox\vendetta.kix
xchat.kix=12/7/2004 5:30:49 PM,G:\kix\sandbox\xchat.kix