Careers
at TEWire & Cable
Positions
Currently Available
<%
Set rsPos = Server.CreateObject("ADODB.Recordset")
sSQL = "SELECT position_id, title FROM tbPosition ORDER BY title"
rsPos.Open sSQL, Application("Database"), 0, 1
if rsPos.eof then
Response.Write("There are no career opportunities at this time.")
else
while not rsPos.Eof
%>
 |
"><%=rsPos("title")%> |
<%
rsPos.Movenext
wend
end if
%>
|