btw, if you want, you can let kixtart check the html files by using this code instead:
Code:

break on
Dim $Directory $Directory = "C:\Documents and Settings\***.JOOEL\Omat tiedostot\kixtart\"

If Exist ($Directory)
	$Folder = Dir($Directory)

	While $Folder <> "" and @ERROR = 0
	If $Folder <> "." AND $Folder <> ".." AND (getFileAttr($Directory + $Folder) & 16)
		$FileName = Dir($Directory + $Folder + "\*.htm", 1) ; retrieve next file
		While $FileName <> "" and @error = 0
			?$Filename + " is htm file"
			$FileName = Dir("", 1)
		Loop
	EndIf
	$Folder = Dir()
	Loop
endIf

get $

Edited by Jooel (2006-01-10 07:10 AM)
_________________________
!

download KiXnet