Function Chkinvalidword (Words) Const InvalidWords = "Select | Update | DELETE | INSERT | @ | - |, | '" Chkinvalidword = true invalidword = split (invalidwords, "|") inWords = LCase = LBound (InvalidWord) To Ubound (InwordWord) IF INSTR (INWORDS, INVALIDWORD (I))> 0 THEN Chkinvalidword = true exit function end if next chkinvalidword = false film
