%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
sqlItemIDs = "select distinct a.itemcatalogid itemID,ItemLeader2Data from itemleader2 a, itemdata b where a.itemcatalogid = b.itemcatalogid and a.itemcatalogid = 256 order by a.itemcatalogid"
Set RSItemIDs = Server.CreateObject("ADODB.Recordset")
RSItemIDs.open sqlItemIDs,conn,3,1
while not RSItemIDs.EOF
text = text & "