SELECT col1 FROM TableA --> Lists (RecordSet) 
	!! some records are return as result !!

	set objRS = CreateObject("ADODB.Recordset")
	set objRS = DTSGlobalVariables("Lists").value
	for cnt = 1 to objRS.RecordCount
		if strList = "" then
			strList = objRS.Fields("col1").value
		else
			strList = strList & ", " & objRS.Fields("col1").value
		end if
		objRS.MoveNext
	next
	DTSGlobalVariables("Lists_of_Query").value = strList

	SELECT     *
	FROM         TableB
	WHERE (col2 IN  (?) )

	SELECT     *
	FROM         TableB
	WHERE (col2 IN  (1200, 1201, 2003) )