lecArrayValue = Request("LecNum")lecSplitedValue = Split(lecArrayValue, ",") For i=lbound(lecSplitedValue) To UBound(lecSplitedValue) If lecSplitedValue(i) "" Then lecValue = Split(lecSplitedValue(i), "^") End if strSql = "insert into nsurveyhistory(applynum, lecnum, wishlectime, surveyip) values (" & userNum & ", '" & lecValue(0) & "', '" & lecValue(1) & "', '" & Request.ServerVariables("REMOTE..