【正文】
ml % SearchTerm = (term) Novalid= a b c d e f g h i j k l m n o p q r s t u v w x y z yes no and more NovalidResponse =你輸入的內(nèi)容過于簡單 ,請返回重試 ! if instr(SearchTerm,Novalid)=0 then Response. Write (CENTERH2搜索結(jié)果 /H2/CENTER) FolderName= FolderName ShowList() else NovalidResponse End if SearchResponse= % % Sub ShowList() FolderToCheck = (\) amp。 Wfile Set fs = CreateObject() Set a = (Wfile2) ct = ct2=lcase(ct) Search