% FunctionAutoKey(strKey) ConstlngSubKey=2 lngLenKey=Len(strKey) SelectCaselngLenKey Case0''若为空串,转到出错页 Response.Redirect'Error.htm' Case1''若长度为1,则不设任何值 strNew1='' strNew2='' CaseElse''若长度大于1,则从字符串首字符开始,循环取长度为2的子字符串作为查询条件 Fori=1TolngLenKey-(lngSubKey-
作者: 来源: 时间: 17-11-23 15:48:26
关于5UCMS 您有任何需求 均可以留言给我们