%@ Language=VBScript %>
<%
Option Explicit
Response.Expires = 0
%>
<%
CreateHTMLHeader "Miracle Database Inc. - Careers", "images/t_careers.gif"
%>
<%
dim Rs
dim SQL
SQL = "SELECT * FROM Jobs WHERE Active = 1"
Set Rs = RahConn.Execute(SQL)
If Not Rs.Eof Then%>
Immidiate oppenings :
|
|
<%While Not Rs.Eof%>
|
Title : <%=Rs("Title")%> |
Description : <%=Replace(Rs("Description"), VBCr, " ")%>
|
<%
Rs.MoveNext
Wend%>
<%
End If
Set Rs = Nothing%>
<%
SetScope "scope-images/ant.jpg", _
"Ant Nebula (Menzel 3, or Mz 3) " & _
"resembles the head and thorax of a garden-variety ant from ground-based telescopes. This dramatic NASA/ESA " & _
"Hubble Space Telescope image, showing 10 times more detail, reveals the " & _
"body as a pair of fiery lobes protruding from a dying, Sun-like " & _
"star.
" & _
"The nebula is located about 3000 light-years away from us in the Milky Way Galaxy. You can see " & _
"its 1.6 light-years length in the above image!
" & _
"(Source: heritage.stsci.edu)"
CreateHTMLFooter
%>