Yates & Associates - Corporate Intranet Software

<%@ Language=VBScript %> <% Set db = Server.CreateObject("ADODB.Connection") db.Open("yates") Set rs = Server.CreateObject("ADODB.Recordset") tempsql = "SELECT title, memo, employ_date FROM updateable_page4 WHERE employ_id=1" rs.Open tempsql,db,2,3,1 %> Yates & Associates - Corporate Intranet Software

EMPLOYMENT OPPORTUNITIES

<%response.write(rs("title") & "
" & rs("employ_date") & "

" & replace(rs("memo"), chr(13), "
"))%>

Home | Disclaimer | Top of Page

<% rs.Close db.Close set rs=nothing set db=nothing %>