<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
Untitled Document
<%
dim rs
set rs=server.CreateObject("Adodb.recordset")
strsql="select * from beaker_desc order by catalog_no"
table="Beakers"
rs.open strSql,conn,2,2
%>
<%
do until rs.eof
item_name=rs.fields("catalog_no")+ " - Beaker"
%>