Microsoft VBScript runtime error '800a01f5'

Illegal assignment: 'fldType'

/free-craft-patterns.asp, line 9